              SYSTEM         BPM
              SYSTEM         FORTLIB
*
*       SUBROUTINE ABORT
*
*             EXECUTES AN M:XXX
*
              DEF            ABORT
              REF            9SET0
ABORT         EQU            $
              M:XXX
              END

