*COMDECK PASSLOC
*  PARAMETER X IS USED TO FORCE LOAD THAT ENTRY POINT 
*  PARAMETER Y IS USED TO LINK TO IT IF IT IS THERE,
*   BUT NOT CAUSE IT TO BE LOADED.
 PASSLOC1 PASSLOC 
          PL.EPT CDD=,X 
          PL.EPT CHWR$RM,Y
          PL.EPT CIO=,X 
          PL.EPT CLL$RM,Y 
          PL.EPT CLOF$RM,X
          PL.EPT CLOV$RM,X
          PL.EPT CMM.ALF,X
          PL.EPT CMM.AUS,Y
          PL.EPT CMM.CFL,Y
          PL.EPT CMM.CSF,Y
          PL.EPT CMM.CUL,Y
          PL.EPT CMM.FFA,Y
          PL.EPT CMM.FRF,X
          PL.EPT CMM.GLF,Y
          PL.EPT CMM.ICM,Y
          PL.EPT CMM.MEM,Y
          PL.EPT CMM.MEP,Y
          PL.EPT CMM.OP1,X
          PL.EPT CMM.OP2,X
          PL.EPT CMM.OP4,X
          PL.EPT CMM.SLF,X
          IFNOS 
          PL.EPT CPM=,X 
          ENDIF 
          PL.EPT ERR$RM,Y 
          PL.EPT FDL=GGD,Y
          PL.EPT FDL=PCL,Y
          PL.EPT FDL=PCU,Y
          PL.EPT FDL=PRS,Y
          PL.EPT FDL=RCI,Y
          PL.EPT FDL=RSC,Y
          PL.EPT FDL=SEA,Y
          PL.EPT FDL=SGD,Y
          PL.EPT FDL=SPL,Y
          PL.EPT FDL.LDC,X
          PL.EPT FDL.REL,Y
          PL.EPT FDL.ULC,X
          PL.EPT FDL.UNR,Y
          PL.EPT GET$RM,X 
          PL.EPT GTL$RM,Y 
          PL.EPT LIST$RM,Y
          PL.EPT LOADER.,X
          PL.EPT LOD=,Y 
          PL.EPT LOF$RM,X 
          IFMAP              IF DYNAMIC MEMORY MAP WANTED,
            PL.EPT   MAP,X
            ENDIF 
          PL.EPT MNS=,X 
          PL.EPT MOVE$RM,Y
          PL.EPT MSG=,X 
          PL.EPT OFCT$RM,Y
          PL.EPT OPNM$RM,X
          PL.EPT PTL$RM,Y 
          PL.EPT PUT$RM,Y 
Q2        PL.EPT Q2NTRY.,Y
Q5        PL.EPT Q5NTRY.,Y
          PL.EPT RCL=,X 
          PL.EPT REW$RM,X 
          PL.EPT RMP$FE,Y 
          PL.EPT RM$ABUF,Y
          PL.EPT RM$BLD,Y 
          PL.EPT RM$CIO,Y 
          PL.EPT RM$EREX,Y
          PL.EPT RM$FAT,Y 
          PL.EPT RM$FOC,Y 
          PL.EPT RM$G1,Y
          PL.EPT RM$LDC,Y 
          PL.EPT RM$LGO,Y 
          PL.EPT RM$LVL,Y 
          PL.EPT RM$PAR4,Y
          PL.EPT RM$PD,Y
          PL.EPT RM$PL,Y
          PL.EPT RM$PLB,Y 
          PL.EPT RM$PLL,Y 
          PL.EPT RM$P1,Y
          PL.EPT RM$P4G,Y 
          PL.EPT RM$RCLA,Y
          PL.EPT RM$SYS=,Y
          PL.EPT RM$TMP,Y 
          PL.EPT RM$ULJ,Y 
          PL.EPT RM$UTC,Y 
          PL.EPT SFIT$RM,X
          PL.EPT SMRTN,X
          PL.EPT SVR=,X 
          PL.EPT SYMSC$,X 
          PL.EPT SYMSG$,X 
          PL.EPT SYMSM$,X 
          PL.EPT SYS=,X 
          PL.EPT S$ABORT,X
          PL.EPT S$ABT,X
          PL.EPT S$ARRY,X 
          PL.EPT S$CALLR,X
          PL.EPT S$CMALF,X
          PL.EPT S$CMFRF,X
          PL.EPT S$CMSLF,X
          PL.EPT S$EFNAM,X
          PL.EPT S$ELEV,X 
 S$ERR$   PL.EPT S$ERR
          PL.EPT S$ERROR,X
          PL.EPT S$JCRV,X 
          PL.EPT S$LFNAM,X
          PL.EPT S$LOCST,X
          PL.EPT S$LOGLN,X
 S$MAIN$  PL.EPT S$MAIN 
          PL.EPT S$MXERR,X
          IFPERFM            IF PERFORMANCE MEASUREMENT WANTED, 
            PL.EPT S$P,X       ASSEMBLE REFERENCE TO S$P
            ENDIF 
          PL.EPT S$PASS      NO *X* BECAUSE S$PASS IS LOCAL 
          IFPERFM            IF PERFORMANCE MEASUREMENT WANTED, 
            PL.EPT S$PERF,X    ASSEMBLE REFERENCE TO S$PERF 
            ENDIF 
          PL.EPT S$PRTCD,X
          PL.EPT S$RTNAD,X
          PL.EPT S$RTNFL,X
          PL.EPT S$RTNZZ,X
          PL.EPT S$SMFLG,X
          PL.EPT S$SPECP,Y
          PL.EPT S$SPLEN,Y
          PL.EPT S$STRPV,X
          PL.EPT S$STVAR,X
          PL.EPT WEOP$RM,X
          PL.EPT WEOS$RM,Y
          PL.EPT WMK$RM,Y 
          PL.EPT WNB=,X 
          PL.EPT XJR=,X 
          PL. 
