/*****************************************************\ * * * LITERALS COMMON TO * * DIAGNOSTICS * * * \*****************************************************/ $IF incs_nolist $SAVE NOLIST $ENDIF DECLARE FOREVER LITERALLY 'WHILE 1', BOOLEAN LITERALLY 'BYTE', cr LITERALLY '0Dh', lf LITERALLY '0Ah', null LITERALLY '0', bell LITERALLY '7', true LITERALLY '0FFH', false LITERALLY '0', pass LITERALLY '0FFH', fail LITERALLY '0', REC LITERALLY '0', IGN LITERALLY '1'; $IF incs_nolist $RESTORE $ENDIF