--file P5F.mesa  edited by Sweet March 20, 1979  3:25 PM

DIRECTORY
  CodeDefs: FROM "codedefs" USING [CCIndex, JumpCCIndex];

P5F: DEFINITIONS = 
  BEGIN OPEN CodeDefs;

  -- from CrossJump
  CPass5:  PROCEDURE;


  -- from Final
  StartIndex, EndIndex: CCIndex;
  DidSomething: BOOLEAN;
  Fixup: PROCEDURE [start: CCIndex];
  UnthreadJump: PUBLIC PROCEDURE [c: JumpCCIndex];
  UCjump: PUBLIC PROCEDURE [c: CCIndex] RETURNS [BOOLEAN];
  CodeJumpDist: PROCEDURE [jDist: INTEGER, l: [0..7], pad: [0..1], c: JumpCCIndex, dStar: BOOLEAN];

  -- from AJumps
  FillInPCEstimates: PROCEDURE;
  BindJump: PROCEDURE [min, max: INTEGER, c: JumpCCIndex] RETURNS [bindable: 
BOOLEAN];
  CodeJump: PROCEDURE [nbytes: INTEGER, c: JumpCCIndex];

  -- from DJumps
  FillInPCEstimatesDStar: PROCEDURE;
  BindJumpDStar: PROCEDURE [min, max: INTEGER, c: JumpCCIndex] RETURNS [bindable: BOOLEAN];
  CodeJumpDStar: PROCEDURE [nbytes: INTEGER, c: JumpCCIndex];


END.