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 a1be041..95215de 100644 (file)
--- 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;