<> <> <> DIRECTORY PrincOps USING [BBptr, BBTable, BBTableAlignment, BBTableSpace, BitAddress, BitBltFlags, Direction, DstFunc, GrayParm, SrcDesc, SrcFunc], PrincOpsUtils USING [AlignedBBTable, BITBLT]; BitBlt: DEFINITIONS IMPORTS PrincOpsUtils = BEGIN <> BitAddress: TYPE = PrincOps.BitAddress; BitBltFlags: TYPE = PrincOps.BitBltFlags; Direction: TYPE = PrincOps.Direction; DstFunc: TYPE = PrincOps.DstFunc; GrayParm: TYPE = PrincOps.GrayParm; SrcDesc: TYPE = PrincOps.SrcDesc; SrcFunc: TYPE = PrincOps.SrcFunc; <> BBptr, BitBltTablePtr: TYPE = PrincOps.BBptr; BBTable, BitBltTable: TYPE = PrincOps.BBTable; BITBLT: PROCEDURE [ptr: BBptr] = PrincOpsUtils.BITBLT; <> BBTableAlignment: CARDINAL = PrincOps.BBTableAlignment; BBTableSpace: TYPE = PrincOps.BBTableSpace; AlignedBBTable: PROCEDURE [ip: POINTER TO BBTableSpace] RETURNS [b: BBptr] = INLINE {RETURN[PrincOpsUtils.AlignedBBTable[ip]]}; END. LOG Time: April 11, 1980 11:09 AM By: Forrest Action: Trimmed log to Amargosa; converted to PrincOps BitBlt. Time: April 16, 1980 1:26 PM By: Forrest Action: formatting/spelling corections. Changed BBTableSpace to [1.. from [0.. Time: April 17, 1980 12:07 AM By: Forrest Action: Move BitAddress to Environment Time: July 17, 1980 4:03 PM By: Karlton Action: Add defaults to Flags record Time: August 31, 1984 11:44:03 am PDT By: Plass Action: Created Cedar PilotBridge version from version of 12-Nov-81 09:49:05 PST Time: timeStamp By: yourName Action: shortDescription