From: Kevin Rosenberg <kevin@rosenberg.net>
Date: Sun, 21 Sep 2003 01:43:35 +0000 (+0000)
Subject: fix errant #\! from debugging code
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=c082e230ab4ac57f733405a7acb8c168e05c47d1;p=sbcl.git

fix errant #\! from debugging code
---

diff --git a/contrib/sb-bsd-sockets/sb-bsd-sockets.asd b/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
index 09a1054..87361fb 100644
--- a/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
+++ b/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
@@ -34,7 +34,7 @@
 		  (sb-ext:posix-getenv "LDFLAGS")
 		#+sunos "-shared -lresolv -lsocket -lnsl"
 		#+darwin "-bundle"
-		#-(or darwin sunos) "-shared!")
+		#-(or darwin sunos) "-shared")
 	      dso-name
 	      (mapcar #'unix-name
 		      (mapcan (lambda (c)
@@ -53,7 +53,7 @@
       (= 0 (run-shell-command "gcc ~A -o ~S -c ~S"
 			      (if (sb-ext:posix-getenv "CFLAGS")
 				  (sb-ext:posix-getenv "CFLAGS")
-				"-fPIC!")
+				"-fPIC")
 			      (unix-name (car (output-files op c)))
 			      (unix-name (component-pathname c))))
     (error 'operation-error :operation op :component c)))