*COMDECK  COMSPSU - PSUEDO INSTRUCTION DEFINITIONS. 
 PSUD     SPACE  4,10 
*         PSEUDO INSTRUCTION DEFINITIONS ARE GIVEN BELOW. 
  
          LOC    0
 OCPSUD   EQU    *O 
          PSUD   ADDR        FCL INIT. ROUTINE APLIST WORD
          PSUD   BSS
          PSUD   APL         APLIST 
          PSUD   BMI         BEGIN *TS* TYPE INSTRUCTIONS 
          PSUD   CON         *READ* CONSTANT TABLE PSEUDO 
          PSUD   END
          PSUD   EQUN        NEGATIVE RELOCATION MACRO
          PSUD   FMT         FORMAT/FMT MACRO 
          PSUD   FVEC        FILE POINTER WORD
          PSUD   IDNT 
          PSUD   IOM
          PSUD   LCC
          PSUD   LOO         TURN ON /OFF OBJECT LISTING
          PSUD   NLST        *READ* NAMELIST TABLE PSEUDO 
          PSUD   PLIM 
          PSUD   TRAC        GENERATE (TRACE.) WORD 
          PSUD   USE
  
  
 IPSUD    EQU    *O 
          IPSUD  BCI         BEGIN CCG TYPE INSTRUCTION 
          IPSUD  BOS         BEGINNING OF STATEMENT 
          IPSUD  CPL         *CPL.* CONTROL TABLE ENTRY 
          IPSUD  BSS         GENERATE A BSS 
          IPSUD  DATA        DATA SUB-TABLE HEADER
          IPSUD  ECI         END CCG TYPE INSTRUCTION 
          IPSUD  EMI         END  *TS*  TYPE INSTRUCTIONS 
          IPSUD  JPI         GENERATE INDEXED JUMP
          IPSUD  LD0         LOAD INSTRUCTION FOR LEVEL 0 
          IPSUD  ST0         LEVEL 0 STORE -- MUST FOLLOW LD0 
          IPSUD  LOO         TURN ON /OFF OBJECT LISTING
          IPSUD  OTR         GENERATE  SB0    B0 + LINENUM
          IPSUD  RJ3         GENERATE  RJ 
          IPSUD  RJ6         GENERATE  RJT
          IPSUD  SUBI        CREATE A SUB INDEX WORD
          IPSUD  SB0I        CREATE A SUB0 INDEX WORD 
          IPSUD  UJP         GENERATE  EQ 
          IPSUD  USE         SWITCH ORGIN TO NEW LOCAL BLOCK
          IPSUD  ZERO        OUTPUT A ZERO WORD 
  
 Z.PSUD   =      *L 
          ERRMI  77B-*L      TOO MANY PSEUDOS 
          LOC    *O 
  
* PSU     ENDX
