         MACRO
&N       PDPEPIL
         GBLB  &PDFEPIL
         AIF   (&PDFEPIL).ONCED
&PDFEPIL SETB  1
*
* The standard GCC exit code macro
* by Chris Langford and Dave Jones
* August, 2006
*
* This code is in the public domain and can be used without
* restriction in any application, either commercial or non-commerical,
* and can be freely redistributed.
*
.ONCED   ANOP  ,
&N       L     13,4(,13)
         RETURN (14,12),RC=(15)
         MEND
