SECTION "code",CODE

        xref    _ReqToolsBase

        xdef    _rtLockWindow

_rtLockWindow:
        move.l  a6,-(a7)
        move.l  _ReqToolsBase(a4),a6
        move.l  8(a7),a0
        jsr     -156(a6)
        move.l  (a7)+,a6
        rts

   END