diff options
Diffstat (limited to 'src/interp/msg.boot')
-rw-r--r-- | src/interp/msg.boot | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/src/interp/msg.boot b/src/interp/msg.boot index 1e419b72..1bbae560 100644 --- a/src/interp/msg.boot +++ b/src/interp/msg.boot @@ -36,6 +36,29 @@ import '"sys-macros" import '"astr" )package "BOOT" +$erLocMsgDatabaseName := pathname '(co_-eng msgs a) +$erGlbMsgDatabaseName := pathname '(co_-eng msgs i) +$newcompErrorCount := 0 + +$imPrTagGuys == ['unimple, 'bug, 'debug, 'say, 'warn] +$toWhereGuys == ['fileOnly, 'screenOnly ] +$imPrGuys == ['imPr] +$repGuys == ['noRep, 'rep] +$attrCats == ['$imPrGuys, '$toWhereGuys, '$repGuys] + +$LINELENGTH := 80 +$preLength := 11 +$LOGLENGTH := $LINELENGTH - 6 +$specificMsgTags := [] +$showKeyNum := NIL + +$compErrorPrefix := '"Error" +$compBugPrefix := '"Bug!" + +$ncMsgList := [] + +--% + ListMember?(ob, l) == MEMBER(ob, l, KEYWORD::TEST, function EQUAL) |