aboutsummaryrefslogtreecommitdiff
path: root/src/interp/topics.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-11-24 20:22:29 +0000
committerdos-reis <gdr@axiomatics.org>2011-11-24 20:22:29 +0000
commit9bf4d34f20b79b051730cf9536d08a8c07c54b02 (patch)
tree12b33b579a7a218edacb44f8c2da62d1f468410e /src/interp/topics.boot
parentfdffee8492600045e35fc54c3379e559c66f8d19 (diff)
downloadopen-axiom-9bf4d34f20b79b051730cf9536d08a8c07c54b02.tar.gz
* interp/define.boot: Tidy.
* interp/functor.boot: Likewise. * interp/g-util.boot: Likewise. * interp/slam.boot: Likewise. * interp/topics.boot: Likewise. * interp/trace.boot: Likewise.
Diffstat (limited to 'src/interp/topics.boot')
-rw-r--r--src/interp/topics.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/topics.boot b/src/interp/topics.boot
index 191606aa..d30a5eaf 100644
--- a/src/interp/topics.boot
+++ b/src/interp/topics.boot
@@ -254,7 +254,7 @@ filterByTopic(opAlist,topic) ==
listOfTopics(conname) ==
doc := getConstructorDocumentationFromDB conname
- u := ASSOC('constructor,doc) or return nil
+ u := symbolTarget('constructor,doc) or return nil
code := myLastAtom u
--not integer? code => nil
mySort [key for [key,:val] in entries $topicHash | LOGBITP(val,code)]