blob: c460a973c557af6b857211f9cecf1bcf72f3ca36 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
argc:asmname '_p_argc' Integer;
procedure argv(no:Integer;var str:UNIXfilename); external;
procedure flushstdout; external;
procedure exit(x : integer); external;
procedure lineread(var f:text); external;
procedure linewrite(var f:text; cnt:integer); external;
function testeof(var f:text):boolean; external;
|