Hi Tomas, > You'll probably have to live with two jumps. :) Or change OSG: PROCEDURE Header*(size: LONGINT); BEGIN entry := pc; fix(0, pc-1) END Header; to PROCEDURE Header*(size: LONGINT); BEGIN entry := pc; fix(0, pc-1); Put1(Mov, SB, 0, whatever); END Header; Cheers, Paul