fpc/tests/webtbs/tw20527.pp
2011-10-21 15:00:21 +00:00

11 lines
146 B
ObjectPascal

{ %norun }
type
s = string[10];
Var
fos: file of s;
aos: array[char]of string[63];
fosx: File of String[63]; (* become bad *)
Begin
end.