-- RandomCodeDragonOps.mesa last edited by Sturgis: October 8, 1984 11:03:43 am PDT

DIRECTORY
 RandomCodeTypedProgramGraphs USING[OpDescriptor, OpTypeClass];

RandomCodeDragonOps: CEDAR DEFINITIONS =

BEGIN OPEN RandomCodeTypedProgramGraphs;


GetDragonOp: PROCEDURE[
 class: OpTypeClass,
 random: PROCEDURE RETURNS[CARDINAL],
 selectLocalIndex: PROCEDURE RETURNS[CARDINAL],
 selectRemoteIndex: PROCEDURE RETURNS[CARDINAL],
 selectLocalRemoteIndices: PROCEDURE RETURNS[l,r: CARDINAL]]
 RETURNS[OpDescriptor];

GetEPOpForEntry: PROCEDURE[nArgs: CARDINAL] RETURNS[OpDescriptor];

GetRetOpForReturn: PROCEDURE[nRetWords: CARDINAL] RETURNS[OpDescriptor];

GetJBOpForJump: PROCEDURE[deltaBytes: INTEGER] RETURNS[OpDescriptor];

GetJDBOpForJump: PROCEDURE[deltaBytes: INTEGER] RETURNS[OpDescriptor];

GetSFCOpForSFCall: PROCEDURE RETURNS[OpDescriptor];

GetStopTrap: PROCEDURE RETURNS[OpDescriptor];

END.

MODULE HISTORY

Initial by: Sturgis, October 8, 1984 11:05:16 am PDT, edited from RandomCodeIternal