-- AccessControlUtility.mesa
 -- Last edited by
 -- Kolling on March 7, 1983 10:52 am    


DIRECTORY

      AlpineEnvironment
         USING[RName],
      AccessControlPrivate
         USING[OwnerStringRep, StringRep],
      Rope
         USING[ROPE];


AccessControlUtility: CEDAR DEFINITIONS =

BEGIN



MakeRNameFromStringRep: PROCEDURE[pntrStringRep: LONG POINTER TO
 AccessControlPrivate.StringRep] RETURNS [rName: AlpineEnvironment.RName,
 sizeOfStringRep: CARDINAL];
   -- non system-fatal errors: none.
   

MakeStringRepFromRName: PROCEDURE[rName: AlpineEnvironment.RName, pntrStringRep:
 LONG POINTER TO AccessControlPrivate.StringRep, roomAvailable: CARDINAL] RETURNS
 [sizeOfStringRep: CARDINAL];
   -- non system-fatal errors: AC.OperationFailed[outOfRoomInOwnerRecord], AC.StaticallyInvalid (badLengthName).
   

MakeRNameFromOwnerStringRep: PROCEDURE[pntrOwnerStringRep: LONG POINTER TO
 AccessControlPrivate.OwnerStringRep] RETURNS [rName: AlpineEnvironment.RName];
   -- non system-fatal errors: none.
   

MakeOwnerStringRepFromRName: PROCEDURE[rName: AlpineEnvironment.RName,
 pntrOwnerStringRep: LONG POINTER TO AccessControlPrivate.OwnerStringRep];
   -- non system-fatal errors: AC.StaticallyInvalid (badLengthName).


Compare: PROCEDURE[ref1, ref2: Rope.ROPE] RETURNS [match: BOOLEAN];
   -- non system-fatal errors: none.


CompareCaseMatters: PROCEDURE[ref1, ref2: Rope.ROPE] RETURNS [match: BOOLEAN];
   -- non system-fatal errors: none.



END.

                    Edit Log

Initial: Kolling: 19-Nov-81 14:40:40: defs file private to AccessControl; misc. utilities.