-- file P5F.mesa
-- last edited by Sweet  9-Oct-81 10:59:14
-- last edited by Satterthwaite December 16, 1982 8:48 am

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

  }.