LizardLiver.mesa
Copyright © 1984, 1985 by Xerox Corporation. All rights reserved.
Russ Atkinson (RRA) July 15, 1985 10:31:49 pm PDT
DIRECTORY
DragOpsCross USING [Inst, Word],
LizardHeart USING [Control, Processor];
LizardLiver:
CEDAR
DEFINITIONS =
BEGIN
Control: TYPE = LizardHeart.Control;
Inst: TYPE = DragOpsCross.Inst;
Processor: TYPE = LizardHeart.Processor;
Word: TYPE = DragOpsCross.Word;
Execute:
PUBLIC PROC [processor: Processor, thisPC: Word, inst: Inst, rest: Word]
RETURNS [newPC, rtnPC: Word, control: Control ← nextInst];
This procedure is split off into a separate module because the bloody stupid compiler could not handle it when I had it combined with LizardHeart! One of these days...
END.