*COMDECK SYMCOMP                                                         SYMCOMP
#SYMCOMP  CTEXT  SYMPL/COMPASS COMMONIZING MACRO DEFINITIONS          # 
 #        MACRO                                                          SYMCOMP
          ENDM                                                           SYMCOMP
  
 CONTROL  MACRO 
 CONTROL  ENDM
                                                                         SYMCOMP
 DEF      MACRO  WORD                                                    SYMCOMP
 #M1      MICRO  1,8, WORD
          IF     DEF,"#M1",1
 D        ERR    SYMBOL "#M1" IS ALREADY DEFINED
 "#M1"    BSS    1
 DEF      ENDM
                                                                         SYMCOMP
  # THIS IS THE MACRO DEFINITION SET THAT MAKES THE SYMPL / COMPASS    # SYMCOMP
  # COMMON TABLE DEFINITION COMDECKS WORK IN COMPASS. THIS DECK MAY    # SYMCOMP
  # BE INCLUDED IN SYMPL PROGRAMS USING THE COMDECKS, BUT MUST BE      # SYMCOMP
  # INCLUDED VIA A *CALL PRIOR TO ANY CALLS TO THE TABLE DEFINITION    # SYMCOMP
  # COMDECKS IN COMPASS.                                               # SYMCOMP
                                                                         SYMCOMP
  # FORMATTING CONVENTIONS AS USED IN THE GTEXT SHOULD BE USED TO      # SYMCOMP
  # ENSURE THIS SYSTEM WILL WORK.                                      # SYMCOMP
                                                                         SYMCOMP
  # THE PRINCIPLES OF COMMONIZING ARE AS FOLLOWS:                      # SYMCOMP
  #    THAT WHICH IS UNIQUE TO SYMPL APPEARS AFTER LEADING  # #        # SYMCOMP
  #    THAT WHICH IS UNIQUE TO COMPASS IS LEAD AND FOLLOWED BY A       # SYMCOMP
  #        CARD WITH  #                                                  SYMCOMP
  #    THAT WHICH  IS COMMON TO BOTH REQUIRES A COMPASS MACRO          # SYMCOMP
  #    COMMENT CARDS ARE BEGUN AND ENDED WITH  #                         SYMCOMP
                                                                         SYMCOMP
  # THE VALUE DEFINITIONS ARE BASED ON INCREMENTAL SEQUENCES OF        # SYMCOMP
  # VALUES. THE BEGINNING OF EACH SEQUENCE MUST BE DEFINED BY AN ORG   # SYMCOMP
  # AS FOLLOWS:                                                        # SYMCOMP
  #       #                                                              SYMCOMP
  #       ORG    VALUE                                                 # SYMCOMP
  #       #                                                              SYMCOMP
  # WHERE VALUE IS THE VALUE OF THE FIRST DEFINITION IN THE SEQUENCE.  # SYMCOMP
                                                                         SYMCOMP
#SYMCOMP  ENDX                                                        # 
