! ! !++ ! This file contains declarations of values for the BLF control ! switches. These switches are assigned values by means of ! full-line comments in the BLISS input source text, of the form ! ! ! where the possible options for "..." are defined in ! Module CONTRL, Routine CTL$CONTROL. ! ! We now cheat a bit and can check for sw_log now -- set in the ! command line as /LOG (shows error msgs via tty_iob) or /NOLOG ! (default). ! !-- COMPILETIME _csw_ = 0; MACRO next_sw (a) = LITERAL a = _csw_; %ASSIGN (_csw_, _csw_ + 1); %; next_sw (sw_debug); next_sw (sw_key_case); next_sw (sw_user_case); next_sw (sw_page_width); next_sw (sw_rem_tabs); next_sw (sw_error); next_sw (sw_macro); next_sw (sw_plit); next_sw (sw_log); LITERAL sw_nocase = 0, sw_locase = 1, sw_upcase = 2; ! ! ! ... End of require file 'BLFCSW.REQ' ...