/*****************************************************\ * * * LITERALS PERTAINING TO * * SDTRAM * * * \*****************************************************/ $IF incs_nolist $SAVE NOLIST $ENDIF DECLARE BOARD$DESCRIPTOR LITERALLY 'STRUCTURE( type BYTE, initial_seg WORD, final_seg WORD, parity_port WORD, intr_origin BYTE, intr_level BYTE, cx_mode BYTE, lbx BOOLEAN, defined BOOLEAN, selected BOOLEAN, do_intr_test BOOLEAN)', /* * the size of the reserved area (vector table) + SDTRAM */ CODE_SIZE LITERALLY '0FFFFH', NUM_TESTS LITERALLY '10', /* * this one includes the scope loop utility */ NUM_TESTS_PLUS LITERALLY '11', /* * MAX_BOARDS is equal to actual MAX + 1 * (0'th element of pq$bdt is null) */ MAX_BOARDS LITERALLY '17', PTR$OVERLAY LITERALLY 'STRUCTURE( OFF WORD, SEG WORD)', /* * user$tdt test indexes * if the user$tdt is changed, these must be updated */ FIX_PAT_TEST LITERALLY '0', ADDR_MRCH_TEST LITERALLY '1', SLIDE_ONES_TEST LITERALLY '2', EXE_RAM_TEST LITERALLY '3', A_PARITY_TEST LITERALLY '4', A_INTR_DET_TEST LITERALLY '5', C_CHKBITS_LOGIC_TEST LITERALLY '6', C_CHKBITS_RAM_TEST LITERALLY '7', C_ERR_CORR_TEST LITERALLY '8', C_INTR_DET_TEST LITERALLY '9', /* * literals for the scope loop test */ SL$SEGMENT LITERALLY 'td$v(0)', SL$OFFSET LITERALLY 'td$v(1)', SL$PATTERN LITERALLY 'td$v(2)', SL$ACCESS_TYPE LITERALLY 'td$v(3)', SL$DELAY LITERALLY 'td$v(4)', READ_BYTE LITERALLY '0', READ_WORD LITERALLY '1', WRITE_BYTE LITERALLY '2', WRITE_WORD LITERALLY '3', /* * literal values for pq$bdt().intr_origin */ NMI LITERALLY '0', MASTER LITERALLY '1', SLAVE LITERALLY '2', /* * literals values for pq$bdt().type */ A$SERIES LITERALLY '0', B$SERIES LITERALLY '1', C$SERIES LITERALLY '2', NO$PARITY LITERALLY '3', /* * literal values for pq$bdt().cx_mode */ CORRECTING$MODE LITERALLY '0FH', NONCORRECTING$MODE LITERALLY '0AH', /* * literal base values */ HEX LITERALLY '16', DEC LITERALLY '10', OCT LITERALLY '8', BIN LITERALLY '1'; $IF incs_nolist $RESTORE $ENDIF