fpcsrc/tests/tbs/tb0108.pp


1
2
3
4
5
6
7
8

{ Old file: tbs0126.pp }
{ packed array isn't allowed                            OK 0.99.6 (FK) }

type
   myarray = packed array[0..10] of longint;

begin
end.