gpc-2.6.3/sparc

I believe the following program should generate an error. (But it doesn't.)

program variant(output);

type myrec = record case integer of 1 : (f1:integer); 2 : (f1:real) end;

begin end.