[Sbcl-commits] CVS: sbcl/contrib/sb-bsd-sockets sb-bsd-sockets.asd,1.4,1.5 tests.lisp,1.3,1.4

[Christophe R. <cr...@us...>]

Update of /cvsroot/sbcl/sbcl/contrib/sb-bsd-sockets
In directory sc8-pr-cvs1:/tmp/cvs-serv31014/contrib/sb-bsd-sockets

Modified Files:
	sb-bsd-sockets.asd tests.lisp 
Log Message:
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.


Index: sb-bsd-sockets.asd
===================================================================
RCS file: /cvsroot/sbcl/sbcl/contrib/sb-bsd-sockets/sb-bsd-sockets.asd,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- sb-bsd-sockets.asd	21 Feb 2003 16:21:04 -0000	1.4
+++ sb-bsd-sockets.asd	22 Feb 2003 23:00:24 -0000	1.5
@@ -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))

Index: tests.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/contrib/sb-bsd-sockets/tests.lisp,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- tests.lisp	21 Feb 2003 16:21:04 -0000	1.3
+++ tests.lisp	22 Feb 2003 23:00:25 -0000	1.4
@@ -135,7 +135,7 @@
 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)