resulted in 32768 instead of -32768 on a PDP-11

This commit is contained in:
ceriel 1987-08-04 08:59:50 +00:00
parent 956fa21b89
commit d34064d660

View file

@ -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;