DIRECTORY BcdDefs USING[BcdBase, ModuleIndex], PrincOps USING[GlobalFrameHandle], SafeStorage USING[Type]; SafeStorageOps: DEFINITIONS = BEGIN AcquireTypesAndLiterals: PROC[ bcd: BcdDefs.BcdBase, moduleToGFH: PROC[BcdDefs.ModuleIndex] RETURNS[PrincOps.GlobalFrameHandle], setType: PROC[PrincOps.GlobalFrameHandle, SafeStorage.Type] ]; CopyTypesAndLiterals: PROC [ bcd: BcdDefs.BcdBase, mi: BcdDefs.ModuleIndex, old, new: PrincOps.GlobalFrameHandle]; AcquireBasicLiterals: PROC[aType: SafeStorage.Type--CODE[AtomRec]--]; END. &SafeStorageOps.Mesa: An internal Cedar system interface Last Modified On July 7, 1983 10:05 am by Paul Rovner Called by the modeller or Cedar loader after loading a bcd. Called by CopyNew For system initialization Called once AFTER the allocator and ATOM machinery have been initialized. Êþ˜Jšœ7™7Jšœ5™5˜šÏk ˜ Jšœœ˜$Jšœ œ˜"Jšœ œ˜—J˜Jšœ œ˜Jš˜˜Jšœ;™;—šÏnœœ˜Jšœ˜Jšœ œœ˜KJšœ œ.˜;Jšœ˜—J˜šžœœ˜JšœU˜UJšœ™J˜—Jšœ™šžœœÏcœ˜EJšœI™IJ˜—Jšœ˜—J˜—…—: