[lazarus] Internal compiler error

[Marc Weustink]

I get an internal compiler error when I try to compile the following program:

program test3;

type
   TFlags = (flFlag1, flFlag2, flFlag3, flFlag4);

var
   F: TFlags;

begin
   F := []; //<-- ofcourse this is illegal but no
            //    internal error
end.


marc:~/fpc/lazarus/examples$ ppc386 test3
Target OS: Linux for i386
Compiling test3.pp
Panic : Internal compiler error, exiting.
test3.pp(11,8) Fatal: Internal error 9999