Copyright © 1986 by Xerox Corporation. All rights reserved.

Modified for Core and Rosemary5

Auxiliary functions for Dragon Rosemary simulations

last edited by E. McCreight, March 6, 1986 10:01:47 am PST

BitOps,

Dragon,

DragOpsCross;

BEGIN

LTD, LongToDouble:  PROC[word: Dragon.HexWord] RETURNS[BitOps.BitDWord];

LFD, LongFromDouble: PROC[bdw: BitOps.BitDWord] RETURNS[Dragon.HexWord];

PRtoByte: PROC[pr:DragOpsCross.ProcessorRegister] RETURNS [byte:Dragon.HexByte];

BytetoPR: PROC[byte:Dragon.HexByte] RETURNS [pr:DragOpsCross.ProcessorRegister];

END.