mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 08:18:12 +02:00
11 lines
146 B
ObjectPascal
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.
|