fpc/tests/tbs0118.pp
1998-12-02 13:05:01 +00:00

12 lines
147 B
ObjectPascal

program Test1;
type
ExampleProc = procedure;
var
Eg: ExampleProc;
begin
Eg := nil; { This produces a compiler error }
end.