diff options
Diffstat (limited to 'dev-lisp/sbcl/files/0.9.9/sbcl-gentoo.patch')
| -rw-r--r-- | dev-lisp/sbcl/files/0.9.9/sbcl-gentoo.patch | 68 |
1 files changed, 0 insertions, 68 deletions
diff --git a/dev-lisp/sbcl/files/0.9.9/sbcl-gentoo.patch b/dev-lisp/sbcl/files/0.9.9/sbcl-gentoo.patch deleted file mode 100644 index 09a633db824d..000000000000 --- a/dev-lisp/sbcl/files/0.9.9/sbcl-gentoo.patch +++ /dev/null @@ -1,68 +0,0 @@ -diff -urN sbcl-0.9.9-orig/contrib/sb-bsd-sockets/sb-bsd-sockets.asd sbcl-0.9.9/contrib/sb-bsd-sockets/sb-bsd-sockets.asd ---- sbcl-0.9.9-orig/contrib/sb-bsd-sockets/sb-bsd-sockets.asd 2004-08-02 06:42:56.000000000 -0500 -+++ sbcl-0.9.9/contrib/sb-bsd-sockets/sb-bsd-sockets.asd 2006-01-28 20:01:55.989010096 -0600 -@@ -102,15 +102,3 @@ - - (defmethod perform :after ((o load-op) (c (eql (find-system :sb-bsd-sockets)))) - (provide 'sb-bsd-sockets)) -- --(defmethod perform ((o test-op) (c (eql (find-system :sb-bsd-sockets)))) -- (operate 'load-op 'sb-bsd-sockets-tests) -- (operate 'test-op 'sb-bsd-sockets-tests)) -- --(defsystem sb-bsd-sockets-tests -- :depends-on (sb-rt sb-bsd-sockets sb-posix) -- :components ((:file "tests"))) -- --(defmethod perform ((o test-op) (c (eql (find-system :sb-bsd-sockets-tests)))) -- (or (funcall (intern "DO-TESTS" (find-package "SB-RT"))) -- (error "test-op failed"))) -diff -urN sbcl-0.9.9-orig/contrib/sb-posix/sb-posix.asd sbcl-0.9.9/contrib/sb-posix/sb-posix.asd ---- sbcl-0.9.9-orig/contrib/sb-posix/sb-posix.asd 2006-01-24 11:14:50.000000000 -0600 -+++ sbcl-0.9.9/contrib/sb-posix/sb-posix.asd 2006-01-28 20:03:25.675375696 -0600 -@@ -89,33 +89,5 @@ - :package :sb-posix :depends-on ("defpackage")) - (:file "interface" :depends-on ("constants" "macros" "designator" "alien")))) - --(defsystem sb-posix-tests -- :depends-on (sb-rt) -- :components ((:file "posix-tests"))) -- - (defmethod perform :after ((o load-op) (c (eql (find-system :sb-posix)))) - (provide 'sb-posix)) -- --(defmethod perform ((o test-op) (c (eql (find-system :sb-posix)))) -- (operate 'load-op 'sb-posix-tests) -- (operate 'test-op 'sb-posix-tests)) -- --(defmethod perform ((o test-op) (c (eql (find-system :sb-posix-tests)))) -- (funcall (intern "DO-TESTS" (find-package "SB-RT"))) -- (let ((failures (funcall (intern "PENDING-TESTS" "SB-RT"))) -- (ignored-failures (loop for sym being the symbols of :sb-posix-tests -- if (search ".ERROR" (symbol-name sym)) -- collect sym))) -- (cond -- ((null failures) -- t) -- ((null (set-difference failures ignored-failures)) -- (warn "~@<some POSIX implementations return incorrect error values for ~ -- failing calls, but there is legitimate variation between ~ -- implementations too. If you think the errno ~ -- from your platform is valid, please contact the sbcl ~ -- developers; otherwise, please submit a bug report to your ~ -- kernel distributor~@:>") -- t) -- (t -- (error "non-errno tests failed!"))))) -diff -urN sbcl-0.9.9-orig/src/runtime/runtime.c sbcl-0.9.9/src/runtime/runtime.c ---- sbcl-0.9.9-orig/src/runtime/runtime.c 2006-01-24 11:15:45.000000000 -0600 -+++ sbcl-0.9.9/src/runtime/runtime.c 2006-01-28 20:04:04.549465936 -0600 -@@ -68,7 +68,7 @@ - #endif - - #ifndef SBCL_HOME --#define SBCL_HOME "/usr/local/lib/sbcl/" -+#define SBCL_HOME "/usr/lib/sbcl/" - #endif - - |