DIRECTORY BcdOps USING [BcdBase], File USING [Capability, PageNumber], Inline USING [BITAND], PilotLoaderOps USING [FrameItem], PilotLoadStateOps USING [ConfigIndex, Map], PrincOps USING [ControlLink, ControlModule, NullLink], Space USING [Handle]; LoaderPrivate: DEFINITIONS IMPORTS Inline = BEGIN OPEN BcdOps, PilotLoadStateOps; FrameList: TYPE = POINTER TO PilotLoaderOps.FrameItem; CreateGlobalFrames: PROC[ bcd: BcdBase, map: Map, config: ConfigIndex, allframelinks: BOOLEAN] RETURNS[fl: FrameList _ NIL]; AssignCodeToFrames: PROC [ bcd: BcdBase, bcdCap: File.Capability, bcdSpaceBase: File.PageNumber, map: Map]; AssignControlModules: PROC[bcd: BcdBase, map: Map] RETURNS [cm: PrincOps.ControlModule]; FindMappedSpace: PROC [space: Space.Handle] RETURNS [Space.Handle]; NextMultipleOfFour: PROC [n: UNSPECIFIED] RETURNS [UNSPECIFIED] = INLINE {RETURN[n + Inline.BITAND[-LOOPHOLE[n, INTEGER], 3B]]}; GetModuleLink: PROC[atom: ATOM] -- exported by CedarLinkerImpl RETURNS[link: PrincOps.ControlLink _ PrincOps.NullLink] END . . . LoaderPrivate.mesa -- private interface between the loader and the modeler. -- Last edited by: John Maxwell on: February 28, 1983 1:39 pm ʃ˜Jšœ‰™‰J˜šÏk ˜ Jšœœ ˜Jšœœ˜$Jšœœœ˜Jšœœ ˜!Jšœœ˜+Jšœ œ(˜6Jšœœ ˜—J˜Jšœœ ˜1Jšœ˜J˜Jšœ œœœ˜6J˜šÏnœœ˜Jšœ<œ˜DJšœœ˜—J˜šžœœ˜J˜P—J˜šžœœ˜2Jšœ˜%—J˜Jšžœœœ˜CJ˜Jš žœœ œœ œ˜AJš œœ œœœ ˜>J˜šž œœœÏc˜?Jšœ0˜7—J˜šœ˜ J˜—J˜—…—+