LizardLiver.mesa
Copyright © 1984, 1985, 1986 by Xerox Corporation. All rights reserved.
Russ Atkinson (RRA) September 11, 1986 0:10:53 am 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.