SECTION "code",CODE

        xref    _ReqToolsBase

        xdef    _rtAllocRequest

_rtAllocRequest:
        move.l  a6,-(a7)
        move.l  _ReqToolsBase(a4),a6
        move.l  8(a7),d0
        lea     12(a7),a0
        jsr     -30(a6)
        move.l  (a7)+,a6
        rts

   END