ulmSYSTEM updated, implemented SYSTEM.UNIXCALL for one character read

and write.
added ulmIO module which uses those calls.
This commit is contained in:
Norayr Chilingarian 2013-10-11 20:49:55 +04:00
parent 2327556b15
commit 3071be3c36
5 changed files with 4 additions and 12 deletions

View file

@ -1,12 +0,0 @@
MODULE ulmSYSTEM;
IMPORT SYSTEM(*, ulmObjects, ulmDisciplines, Console*);
PROCEDURE TAS*(VAR flag:BOOLEAN): BOOLEAN; (* added for compatibility with ulmSYSTEM module; noch *)
VAR oldflag : BOOLEAN;
BEGIN
oldflag := flag;
flag := TRUE;
RETURN oldflag;
END TAS;
END ulmSYSTEM.