mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-05 23:22:25 +00:00
added includes to not use internal write, read in Console and Unix
This commit is contained in:
parent
615253e7a9
commit
b25a810007
6 changed files with 12 additions and 0 deletions
BIN
ocat
BIN
ocat
Binary file not shown.
BIN
showdef
BIN
showdef
Binary file not shown.
|
|
@ -7,6 +7,10 @@ MODULE Console; (* J. Templ, 29-June-96 *)
|
|||
VAR line: ARRAY 128 OF CHAR;
|
||||
pos: INTEGER;
|
||||
|
||||
(* for read(), write() *)
|
||||
PROCEDURE -includeUnistd()
|
||||
"#include <unistd.h>";
|
||||
|
||||
PROCEDURE -Write(adr, n: LONGINT)
|
||||
"write(1/*stdout*/, adr, n)";
|
||||
|
||||
|
|
|
|||
|
|
@ -313,6 +313,14 @@ from man gettimeofday
|
|||
PROCEDURE -includeErrno()
|
||||
"#include <errno.h>";
|
||||
|
||||
(* for read(), write() *)
|
||||
PROCEDURE -includeUnistd()
|
||||
"#include <unistd.h>";
|
||||
|
||||
(* for system() *)
|
||||
PROCEDURE -includeStdlib()
|
||||
"#include <stdlib.h>";
|
||||
|
||||
PROCEDURE -err(): LONGINT
|
||||
"errno";
|
||||
|
||||
|
|
|
|||
BIN
voc
BIN
voc
Binary file not shown.
Binary file not shown.
Loading…
Add table
Add a link
Reference in a new issue