resulted in 32768 instead of -32768 on a PDP-11
This commit is contained in:
parent
cd8d48a0e9
commit
bc6644fc8b
@ -52,7 +52,7 @@ IMPLEMENTATION MODULE Conversions;
|
|||||||
IF (num < 0) AND (num >= -MAX(INTEGER)) THEN
|
IF (num < 0) AND (num >= -MAX(INTEGER)) THEN
|
||||||
ConvertNum(-num, len, 10, TRUE, str);
|
ConvertNum(-num, len, 10, TRUE, str);
|
||||||
ELSE
|
ELSE
|
||||||
ConvertNum(CARDINAL(num), len, 10, FALSE, str);
|
ConvertNum(CARDINAL(num), len, 10, num < 0, str);
|
||||||
END;
|
END;
|
||||||
END ConvertInteger;
|
END ConvertInteger;
|
||||||
|
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user