Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
-
909ad007
by Raymond Toy at 2016-01-17T20:57:41Z
1 changed file:
Changes:
--- a/src/code/bignum.lisp
+++ b/src/code/bignum.lisp
@@ -3721,5 +3721,5 @@ friends is working.
(%shrd x carry-in shift)
#-x86
(ldb (byte vm:word-bits 0)
- (logior (ash x (- shift))
- (ash carry-in (- vm:word-bits shift)))))
+ (logior (ash x (- shift))
+ (ash carry-in (- vm:word-bits shift)))))