When preparing an assignment for our Programming Education and Contest Hosting system (PEACH), I encountered a compiler bug.
The program below `panics' the compiler (internal compiler error). Configuration:
Version: 1.0.4
Date: 2000/12/18
OS: Linux
Platform: i386
Best regards,
Tom Verhoeff
program Panic1;
{ (Eindhoven University of Technology)
panic1.p(18,18) Error: Operator is not overloaded
Panic : Internal compiler error, exiting.
panic1.p(19,3) Fatal: Internal error 9999 }
const
M = 21;
N = 19;
type
Row = 0 .. M-1;
Col = 0 .. N-1;
Matrix = array [ Row, Col ] of Char;
procedure DoMatrix ( const m: Matrix ); { paramname clashes with global const }
begin
write ( m [ M-1, N-1 ] ) { this is line 18 }
end; { DoMatrix }
var
theMatrix: Matrix;
begin
DoMatrix ( theMatrix )
end.