projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
1.0.29.54: Inline unboxed constants on x86[-64]
[sbcl.git]
/
src
/
code
/
numbers.lisp
diff --git
a/src/code/numbers.lisp
b/src/code/numbers.lisp
index
b8ef200
..
6a2dd70
100644
(file)
--- a/
src/code/numbers.lisp
+++ b/
src/code/numbers.lisp
@@
-358,7
+358,7
@@
(bignum-cross-fixnum ,op ,big-op)
(float-contagion ,op x y)
- ((complex complex) +
+ ((complex complex)
(canonical-complex (,op (realpart x) (realpart y))
(,op (imagpart x) (imagpart y))))
(((foreach bignum fixnum ratio single-float double-float