blob: d6914c4c679b00f3cc6cb698f3338181eb662ac7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
argc:asmname '_p_argc' Integer;
procedure argv(no:Integer;var str:UNIXfilename); external;
procedure flushstdout; external;
procedure exit(x : integer);
external;
procedure closea(var f:text);
external;
procedure closeb(var f:bytefile);
external;
procedure closew(var f:wordfile);
external;
procedure dateandtime(var minutes, day, month, year : integer);
external;
procedure setpaths;
external;
function testaccess(accessmode:integer; filepath:integer): boolean;
external;
|