diff options
Diffstat (limited to 'src/interp/c-doc.boot')
-rw-r--r-- | src/interp/c-doc.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/c-doc.boot b/src/interp/c-doc.boot index 3bf1365f..131897fd 100644 --- a/src/interp/c-doc.boot +++ b/src/interp/c-doc.boot @@ -57,7 +57,7 @@ getDoc(conName,op,modemap) == ++ argument to the ofCategory predicate it contains. Return ++ nil otherwise. getOfCategoryArgument pred == - pred is [fn,:.] and MEMQ(fn,'(AND OR NOT)) => + pred is [fn,:.] and fn in '(AND OR NOT) => or/[getOfCategoryArgument x for x in rest pred] pred is ['ofCategory,'_*1,form] => form nil |