.OPEN PLIFMSSW.C .ENABLE DATA #define reentrant 1 /*reentrant version*/ /*non-debugging version*/ .DISABLE DATA .CLOSE XCC PLIFMS PIP PLIFMSSW.C;0/DE PIP PLIFMSR.S/NV=PLIFMS.S/RE XAS -D PLIFMSR .OPEN PLIFMSSW.C .ENABLE DATA #define reentrant 1 /*reentrant version*/ #define dbug 1 /*debugging version*/ .DISABLE DATA .CLOSE XCC PLIFMS PIP PLIFMSSW.C;0/DE PIP PLIFMSDR.S/NV=PLIFMS.S/RE XAS -D PLIFMSDR .OPEN PLIFMSSW.C .ENABLE DATA /*non-reentrant version*/ /*non-debugging version*/ .DISABLE DATA .CLOSE XCC PLIFMS PIP PLIFMSSW.C;0/DE PIP PLIFMSNR.S/NV=PLIFMS.S/RE XAS -D PLIFMSNR .OPEN PLIFMSSW.C .ENABLE DATA /*non-reentrant version*/ #define dbug 1 /*debugging version*/ .DISABLE DATA .CLOSE XCC PLIFMS PIP PLIFMSSW.C;0/DE PIP PLIFMSDNR.S/NV=PLIFMS.S/RE XAS -D PLIFMSDNR .OPEN PLIFMSSW.MAC .ENABLE DATA reentrant = 0 ;reentrant version .DISABLE DATA .CLOSE .ENABLE SUBSTITUTION MAC PLDFMSR,PLDFMSR/NOSP=LB:[30,10]FMSMAC.MLB/ML,SY:''PLIFMSSW,PLDFMS .DISABLE SUBSTITUTION PIP PLIFMSSW.MAC;0/DE .OPEN PLIFMSSW.MAC .ENABLE DATA reentrant = -1 ;non-reentrant version .DISABLE DATA .CLOSE .ENABLE SUBSTITUTION MAC PLDFMSNR,PLDFMSNR/NOSP=LB:[30,10]FMSMAC.MLB/ML,SY:''PLIFMSSW,PLDFMS .DISABLE SUBSTITUTION PIP PLIFMSSW.MAC;0/DE LBR CTMP=LB:[1,1]C/EX:MSG .ENABLE SUBSTITUTION LBR HLLPLIR/CR=PLIFMSR,PLDFMSR,LB:[1,1]VEXT,SY:''CTMP PIP HLLPLIR.OLB/TR LBR HLLPLIDR/CR=PLIFMSDR,PLDFMSR,LB:[1,1]VEXT,SY:''CTMP .DISABLE SUBSTITUTION PIP HLLPLIDR.OLB/TR LBR HLLPLINR/CR=PLIFMSNR,PLDFMSNR,CTMP PIP HLLPLINR.OLB/TR LBR HLLPLIDNR/CR=PLIFMSDNR,PLDFMSNR,CTMP PIP HLLPLIDNR.OLB/TR PIP CTMP.OBJ;0/DE