-- BcdMergeOps.Mesa Edited by Sandman on June 30, 1980 4:45 PM -- Copyright Xerox Corporation 1979, 1980 DIRECTORY BcdOps USING [BcdBase], ControlDefs USING [GlobalFrameHandle, GFTIndex], LoadStateFormat USING [ConfigIndex, ModuleTable], LoadStateOps USING [Map]; BcdMergeOps: DEFINITIONS = BEGIN OPEN LoadStateFormat; MergeModule: PROCEDURE [ frame, copied: ControlDefs.GlobalFrameHandle, mt: ModuleTable]; MergeBcd: PROCEDURE [ mergee: BcdOps.BcdBase, map: LoadStateOps.Map, config: ConfigIndex, mt: ModuleTable, bcdname: STRING]; Size: PROCEDURE RETURNS [size: CARDINAL]; Write: PROCEDURE [movewords: PROCEDURE [POINTER, CARDINAL]]; Initialize: PROCEDURE [ sizeoftable: CARDINAL, lastrealgfi: ControlDefs.GFTIndex]; Finalize: PROCEDURE; END.