mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 17:08:01 +02:00
ee69d00bec
decomissioned quite a while ago, but this file was forgotten in
that process)
git-svn-id: trunk@13181 -
14 lines
181 B
ObjectPascal
14 lines
181 B
ObjectPascal
{ %norun }
|
|
{ %opt=-vh -Seh }
|
|
|
|
{$MODE OBJFPC}
|
|
|
|
var
|
|
f: TextFile;
|
|
|
|
begin
|
|
AssignFile (f, 'test.dat'); // Hint: Variable not initialized
|
|
Reset (f);
|
|
CloseFile (f);
|
|
end.
|