From: ceriel <none@none>
Date: Tue, 12 May 1987 11:15:55 +0000 (+0000)
Subject: fixed a minor bug in cstoper.c: computation of mach_long_sign was wrong
X-Git-Tag: release-5-5~4165
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=48acbe27bbba372c73f91fc9c99418f3367966a9;p=ack.git

fixed a minor bug in cstoper.c: computation of mach_long_sign was wrong
---

diff --git a/lang/m2/comp/cstoper.c b/lang/m2/comp/cstoper.c
index c5ed84722..6785c3c07 100644
--- a/lang/m2/comp/cstoper.c
+++ b/lang/m2/comp/cstoper.c
@@ -553,13 +553,13 @@ InitCst()
 		full_mask[i] = bt;
 	}
 	mach_long_size = i;
-	mach_long_sign = 1 << (mach_long_size * 8 - 1);
+	mach_long_sign = 1L << (mach_long_size * 8 - 1);
 	if (long_size > mach_long_size) {
 		fatal("sizeof (long) insufficient on this machine");
 	}
 
-	max_int = full_mask[int_size] & ~(1 << (int_size * 8 - 1));
+	max_int = full_mask[int_size] & ~(1L << (int_size * 8 - 1));
 	max_unsigned = full_mask[int_size];
-	max_longint = full_mask[long_size] & ~(1 << (long_size * 8 - 1));
+	max_longint = full_mask[long_size] & ~(1L << (long_size * 8 - 1));
 	wrd_bits = 8 * word_size;
 }