*COMDECK TYP1HLIP 
_$J+? 
                                                         _ 02/08/80 ? 
               _ # TRUNK CONTROL BLOCK # ?
        TRKCBLK = PACKED RECORD 
            TRLCBP      : BZLCBP;           _ LCB POINTER              ?
            TRIGNRLR    : BOOLEAN;          _ IGNORE LOAD REQUESTS     ?
            TRLOADFLG   : BOOLEAN;          _ TRUNK IS LOADING         ?
            TRFRMSIZE   : B011BITS;         _ TRUNK FRAME SIZE         ?
            TRCNFST     : C7CNFST;          _ CONFIGURATION STATE      ?
            TRI         : ARRAY[0..7] OF    _ FRAME RETENTION QUEUE    ?
                            B0BUFPTR; 
            TRLNKQPTR   : ARRAY[BOOLEAN]    _ LINK QUEUES.             ?
                            OF B0BUFPTR;
            TRTEXTQPTR  : ARRAY[BOOLEAN]    _ TEXT QUEUES.             ?
                           OF B0BUFPTR ;
            TRRBRF      : ARRAY[BOOLEAN]    _ RECEIVE BLOCK            ?
                          OF B0BUFPTR;      _  REASSEMBLY FIRST.       ?
            TRRBRL      : ARRAY[BOOLEAN]    _ RECEIVE BLOCK            ?
                          OF B0BUFPTR;      _  REASSEMBLY LAST.        ?
            TRTBRF      : ARRAY[BOOLEAN]    _ TRANSMIT BLOCK           ?
                          OF B0BUFPTR;      _  REASSEMBLY FIRST.       ?
            TRTBRL      : ARRAY[BOOLEAN]    _ TRANSMIT BLOCK           ?
                          OF B0BUFPTR ;     _  REASSEMBLY LAST.        ?
            TRLINO      : INTEGER;          _ LINE NUMBER.             ?
            TRHN1ID     : B08BITS;          _ FOREIGN HOST NODE NID1   ?
            TRHN2ID     : B08BITS;          _ FOREIGN HOST NODE ID 2   ?
            TRTNID      : B08BITS;          _ FOREIGN TERMINAL NODE ID.?
            TRITSS      : BOOLEAN;          _ INITIAL TRUNK STATUS SENT?
            TRUI        : B0BUFPTR;         _ DOWNLINE LOAD/DUMP BLOCK.?
            TRLDPTR     : B0BUFPTR;         _ LOAD/DUMP BLOCK POINTER. ?
            TRFRMPTR    : B0BUFPTR ;        _ TCC FRAME POINTER.       ?
            TRCMDCFLD,                      _ COMMAND AND RSPNSE       ?
            TRRSPCFLD   : B08BITS ;         _ C-FIELDS FOR TCC. ? 
            TRT1ET      : INTEGER;          _ T1 EXPIRATION TIME.      ?
            TRT2ET      : INTEGER;          _ T2 EXPIRATION TIME.      ?
            TRHCTE      : INTEGER;          _ HDLC-CONTROL TIME XPRTN. ?
            TRLCTRE     : INTEGER;          _ TR E                     ?
            TRLCTSE     : INTEGER;          _ TS                       ?
            TRLMTE      : INTEGER;          _ LINE TIMER EXPIRATION.   ?
            TRTOI       : INTEGER;          _ TRUNK INITIALIZATION TIME?
            TRHCSTE,                        _ HDLC-CONTROL STATE.      ?
            TRLCSTE,                        _ LINK-CONTROL STATE.      ?
            TRLMSTE     : B03BITS;          _ LINE STATE.              ?
            TRNSO,                          _ NEXT FRM TO GO OUT       ?
            TRNR,                           _ NEXT FRM TO RECVE.       ?
            TRNSU       : 0..7 ;            _ NEXT UNACKED FRM.        ?
            TRSECSTE    : 0..7 ;            _ SECONDARY STATE.         ?
            TRPRISTE    : 0..15 ;           _ PRIMARY STATE.           ?
            TRWD1XMT,                       _ FCD,LCD,AND FLAGS        ?
            TRWD2XMT    : INTEGER ;         _ FOR SHORT TCC XMT.       ?
            TRXMTAFLD,                      _ A AND C-FIELDS           ?
            TRXMTCFLD   : B08BITS ;         _ OF SHORT TCC XMT.        ?
            TRTCCOB     : B0BUFPTR;         _ TCC POINTER TO FRAME IN  ?
                                            _  PROCESS OF OUTPUT.      ?
            CASE TRCASE : INTEGER OF
            0:(TRTCCREL : BOOLEAN;          _ TCC FLAG TO RELEASE BFRS ?
                                            _  FROM TRTCCOB.           ?
               TRREMOTE : BOOLEAN;          _ LOCAL OR REMOTE NPU      ?
               TRF,                         _ F VALUE FOR P/F.         ?
               TRP      : B01BIT ;          _ P VALUE FOR P/F.         ?
               TRLSTXMTPRI,                 _ LAST XMT WAS PRMRY       ?
               TRXMTING : BOOLEAN;          _ XMT IN PROCESS.          ?
               TRCIEC   : B02BITS;          _ CONSECUTIVE CRC ERROR CNT?
               TRRC     : B08BITS);         _ RETRY COUNT.             ?
            1:(TRLAST   : INTEGER);         _ LAST ENTRY IN TRCB       ?
        END;
