Hello community, here is the log from the commit of package sbcl for openSUSE:Factory checked in at 2014-09-03 18:22:36 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/sbcl (Old) and /work/SRC/openSUSE:Factory/.sbcl.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "sbcl" Changes: -------- --- /work/SRC/openSUSE:Factory/sbcl/sbcl.changes 2014-08-13 17:08:20.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.sbcl.new/sbcl.changes 2014-09-03 21:08:10.000000000 +0200 @@ -1,0 +2,29 @@ +Sun Aug 31 18:24:15 UTC 2014 - [email protected] + +- Update to version 1.2.3 + + * Enhancement: + + DOCUMENTATION works on instances of FUNCALLABLE-STANDARD-CLASS + + ASSERT reports arguments of calls to lexical functions in + additional to global functions. + + ASDF updated to 3.1.3 + + UIOP can be loaded without ASDF. + * Bug Fix: + + Some methods on CHANGE-CLASS did not finalize the new class + before accessing its class-precedence list. + + CHANGE-CLASS no longer fails on unbound slots in the source + object. + + CHANGE-CLASS signals an appropriate error when the destination + class is a FORWARD-REFERENCED-CLASS. + + CHANGE-CLASS no longer signals bogus TYPE-ERRORs for slots for + which initargs have been supplied. + + saving cores on ARM was broken since the introduction of GENCGC. + (lp#1349795) + + macroexpanding a backquoted expression involving ",." outside + of the compiler failed. (lp#1354623) + +- Backported from git for arm builds + 0002-Fix-array-bound-checking-with-negative-indexes-on-AR.patch + + +------------------------------------------------------------------- Old: ---- sbcl-1.2.2-source.tar.bz2 New: ---- 0002-Fix-array-bound-checking-with-negative-indexes-on-AR.patch sbcl-1.2.3-source.tar.bz2 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ sbcl.spec ++++++ --- /var/tmp/diff_new_pack.qh4RSZ/_old 2014-09-03 21:08:12.000000000 +0200 +++ /var/tmp/diff_new_pack.qh4RSZ/_new 2014-09-03 21:08:12.000000000 +0200 @@ -17,7 +17,7 @@ Name: sbcl -Version: 1.2.2 +Version: 1.2.3 Release: 0 Summary: Steel Bank Common Lisp License: SUSE-Public-Domain and BSD-3-Clause @@ -65,6 +65,8 @@ Patch6: sbcl-cast.patch # PATCH-FIX-OPENSUSE disable localport bsd sockets tests broken in kvm builds for some [email protected] Patch7: disable-localport-bsd-sockets-test.patch +#PATCH-FIX-UPSTREAM backported from git +Patch8: 0002-Fix-array-bound-checking-with-negative-indexes-on-AR.patch BuildRoot: %{_tmppath}/%{name}-%{version}-build @@ -88,6 +90,10 @@ %patch7 -p1 -b sockets %endif +%ifarch %arm +%patch8 -p1 -b arm +%endif + cp %{S:1} . cp %{S:2} . cp %{S:3} . ++++++ 0002-Fix-array-bound-checking-with-negative-indexes-on-AR.patch ++++++ >From 5e7d58ea89324d9c9d852fba2fb168b58b215f1a Mon Sep 17 00:00:00 2001 From: Stas Boukarev <[email protected]> Date: Sat, 30 Aug 2014 20:51:10 +0400 Subject: [PATCH 2/6] Fix array bound checking with negative indexes on ARM. Need to use an unsigned comparison, not a signed one, to weed out the negative numbers. Patch by Wendall Marvel. Signed-off-by: Togan Muftuoglu <[email protected]> --- src/compiler/arm/array.lisp | 2 +- tests/vector.pure.lisp | 10 ++++++++++ 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/src/compiler/arm/array.lisp b/src/compiler/arm/array.lisp index 6d652b4..7fc6622 100644 --- a/src/compiler/arm/array.lisp +++ b/src/compiler/arm/array.lisp @@ -73,7 +73,7 @@ (:generator 5 (let ((error (generate-error-code vop 'invalid-array-index-error array bound index))) (inst cmp index bound) - (inst b :ge error) + (inst b :hs error) (move result index)))) ;;;; Accessors/Setters diff --git a/tests/vector.pure.lisp b/tests/vector.pure.lisp index 30c349e..004a3b1 100644 --- a/tests/vector.pure.lisp +++ b/tests/vector.pure.lisp @@ -54,3 +54,13 @@ (compile nil `(lambda (a) (declare ((vector undefined-type) a)) (setf (svref a 0) 10)))) + +(with-test (:name :svref-negative-index) + (let ((vector #(1))) + (flet ((test (index) + (funcall (compile nil `(lambda (vector index) + (svref vector index))) + vector index))) + (assert-error (test -1)) + (assert (= (test 0) 1)) + (assert-error (test 1))))) -- 2.1.0 ++++++ sbcl-1.2.2-source.tar.bz2 -> sbcl-1.2.3-source.tar.bz2 ++++++ ++++ 31263 lines of diff (skipped) -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
