diff options
Diffstat (limited to 'src/boot/strap/translator.clisp')
| -rw-r--r-- | src/boot/strap/translator.clisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/boot/strap/translator.clisp b/src/boot/strap/translator.clisp index e330c5bd..6e73c749 100644 --- a/src/boot/strap/translator.clisp +++ b/src/boot/strap/translator.clisp @@ -962,8 +962,8 @@ ((SYMBOLP |y|) (SETQ |$used| (COND - ((MEMQ |y| |e|) |$used|) - ((MEMQ |y| |$used|) |$used|) + ((|symbolMember?| |y| |e|) |$used|) + ((|symbolMember?| |y| |$used|) |$used|) ((|defusebuiltin| |y|) |$used|) (T (UNION (LIST |y|) |$used|))))) (T NIL))) |