aboutsummaryrefslogtreecommitdiff
path: root/src/interp/g-opt.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/g-opt.boot')
-rw-r--r--src/interp/g-opt.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/g-opt.boot b/src/interp/g-opt.boot
index 782ab874..2c13097d 100644
--- a/src/interp/g-opt.boot
+++ b/src/interp/g-opt.boot
@@ -396,6 +396,6 @@ for x in '( (call optCall) _
(RECORDELT optRECORDELT)_
(SETRECORDELT optSETRECORDELT)_
(RECORDCOPY optRECORDCOPY)) _
- repeat MAKEPROP(CAR x,'OPTIMIZE,CREATE_-SBC CADR x)
+ repeat MAKEPROP(CAR x,'OPTIMIZE, CADR x)
--much quicker to call functions if they have an SBC