* %GOTO PLSCDAL; /* 00050040 MACRO 00100040 CDAL 00120040 CDAL DSECT 00150040 CDALDSP DS 0F CDAL DISPATCHER ADDRESS FOR 00200040 * THIS CPU 00210040 CDALDSP1 DS B RESERVED DISPATCHER BYTE 1 00220040 CDALDSP2 DS B RESERVED DISPATCHER BYTE 2 00230040 CDALDSP3 DS B RESERVED DISPATCHER BYTE 3 00240040 CDALDSP4 DS B DISPATCHER BYTE 4 00250040 CDALTCTL EQU X'01' TCTL IN CONTROL 00260040 MEND , */ 00300040 *%PLSCDAL : ; 00350040 *DECLARE /* CDAL TABLE ENTRY */ 00400040 * 1 CDAL BASED, 00450040 * 3 CDALDSP FIXED(32), /* DISPATCHER CONTROL ENTRY */ 00500040 * 5 CDALDSP1 BIT(8), /* RESERVED */ 00550040 * 5 CDALDSP2 BIT(8), /* RESERVED */ 00600040 * 5 CDALDSP3 BIT(8), /* RESERVED */ 00650040 * 5 CDALDSP4 BIT(8), /* DISPATCHER CONTROL WORD */ 00700040 * 7 * BIT(7), /* RESERVED */ 00750040 * 7 CDALTCTL BIT(1); /* TCTL IN CONTROL */ 00800040