16 Nov
1998
16 Nov
'98
8:49 p.m.
sam.littlewood@quantel.com wrote:
Has anyone a fix for this rather curious bug? - it seems subranges, packed records and VAR arguments conspire to make the compiler throw a bogus error!?
Now I have one. One single line. Well hidden.
It took me much longer than I had expected, sorry.
Peter
--
Peter Gerwinski, Essen, Germany, http://home.pages.de/~Peter.Gerwinski/
Maintainer GNU Pascal - http://home.pages.de/~GNU-Pascal/ - gpc-980830
PGP key on request - 6C 94 45 BE 28 A4 96 - 0E CC E9 12 47 25 82 75
Fight the SPAM and UBE! - http://spam.abuse.net/ - http://maps.vix.com/
8< ---------------------------------------------------------------------
--- gpc-old/p/types.c Mon Nov 2 00:28:41 1998
+++ gpc/p/types.c Mon Nov 16 21:45:01 1998
@@ -1414,11 +1426,10 @@
{
max_bits++;
check >>= 1;
}
}
- TREE_UNSIGNED (type) = 1;
return build_int_2 (min_bits > max_bits ? min_bits : max_bits, 0);
}
else
{
int min_bits = 0, max_bits = 0;