--SoftBITBLT is exported by LongBitBLT.Mesa DIRECTORY BitBltDefs: FROM "BitBltDefs", Mopcodes: FROM "Mopcodes"; BBDefs: DEFINITIONS = BEGIN DMachine: BOOLEAN; BITBLT: PROCEDURE [ptr: POINTER TO BitBltDefs.LongBBTable] = INLINE BEGIN IF DMachine THEN HardBITBLT[ptr] ELSE SoftBITBLT[ptr]; END; SoftBITBLT: PROCEDURE [ptr: POINTER TO BitBltDefs.LongBBTable]; HardBITBLT: PROCEDURE [ptr: POINTER TO BitBltDefs.LongBBTable] = MACHINE CODE BEGIN Mopcodes.zLI0; Mopcodes.zBITBLT END; END.