NOLIST
Rename      MACRO              ; 11 Jan 88
*------------------------------; Start of Rename macro.
                               ; Do set-up for _LVORename.
     MOVE.L #\1,D1
     MOVE.L #\2,D2
     CallLib Rename,dos        ; Call Rename.
     TST.L D0                  ; Make the zero flag indicate failure.
*------------------------------; End of Rename macro.
     ENDM
     LIST