procedure JumpTo(var TheLabel: CodeLabel; Condition: JumpType);
extern;

procedure ExtendReferences(Entry: StackEntry);
extern;

procedure DiscardReferences(OldDepth: Scalar);
extern;

procedure AccessWord(WordLevel: AddressLevel; Delta: Offsets;
		     Operation: AccessOps);
extern;

procedure EmitCall(BlockBase: BlockLabel);
extern;

procedure Load(Entry: StackEntry);
extern;

procedure LOadAddress(Entry: StackEntry);
extern;

procedure SaveAddress(LocalBase: StackEntry);
extern;

procedure CheckLoadedValue(Entry: StackEntry);
extern;

procedure SaveValue(ExpValue: StackEntry);
extern;

procedure LOadValue(TempEntry: StackEntry);
extern;