mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 14:32:24 +00:00
vt100 and crt units, some changes in Unix.Mod
This commit is contained in:
parent
c0b83a8ee9
commit
7f11185f6a
20 changed files with 384 additions and 21 deletions
|
|
@ -234,6 +234,23 @@ TYPE
|
|||
PROCEDURE -includeErrno()
|
||||
"#include <errno.h>";
|
||||
|
||||
(* for read(), write() and sleep() *)
|
||||
PROCEDURE -includeUnistd()
|
||||
"#include <unistd.h>";
|
||||
|
||||
(* for system() *)
|
||||
(* commented, doesn't compile on 32bit GNU/Linux platforms
|
||||
PROCEDURE -includeStdlib()
|
||||
"#include <stdlib.h>";
|
||||
*)
|
||||
(* for nanosleep() *)
|
||||
PROCEDURE -includeTime()
|
||||
"#include <time.h>";
|
||||
|
||||
(* for select() *)
|
||||
PROCEDURE -includeSelect()
|
||||
"#include <sys/select.h>";
|
||||
|
||||
PROCEDURE -err(): LONGINT
|
||||
"errno";
|
||||
|
||||
|
|
@ -367,6 +384,11 @@ TYPE
|
|||
PROCEDURE -Sigsetmask*(mask: LONGINT): LONGINT
|
||||
"sigsetmask(mask)";
|
||||
|
||||
PROCEDURE -Sleep*(ms : LONGINT): LONGINT
|
||||
"sleep(ms)";
|
||||
|
||||
PROCEDURE -Nanosleep*(VAR req : Timeval; VAR rem : Timeval): LONGINT
|
||||
"nanosleep(req, rem)";
|
||||
|
||||
(* TCP/IP networking *)
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue