Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-07 - decus/20-0172/blfcsw.req
There is 1 other file named blfcsw.req in the archive. Click here to see a list.
!<blf/lowercase_user>
!<blf/uppercase_key>

!++
!	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
!		!<BLF/...>
!	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' ...