SECTION "code",CODE

        xref    _ReqToolsBase

        xdef    @rtChangeReqAttrA

@rtChangeReqAttrA:
        move.l  a6,-(a7)
        move.l  _ReqToolsBase(a4),a6
        exg.l   a0,a1
        jsr     -48(a6)
        move.l  (a7)+,a6
        rts

   END