-- 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