Scales initial commit

Former-commit-id: c5823b7657
This commit is contained in:
Norayr Chilingarian 2013-10-29 18:42:28 +04:00
parent e989e42d42
commit 8ec2f9c342

View file

@ -36,10 +36,10 @@
----------------------------------------------------------------------------
*)
MODULE ulmScales;
MODULE Scales;
IMPORT Disciplines := ulmDisciplines, Events := ulmEvents, Objects := ulmObjects, Operations := ulmOperations, PersistentObjects := ulmPersistentObjects,
RelatedEvents := ulmRelatedEvents, Services := ulmServices;
IMPORT Disciplines, Events, Objects, Operations, PersistentObjects,
RelatedEvents, Services;
TYPE
Scale* = POINTER TO ScaleRec;
@ -440,4 +440,4 @@ BEGIN
InitInterface;
PersistentObjects.RegisterType(measureType,
"Scales.Measure", "Operations.Operand", NIL);
END ulmScales.
END Scales.