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

11 lines
88 B
ObjectPascal

unit bug0149a;
interface
Const tset = [1,2,3,4,5];
c = 1;
implementation
end.