Hello community, here is the log from the commit of package sbcl for openSUSE:Factory checked in at 2014-08-13 17:08:13 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 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-07-02 15:04:56.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.sbcl.new/sbcl.changes 2014-08-13 17:08:20.000000000 +0200 @@ -1,0 +2,34 @@ +Tue Aug 12 07:48:47 UTC 2014 - toganm@opensuse.org + +- disable-localport-bsd-sockets-test.patch + * disable localport bsd sockets tests broken in kvm builds for + openSUSE releases > 13.1 + + +------------------------------------------------------------------- +Mon Jul 28 13:48:15 UTC 2014 - toganm@opensuse.org + +- Update to version 1.2.2 + + * incompatible change: the #\` ("backquote") reader macro was + reimplemented to support robust pretty-printing. Reading a form + involving #\` produces an invocation of the QUASIQUOTE ordinary + macro which may contain subforms that are not lists. Code that + unportably attempts operations on un-evaluated forms resulting + therefrom, e.g. (SUBST a b (read-from-string "`(x (,y))")) + might generate incorrect results and/or errors. + * Enhancement: + + support for GNU/kFreeBSD x86. + + ATOMIC-INCF and ATOMIC-DECF can operate on (CAR + x), (CDR x) and DEFGLOBAL variables of type fixnum. + + enhancement: arithmetic constant reduction is now performed on + defconstant constants too. (lp#1337069). + * Bug Fix: + + certain ftype proclamations containing &optional t &rest t no + longer cause subsequent definitions to signal bogus + style-warnings. + + #\Bell and #\Bel now read to different characters. (lp#1319452). + + CAS SYMBOL-VALUE on locally special variables didn't work. + (lp#1098355) + +------------------------------------------------------------------- Old: ---- sbcl-1.2.1-source.tar.bz2 New: ---- disable-localport-bsd-sockets-test.patch sbcl-1.2.2-source.tar.bz2 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ sbcl.spec ++++++ --- /var/tmp/diff_new_pack.1fnUAD/_old 2014-08-13 17:08:21.000000000 +0200 +++ /var/tmp/diff_new_pack.1fnUAD/_new 2014-08-13 17:08:21.000000000 +0200 @@ -17,7 +17,7 @@ Name: sbcl -Version: 1.2.1 +Version: 1.2.2 Release: 0 Summary: Steel Bank Common Lisp License: SUSE-Public-Domain and BSD-3-Clause @@ -63,6 +63,9 @@ Patch5: sbcl-disable-frlock-test.patch # PATCH-FIX-UPSTREAM add missing cast Patch6: sbcl-cast.patch +# PATCH-FIX-OPENSUSE disable localport bsd sockets tests broken in kvm builds for some toganm@opensuse.org +Patch7: disable-localport-bsd-sockets-test.patch + BuildRoot: %{_tmppath}/%{name}-%{version}-build %description @@ -79,7 +82,11 @@ %patch3 -p1 -b install %patch4 -p1 -b personality %patch5 -p1 -b frlock -%patch6 -p1 +%patch6 -p1 -b cast + +%if 0%{suse_version} > 1310 +%patch7 -p1 -b sockets +%endif cp %{S:1} . cp %{S:2} . ++++++ disable-localport-bsd-sockets-test.patch ++++++ --- contrib/sb-bsd-sockets/tests.lisp | 50 +++++++++++++++++++------------------- 1 file changed, 25 insertions(+), 25 deletions(-) --- a/contrib/sb-bsd-sockets/tests.lisp +++ b/contrib/sb-bsd-sockets/tests.lisp @@ -178,36 +178,36 @@ ;;; the message ended up #-win32 -(deftest simple-local-client - (progn +;;(deftest simple-local-client +;; (progn ;; SunOS (Solaris) and Darwin systems don't have a socket at ;; /dev/log. We might also be building in a chroot or ;; something, so don't fail this test just because the file is ;; unavailable, or if it's a symlink to some weird character ;; device. - (when (block nil - (handler-bind ((sb-posix:syscall-error - (lambda (e) - (declare (ignore e)) - (return nil)))) - (sb-posix:s-issock - (sb-posix::stat-mode (sb-posix:stat "/dev/log"))))) - (let ((s (make-instance 'local-socket :type :datagram))) - (format t "Connecting ~A... " s) - (finish-output) - (handler-case - (socket-connect s "/dev/log") - (sb-bsd-sockets::socket-error () - (setq s (make-instance 'local-socket :type :stream)) - (format t "failed~%Retrying with ~A... " s) - (finish-output) - (socket-connect s "/dev/log"))) - (format t "ok.~%") - (let ((stream (socket-make-stream s :input t :output t :buffering :none))) - (format stream - "<7>bsd-sockets: Don't panic. We're testing local-domain client code; this message can safely be ignored")))) - t) - t) +;; (when (block nil +;; (handler-bind ((sb-posix:syscall-error +;; (lambda (e) +;; (declare (ignore e)) +;; (return nil)))) +;; (sb-posix:s-issock +;; (sb-posix::stat-mode (sb-posix:stat "/dev/log"))))) +;; (let ((s (make-instance 'local-socket :type :datagram))) +;; (format t "Connecting ~A... " s) +;; (finish-output) +;; (handler-case +;; (socket-connect s "/dev/log") +;; (sb-bsd-sockets::socket-error () +;; (setq s (make-instance 'local-socket :type :stream)) +;; (format t "failed~%Retrying with ~A... " s) +;; (finish-output) +;; (socket-connect s "/dev/log"))) +;; (format t "ok.~%") +;; (let ((stream (socket-make-stream s :input t :output t :buffering :none))) +;; (format stream +;; "<7>bsd-sockets: Don't panic. We're testing local-domain client code; this message can safely be ignored")))) +;; t) +;; t) ;;; these require that the internet (or bits of it, at least) is available ++++++ sbcl-1.1.13-personality.patch ++++++ --- /var/tmp/diff_new_pack.1fnUAD/_old 2014-08-13 17:08:21.000000000 +0200 +++ /var/tmp/diff_new_pack.1fnUAD/_new 2014-08-13 17:08:21.000000000 +0200 @@ -4,7 +4,7 @@ --- a/src/runtime/linux-os.c +++ b/src/runtime/linux-os.c -@@ -288,6 +288,10 @@ os_init(char *argv[], char *envp[]) +@@ -287,6 +287,10 @@ os_init(char *argv[], char *envp[]) setenv("SBCL_IS_RESTARTING", "T", 1); runtime[i] = '\0'; execv(runtime, argv); ++++++ sbcl-1.2.1-source.tar.bz2 -> sbcl-1.2.2-source.tar.bz2 ++++++ ++++ 8027 lines of diff (skipped) ++++++ sbcl-cast.patch ++++++ --- /var/tmp/diff_new_pack.1fnUAD/_old 2014-08-13 17:08:24.000000000 +0200 +++ /var/tmp/diff_new_pack.1fnUAD/_new 2014-08-13 17:08:24.000000000 +0200 @@ -1,8 +1,10 @@ -Index: sbcl-1.2.0/src/runtime/gencgc.c -=================================================================== ---- sbcl-1.2.0.orig/src/runtime/gencgc.c -+++ sbcl-1.2.0/src/runtime/gencgc.c -@@ -3545,7 +3545,7 @@ garbage_collect_generation(generation_in +--- + src/runtime/gencgc.c | 2 +- + 1 file changed, 1 insertion(+), 1 deletion(-) + +--- a/src/runtime/gencgc.c ++++ b/src/runtime/gencgc.c +@@ -3540,7 +3540,7 @@ garbage_collect_generation(generation_in while (pin_list != NIL) { struct cons *list_entry = (struct cons *)native_pointer(pin_list); -- To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org For additional commands, e-mail: opensuse-commit+help@opensuse.org