[Sbcl-commits] CVS: sbcl/src/code host-c-call.lisp,1.11,1.12

[Gabor M. <me...@us...>]

Update of /cvsroot/sbcl/sbcl/src/code
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv1988/src/code

Modified Files:
	host-c-call.lisp 
Log Message:
1.0.25.15: less compilation warnings


Index: host-c-call.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/code/host-c-call.lisp,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- host-c-call.lisp	19 Apr 2007 12:01:27 -0000	1.11
+++ host-c-call.lisp	16 Feb 2009 21:27:27 -0000	1.12
@@ -44,6 +44,8 @@
 
 (defun c-string-needs-conversion-p (type)
   #+sb-xc-host
+  (declare (ignore type))
+  #+sb-xc-host
   t
   #-sb-xc-host
   (let ((external-format (sb!impl::get-external-format