aboutsummaryrefslogtreecommitdiff
path: root/src/interp/msg.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/msg.boot')
-rw-r--r--src/interp/msg.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/msg.boot b/src/interp/msg.boot
index 1cf335fd..156906a9 100644
--- a/src/interp/msg.boot
+++ b/src/interp/msg.boot
@@ -302,7 +302,7 @@ redundant(msg,thisPosMsgs) ==
for item in $noRepList repeat
sameMsg?(msg,item) => return (found := true)
$noRepList := [msg,$noRepList]
- found or member(msg,thisPosMsgs)
+ found or listMember?(msg,thisPosMsgs)
sameMsg? (msg1,msg2) ==
(getMsgKey msg1 = getMsgKey msg2) and _