From: Christophe Rhodes <csr21@cam.ac.uk>
Date: Sat, 22 Feb 2003 23:00:18 +0000 (+0000)
Subject: 0.7.12.53:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=bb7c5beef3a2c45f0ff99f8038409dc4787aa295;p=sbcl.git

0.7.12.53:
	Fix SunOS build as per sbcl-devel 2003-03-22
	... remove last bashism in build scripts;
	... allow building of foreign loading on SunOS;
	... frob sb-bsd-sockets tests so that they pass on SunOS even in the
		absence of a /dev/log socket.
---

diff --git a/clean.sh b/clean.sh
index 46ccee3..351150b 100755
--- a/clean.sh
+++ b/clean.sh
@@ -97,4 +97,5 @@ find . \( \
 	-name '*.html' -o \
 	-name 'TAGS' -o \
 	-name 'tags' -o \
+	-name 'test-passed' -o \
 	-name 'local-target-features.lisp-expr' \) -print | xargs rm -f
diff --git a/contrib/sb-bsd-sockets/sb-bsd-sockets.asd b/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
index a5ab7d2..e2ec108 100644
--- a/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
+++ b/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
@@ -61,8 +61,8 @@
   (let ((dso-name (unix-name (car (output-files operation dso)))))
     (unless (zerop
 	     (run-shell-command
-	      "gcc -shared -o ~S ~{~S ~}"
-	      dso-name
+	      #-sunos "gcc -shared -o ~S ~{~S ~}"
+	      #+sunos "gcc -shared -lresolv -lsocket -lnsl -o ~S ~{~S ~}" dso-name
 	      (mapcar #'unix-name
 		      (mapcan (lambda (c)
 				(output-files operation c))
diff --git a/contrib/sb-bsd-sockets/tests.lisp b/contrib/sb-bsd-sockets/tests.lisp
index deb208f..c6c3c76 100644
--- a/contrib/sb-bsd-sockets/tests.lisp
+++ b/contrib/sb-bsd-sockets/tests.lisp
@@ -135,7 +135,7 @@ A fairly rudimentary test that connects to the syslog socket and sends a
 message.  Priority 7 is kern.debug; you'll probably want to look at
 /etc/syslog.conf or local equivalent to find out where the message ended up
 ||#
-
+#-sunos
 (deftest simple-local-client
     (let ((s (make-instance 'local-socket :type :datagram)))
       (format t "~A~%" s)
diff --git a/make-target-contrib.sh b/make-target-contrib.sh
index 50ae243..cc67a29 100644
--- a/make-target-contrib.sh
+++ b/make-target-contrib.sh
@@ -17,7 +17,8 @@
 # build directory.  Right now, however, where there are dependencies
 # between contrib packages, we want the _uninstalled_ versions to be
 # found
-export SBCL_HOME=`pwd`/contrib
+SBCL_HOME=`pwd`/contrib
+export SBCL_HOME
 
 SBCL="`pwd`/src/runtime/sbcl --noinform --core `pwd`/output/sbcl.core --userinit /dev/null --sysinit /dev/null --disable-debugger"
 SBCL_BUILDING_CONTRIB=1
diff --git a/src/code/foreign.lisp b/src/code/foreign.lisp
index a02162c..87d8939 100644
--- a/src/code/foreign.lisp
+++ b/src/code/foreign.lisp
@@ -68,7 +68,7 @@
 ;;; work on any ELF system with dlopen(3) and dlsym(3)
 ;;; It also works on OpenBSD, which isn't ELF, but is otherwise modern
 ;;; enough to have a fairly well working dlopen/dlsym implementation.
-#-(or linux FreeBSD OpenBSD)
+#-(or linux sunos FreeBSD OpenBSD)
 (macrolet ((define-unsupported-fun (fun-name)
 	     `(defun ,fun-name (&rest rest)
 		"unsupported on this system"
@@ -76,7 +76,7 @@
 		(error 'unsupported-operator :name ',fun-name))))
   (define-unsupported-fun load-1-foreign)
   (define-unsupported-fun load-foreign))
-#+(or linux FreeBSD OpenBSD)
+#+(or linux sunos FreeBSD OpenBSD)
 (progn
 
 ;;; flags for dlopen()
diff --git a/version.lisp-expr b/version.lisp-expr
index a755e64..3a17e7d 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -18,4 +18,4 @@
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
 
-"0.7.12.52"
+"0.7.12.53"