Ouch, not so good - thanks for the report. Bug fixed. --sigbjorn ----- Original Message ----- From: "michael becker" <michaelb@coconet.de> To: <hugs-bugs@haskell.org> Sent: Tuesday, December 18, 2001 17:10 Subject: invalid comparsion in 'src/input.c' line 516
hi,
i compiled 'Hugs Version: December 2001' on aix using the native aix-compiler. when i start hugs, hugs hangs when parsing Prelude.hs.
this happens because on line 516 in 'src/input.c' an integer (EOF) is compared with a char
512 static Int local nextLine() 513 { 514 for (lineLength = 0; lineLength < LINEBUFFER_SIZE-1;
lineLength++) {
515 lineBuffer[lineLength] = fgetc(inputStream); 516 if (lineBuffer[lineLength] == EOF)
when i changed this to
512 static Int local nextLine() 513 { 514 int chr; 515 for (lineLength = 0; lineLength < LINEBUFFER_SIZE-1;
lineLength++) {
516 lineBuffer[lineLength] = (chr = fgetc(inputStream)); 517 if (chr == EOF)
hugs works ok.
M.Becker
_______________________________________________ Hugs-Bugs mailing list Hugs-Bugs@haskell.org http://www.haskell.org/mailman/listinfo/hugs-bugs