diff --git a/lang/m2/libm2/Conversion.mod b/lang/m2/libm2/Conversion.mod
index 325a10b0d..a1be0410d 100644
--- a/lang/m2/libm2/Conversion.mod
+++ b/lang/m2/libm2/Conversion.mod
@@ -49,10 +49,10 @@ IMPLEMENTATION MODULE Conversions;
 			   len: CARDINAL;   
                            VAR str: ARRAY OF CHAR); 
   BEGIN 
-	IF num < 0 THEN
+	IF (num < 0) AND (num >= -MAX(INTEGER)) THEN
 		ConvertNum(-num, len, 10, TRUE, str);
 	ELSE
-		ConvertNum(num, len, 10, FALSE, str);
+		ConvertNum(CARDINAL(num), len, 10, FALSE, str);
 	END;
   END ConvertInteger;