blob: e4a5fed06654d5432c924c2c2f2b010e898339f2 (
plain)
1
2
3
4
5
6
7
8
|
procedure exit(x : integer);
external;
procedure lineread(var f:textfile);
external;
procedure linewrite(var f:textfile; cnt:integer);
external;
function testeof(var f:textfile):boolean;
external;
|