RoseIOHacks.Mesa

Last Edited by: Spreitzer, October 9, 1984 3:18:04 pm PDT

DIRECTORY RoseTypes;

RoseIOHacks: CEDAR DEFINITIONS =

BEGIN OPEN RoseTypes;

Drive: TYPE = LONG POINTER TO DriveRep;

DriveRep: TYPE = ARRAY NAT OF BoolWord;

BoolWord: TYPE = RECORD [fill: [0 .. 32768), bool: BOOLEAN];

DirectionInstruction: TYPE = {none, forward, backward, check, firstFoo, restFoo, udFwdLBack};

CopyIO: PROC [from, to: WordPtr, by: Ports, what: DirectionInstruction, specials, generals, simples: BOOLEAN, drive: Drive];

END.