From: ceriel Date: Tue, 4 Aug 1987 08:59:50 +0000 (+0000) Subject: resulted in 32768 instead of -32768 on a PDP-11 X-Git-Tag: release-5-5~3954 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=d34064d660e71bbaf7fdc52c9ee26344a355c05e;p=ack.git resulted in 32768 instead of -32768 on a PDP-11 --- diff --git a/lang/m2/libm2/Conversion.mod b/lang/m2/libm2/Conversion.mod index a1be0410d..95215de0f 100644 --- a/lang/m2/libm2/Conversion.mod +++ b/lang/m2/libm2/Conversion.mod @@ -52,7 +52,7 @@ IMPLEMENTATION MODULE Conversions; IF (num < 0) AND (num >= -MAX(INTEGER)) THEN ConvertNum(-num, len, 10, TRUE, str); ELSE - ConvertNum(CARDINAL(num), len, 10, FALSE, str); + ConvertNum(CARDINAL(num), len, 10, num < 0, str); END; END ConvertInteger;