aboutsummaryrefslogtreecommitdiff
path: root/src/interp/showimp.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/showimp.boot')
-rw-r--r--src/interp/showimp.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/showimp.boot b/src/interp/showimp.boot
index b94fe63f..d593b847 100644
--- a/src/interp/showimp.boot
+++ b/src/interp/showimp.boot
@@ -102,7 +102,7 @@ showFrom(D,:option) ==
$predicateList: local := getConstructorPredicatesFromDB nam
for (opSig := [op,sig]) in getDomainSigs1(D,ops) repeat
u := from?(D,op,sig)
- x := ASSOC(u,alist) => RPLACD(x,[opSig,:rest x])
+ x := assoc(u,alist) => RPLACD(x,[opSig,:rest x])
alist := [[u,opSig],:alist]
for [conform,:l] in alist repeat
sayBrightly concat('"From ",form2String conform,'":")