*        %GOTO COMBSL;        /* BILINGUAL MAPPING                   /* 01000000
         MACRO                                                          02000000
         IEZCOM                                                         03000000
*                                                                       04000000
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 05000000
*                                                                       06000000
*        COMMUNICATIONS PARAMETER LIST                                  07000000
*              MAPPING MACRO                                            08000000
*                                                                       09000000
*    AOS/1 RELEASE 1, 10/19/71, LEVEL=1                                 10000001
*                                                                       12000000
         DS    0D                                                       13000000
COMLIST  EQU   * COMPTR ->    COMMUNICATIONS PARAMETER LIST             14000000
*                                                                       15000000
COMECBPT DS    A -            PTR TO ECB FOR STOP OR MODIFY COMMAND     16000000
COMLAST  DS    0A -           LAST POINTER IN PARAMETER LIST            17000000
COMEND   EQU   X'80' -        HIGH ORDER BIT OF LAST PARAMETER POINTER  18000000
COMCIBPT DS    A -            PTR TO COMMAND INPUT BUFFER (CIB)         19000000
*                               MAPPED BY THE MACRO IEZCIB              20000000
*                                                                       21000000
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 22000000
*                                                                       23000000
         MEND  , */                                                     24000000
* %COMBSL  :  ;                                                         25000000
*                                                                       26000000
* /*  * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *  */ 27000000
*                                                                       28000000
* /*     COMMUNICATIONS PARAMETER LIST                               */ 29000000
* /*           MAPPING MACRO                                         */ 30000000
*                                                                       31000000
* /* AOS/1 RELEASE 1, 10/19/71, LEVEL=1                              */ 32000001
*                                                                       34000000
* DECLARE                                                               35000000
*   1 COMLIST  BASED(COMPTR),                                           36000000
*                                                                       37000000
*    2 COMECBPT PTR(31),             /* PTR TO ECB FOR STOP OR          38000000
*                                       MODIFY COMMAND               */ 39000000
*    2 COMCIBPT PTR(31),             /* PTR TO COMMAND INPUT BUFFER     40000000
*                                       (CIB) MAPPED BY THE MACRO       41000000
*                                       IEZCIB                       */ 42000000
*                                                                       43000000
* /*  * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *  */ 44000000
*                                                                       45000000
*     3 COMLAST  PTR(31),            /* LAST POINTER IN PARAMETER       46000000
*                                       LIST                         */ 47000000
*      4 COMEND   BIT(1),            /* HIGH ORDER BIT OF LAST          48000000
*                                       PARAMETER POINTER            */ 49000000
*      4 *        BIT(1),            /* RESERVED                     */ 50000000
*      4 *        BIT(1),            /* RESERVED                     */ 51000000
*      4 *        BIT(1),            /* RESERVED                     */ 52000000
*      4 *        BIT(1),            /* RESERVED                     */ 53000000
*      4 *        BIT(1),            /* RESERVED                     */ 54000000
*      4 *        BIT(1),            /* RESERVED                     */ 55000000
*      4 *        BIT(1);            /* RESERVED                     */ 56000000