mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 06:22:25 +00:00
vt100 and crt units, some changes in Unix.Mod
Former-commit-id: 7f11185f6a
This commit is contained in:
parent
8603eeef82
commit
98bfa994fa
20 changed files with 388 additions and 25 deletions
|
|
@ -234,6 +234,22 @@ TYPE
|
|||
PROCEDURE -includeErrno()
|
||||
"#include <errno.h>";
|
||||
|
||||
(* for read(), write() and sleep() *)
|
||||
PROCEDURE -includeUnistd()
|
||||
"#include <unistd.h>";
|
||||
|
||||
(* for system() *)
|
||||
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 +383,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