DIRECTORY DragOpsCross USING [Inst, ProcessorRegister, Word], IO USING [STREAM], Rope USING [ROPE]; HandCodingUtil: CEDAR DEFINITIONS = BEGIN Inst: TYPE = DragOpsCross.Inst; ProcessorRegister: TYPE = DragOpsCross.ProcessorRegister; ROPE: TYPE = Rope.ROPE; STREAM: TYPE = IO.STREAM; Word: TYPE = DragOpsCross.Word; NameArray: TYPE = REF NameArrayRep; NameArrayRep: TYPE = ARRAY Inst OF ROPE; RegNameArray: TYPE = REF RegNameArrayRep; RegNameArrayRep: TYPE = ARRAY ProcessorRegister OF ROPE; ToStream: PROC [stream: STREAM, inst: Inst, rest: Word, pc: Word]; GetInstArray: PROC RETURNS [array: NameArray]; GetRegArray: PROC RETURNS [array: RegNameArray]; END. ”HandCodingUtil.mesa Copyright c 1984, 1986 by Xerox Corporation. All rights reserved. Russ Atkinson (RRA) September 10, 1986 11:07:40 pm PDT Κq˜codešœ™Kšœ Οmœ7™BK™6—˜šΟk ˜ Kšœ žœ!˜3Kšžœžœžœ˜Kšœžœžœ˜K˜——šΟnœžœž œž˜)K˜Kšœžœ˜Kšœžœ"˜9Kšžœžœžœ˜Kšžœžœžœžœ˜Kšœžœ˜K˜Kšœ žœžœ˜#Kš œžœžœžœžœ˜(K˜Kšœžœžœ˜)Kš œžœžœžœžœ˜8K˜—KšŸœžœ žœ$˜BK˜šŸ œžœžœ˜.K˜—šŸ œžœžœ˜0K˜—Kšžœ˜K˜K˜—…—ž£