aboutsummaryrefslogtreecommitdiff
path: root/src/interp/msgdb.boot.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/msgdb.boot.pamphlet')
-rw-r--r--src/interp/msgdb.boot.pamphlet4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/msgdb.boot.pamphlet b/src/interp/msgdb.boot.pamphlet
index 29920edf..e5b10a14 100644
--- a/src/interp/msgdb.boot.pamphlet
+++ b/src/interp/msgdb.boot.pamphlet
@@ -386,7 +386,7 @@ throwListOfKeyedMsgs(descKey,descArgs,l) ==
-- a chance to play around in a break loop if $BreakMode is not 'nobreak
breakKeyedMsg(key,args) ==
- BUMPCOMPERRORCOUNT()
+ BUMPERRORCOUNT "semantic"
sayKeyedMsg(key,args)
handleLispBreakLoop($BreakMode)
@@ -399,7 +399,7 @@ saturnKeyedSystemError(key, args) ==
sayString '"\bgroup\color{red}"
sayString '"\begin{verbatim}"
sayKeyedMsg("S2GE0000",NIL)
- BUMPCOMPERRORCOUNT()
+ BUMPERRORCOUNT "semantic"
sayKeyedMsgAsTeX(key,args)
sayString '"\end{verbatim}"
sayString '"\egroup"