d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

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

Browse source
This commit is contained in:
ceriel 1987-05-12 11:15:55 +00:00
parent 46ad9ff041
commit 48acbe27bb
1 changed files with 3 additions and 3 deletions

6
lang/m2/comp/cstoper.c
View file

@ -553,13 +553,13 @@ InitCst()
full_mask[i] = bt; full_mask[i] = bt;
} }
mach_long_size = i; 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) { if (long_size > mach_long_size) {
fatal("sizeof (long) insufficient on this machine"); 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_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; wrd_bits = 8 * word_size;
} }