From: Christophe Rhodes Date: Mon, 17 May 2004 09:57:28 +0000 (+0000) Subject: 0.8.10.28: X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=70c980b4c9285f4d518c80d314baac0da511c1bf;p=sbcl.git 0.8.10.28: Really fix bug (fixed for ppc in 0.8.7.56) on alpha ... the use of branch delay slots on the alpha values defaulting turned out not to be the only error; in addition, s/blt/ble/. ... now the alpha passes compiler.impure-cload.lisp --- diff --git a/NEWS b/NEWS index 79a7535..3826b23 100644 --- a/NEWS +++ b/NEWS @@ -2447,7 +2447,7 @@ changes in sbcl-0.8.11 relative to sbcl-0.8.10: for objects of type REAL. Make it so. ** SXHASH is specified (infelicitously) to respect similarity, which means that (SXHASH 0.0) must equal (SXHASH -0.0). Make - it so. + it so. (thanks to Markus Ziegler) planned incompatible changes in 0.8.x: * (not done yet, but planned:) When the profiling interface settles diff --git a/src/compiler/alpha/call.lisp b/src/compiler/alpha/call.lisp index 79d4c7d..a164718 100644 --- a/src/compiler/alpha/call.lisp +++ b/src/compiler/alpha/call.lisp @@ -306,7 +306,7 @@ default-value-8 (tn (tn-ref-tn val))) (defaults (cons default-lab tn)) - (inst blt temp default-lab) + (inst ble temp default-lab) (inst ldl move-temp (* i n-word-bytes) ocfp-tn) (inst subq temp (fixnumize 1) temp) (store-stack-tn tn move-temp))) diff --git a/version.lisp-expr b/version.lisp-expr index 664ea91..29abd55 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.8.10.27" +"0.8.10.28"