// File BCPLCASE_BCPLCASEHDR

// Header file for BCPL source file case conversion program

// R.D. Eager   University of Kent   MCMLXXXV

GET "LIBHDR"

MANIFEST $( gpb = firstfreeglobal $)

GLOBAL $(
allupperwrch        : gpb+000
findio              : gpb+001
main                : gpb+002
wch                 : gpb+003
$)

MANIFEST $( gvb = gpb + 004 $)

GLOBAL $(
ch                  : gvb+000
charv               : gvb+001
dictname            : gvb+002
echo_               : gvb+003
escape_case         : gvb+004
instream            : gvb+005
linecount           : gvb+006
lower_              : gvb+007
lowerkeys_          : gvb+008
nametree            : gvb+009
outstream           : gvb+010
settag_             : gvb+011
treep               : gvb+012
treevec             : gvb+013
upper_              : gvb+014
word                : gvb+015
wordnode            : gvb+016
wordsize            : gvb+017
wordv               : gvb+018
$)

MANIFEST $(   // Values for 'escape_case'
ec.leave            = 0   // Leave escaped characters alone
ec.upper            = 1   // Force escaped characters to upper case
ec.lower            = 2   // Force escaped characters to lower case
$)

// End of file BCPLCASE_BCPLCASEHDR