Scales initial commit

This commit is contained in:
Norayr Chilingarian 2013-10-29 18:42:28 +04:00
parent e76b8bf27c
commit c5823b7657

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.