1 /* BEGIN INCLUDE FILE ... config_mpc_card.incl.pl1 ... 11/27/80 W. Olin Sibert */
 2 
 3 dcl  mpc_cardp ptr;                                         /* Pointer to an MPC card. */
 4 
 5 dcl 1 mpc_card aligned based (mpc_cardp),
 6     2 word char (4),                                        /* "mpc" */
 7     2 name char (4),                                        /* Name of this MPC - e.g., "mspa" */
 8     2 model fixed bin,                                      /* Model of this MPC - e.g., 601. */
 9     2 port (4),                                             /* Per port information. 12 fields total */
10       3 iom fixed bin (3),                                  /* IOM number */
11       3 chan fixed bin (8),                                 /* Channel number. */
12       3 nchan fixed bin,                                    /* Number of logical channels on this channel. */
13 
14     2 type_word aligned,
15       3 field_type (14) bit (2) unaligned,                  /* type of each field; see config_deck.incl.pl1 */
16       3 pad1 bit (4) unaligned,
17       3 n_fields fixed bin (4) unsigned unaligned;          /* number of fields used on card */
18 
19 dcl 1 mpc_card_array aligned based (mpc_cardp),             /* Overlay for MPC port array */
20     2 pad1 (3) bit (36) aligned,
21     2 port (divide (max (0, (mpc_card.n_fields - 2)), 3, 17, 0)),
22       3 iom fixed bin (3),                                  /* IOM number */
23       3 chan fixed bin (8),                                 /* Channel number. */
24       3 nchan fixed bin;                                    /* Number of logical channels on this channel. */
25 
26 dcl  MPC_CARD_WORD char (4) aligned internal static options (constant) init ("mpc");
27 
28 /* END INCLUDE FILE ... config_mpc_card.incl.pl1 */