mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 05:12:26 +00:00
Scales initial commit
This commit is contained in:
parent
e76b8bf27c
commit
c5823b7657
1 changed files with 4 additions and 4 deletions
|
|
@ -36,10 +36,10 @@
|
||||||
----------------------------------------------------------------------------
|
----------------------------------------------------------------------------
|
||||||
*)
|
*)
|
||||||
|
|
||||||
MODULE ulmScales;
|
MODULE Scales;
|
||||||
|
|
||||||
IMPORT Disciplines := ulmDisciplines, Events := ulmEvents, Objects := ulmObjects, Operations := ulmOperations, PersistentObjects := ulmPersistentObjects,
|
IMPORT Disciplines, Events, Objects, Operations, PersistentObjects,
|
||||||
RelatedEvents := ulmRelatedEvents, Services := ulmServices;
|
RelatedEvents, Services;
|
||||||
|
|
||||||
TYPE
|
TYPE
|
||||||
Scale* = POINTER TO ScaleRec;
|
Scale* = POINTER TO ScaleRec;
|
||||||
|
|
@ -440,4 +440,4 @@ BEGIN
|
||||||
InitInterface;
|
InitInterface;
|
||||||
PersistentObjects.RegisterType(measureType,
|
PersistentObjects.RegisterType(measureType,
|
||||||
"Scales.Measure", "Operations.Operand", NIL);
|
"Scales.Measure", "Operations.Operand", NIL);
|
||||||
END ulmScales.
|
END Scales.
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue