
<<file P5F.mesa>>
<<last edited by Sweet  9-Oct-81 10:59:14>>
<<last edited by Satterthwaite November 27, 1985 2:36:19 pm PST>>

DIRECTORY
CodeDefs: TYPE USING [CCIndex, JumpCCIndex];

P5F: DEFINITIONS = { 
OPEN CodeDefs;

<<from CrossJump>>
CPass5:  PROC;

<<from Final>>
StartIndex: VAR CCIndex;
EndIndex: VAR CCIndex;
DidSomething: BOOL;
UnthreadJump: PROC [c: JumpCCIndex];
UCjump: PROC [c: CCIndex] RETURNS [BOOL];
CodeJumpDist: PROC [jDist: INTEGER, l: [0..7], c: JumpCCIndex];

<<from DJumps>>
FillInPCEstimates: PROC;
BindJump: PROC [min, max: INTEGER, c: JumpCCIndex] RETURNS [bindable: BOOL];
CodeJump: PROC [nbytes: INTEGER, c: JumpCCIndex];

}.

