aboutsummaryrefslogtreecommitdiff
path: root/src/boot/ast.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/ast.boot')
-rw-r--r--src/boot/ast.boot4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/boot/ast.boot b/src/boot/ast.boot
index 8d5a6d57..fdbb1296 100644
--- a/src/boot/ast.boot
+++ b/src/boot/ast.boot
@@ -1854,9 +1854,7 @@ genSBCLnativeTranslation(op,s,t,op') ==
if needsStableReference? x then
unstableArgs := [a,:unstableArgs]
- op' :=
- %hasFeature KEYWORD::WIN32 => strconc('"__",symbolName op')
- symbolName op'
+ op' := symbolName op'
unstableArgs = nil =>
[["DEFUN",op,args,