aboutsummaryrefslogtreecommitdiff
path: root/src/boot/strap/ast.clisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/strap/ast.clisp')
-rw-r--r--src/boot/strap/ast.clisp4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/boot/strap/ast.clisp b/src/boot/strap/ast.clisp
index eea10d77..fdd34743 100644
--- a/src/boot/strap/ast.clisp
+++ b/src/boot/strap/ast.clisp
@@ -3578,9 +3578,7 @@
(SETQ |unstableArgs| (CONS |a| |unstableArgs|))))))
(SETQ |bfVar#7| (CDR |bfVar#7|))
(SETQ |bfVar#8| (CDR |bfVar#8|))))
- (SETQ |op'|
- (COND ((|%hasFeature| :WIN32) (CONCAT "_" (SYMBOL-NAME |op'|)))
- (T (SYMBOL-NAME |op'|))))
+ (SETQ |op'| (SYMBOL-NAME |op'|))
(COND
((NULL |unstableArgs|)
(LIST