vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-05 23:22:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

ulmSYSTEM updated, implemented SYSTEM.UNIXCALL for one character read

Browse source 
and write.
added ulmIO module which uses those calls.


Former-commit-id: 3071be3c36
This commit is contained in:
Norayr Chilingarian 2013-10-11 20:49:55 +04:00
parent 74d48821f4
commit fe95963b2f
5 changed files with 4 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

1
makefile
View file

@ -137,6 +137,7 @@ stage6:
$(VOCSTATIC) -sP ulmASCII.Mod ulmSets.Mod
$(VOCSTATIC) -sP ulmObjects.Mod ulmDisciplines.Mod
$(VOCSTATIC) -sP ulmPriorities.Mod ulmServices.Mod ulmEvents.Mod ulmResources.Mod ulmForwarders.Mod ulmRelatedEvents.Mod
$(VOCSTATIC) -sP ulmIO.Mod
stage7:
#objects := $(wildcard *.o)

1
makefile.gnuc.armv6j_hardfp
View file

@ -137,6 +137,7 @@ stage6:
$(VOCSTATIC) -sP ulmASCII.Mod ulmSets.Mod
$(VOCSTATIC) -sP ulmObjects.Mod ulmDisciplines.Mod
$(VOCSTATIC) -sP ulmPriorities.Mod ulmServices.Mod ulmEvents.Mod ulmResources.Mod ulmForwarders.Mod ulmRelatedEvents.Mod
$(VOCSTATIC) -sP ulmIO.Mod
stage7:
#objects := $(wildcard *.o)

1
makefile.gnuc.armv7a_hardfp
View file

@ -137,6 +137,7 @@ stage6:
$(VOCSTATIC) -sP ulmASCII.Mod ulmSets.Mod
$(VOCSTATIC) -sP ulmObjects.Mod ulmDisciplines.Mod
$(VOCSTATIC) -sP ulmPriorities.Mod ulmServices.Mod ulmEvents.Mod ulmResources.Mod ulmForwarders.Mod ulmRelatedEvents.Mod
$(VOCSTATIC) -sP ulmIO.Mod
stage7:
#objects := $(wildcard *.o)

1
makefile.gnuc.x86
View file

@ -137,6 +137,7 @@ stage6:
$(VOCSTATIC) -sP ulmASCII.Mod ulmSets.Mod
$(VOCSTATIC) -sP ulmObjects.Mod ulmDisciplines.Mod
$(VOCSTATIC) -sP ulmPriorities.Mod ulmServices.Mod ulmEvents.Mod ulmResources.Mod ulmForwarders.Mod ulmRelatedEvents.Mod
$(VOCSTATIC) -sP ulmIO.Mod
stage7:
#objects := $(wildcard *.o)

12
src/lib/ulm/ulmSYSTEM.Mod
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.