diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-07-04 06:36:35 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-07-04 06:36:35 +0000 |
| commit | 2f5255f62b85b026dcf11adafff07ac2f254a41c (patch) | |
| tree | 0cf105b0d3dfa04b44315f2f31275f3feb66db67 /src/interp/msg.boot | |
| parent | dc5f09ca9fe80896ec7fd8677a3e517ce9213285 (diff) | |
| download | open-axiom-2f5255f62b85b026dcf11adafff07ac2f254a41c.tar.gz | |
* interp/int-top.boot (SpadInterpretStream): Remove binding of
$erMsgToss, as it is never assigned to.
(phIntReportMsgs): Adjust.
(phReportMsgs): Likewise.
* interp/msg.boot (showMsgPos?): Likewise.
(initImPr): Likewise.
Diffstat (limited to 'src/interp/msg.boot')
| -rw-r--r-- | src/interp/msg.boot | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/msg.boot b/src/interp/msg.boot index cb84d186..a3029fcd 100644 --- a/src/interp/msg.boot +++ b/src/interp/msg.boot @@ -389,7 +389,7 @@ getPosStL msg == '"" showMsgPos? msg == - $erMsgToss or (not msgImPr? msg and not msgLeader? msg) + not msgImPr? msg and not msgLeader? msg remFile positionList == @@ -448,8 +448,8 @@ isKeyQualityP (key,qual) == --% these functions handle the attributes initImPr msg == - $erMsgToss or symbolMember? (getMsgTag msg,$imPrTagGuys) => - setMsgUnforcedAttr (msg,'$imPrGuys,'imPr) + symbolMember?(getMsgTag msg,$imPrTagGuys) => + setMsgUnforcedAttr (msg,'$imPrGuys,'imPr) initToWhere msg == member ('trace,getMsgCatAttr (msg,'catless)) => |