[usocket-cvs] r404 - usocket/trunk/backend

[ehuelsmann at common-lisp.net]

Author: ehuelsmann
Date: Tue Jul 29 17:18:10 2008
New Revision: 404

Modified:
   usocket/trunk/backend/armedbear.lisp
Log:
Remove invalid IGNORE declaration.

Modified: usocket/trunk/backend/armedbear.lisp
==============================================================================
--- usocket/trunk/backend/armedbear.lisp	(original)
+++ usocket/trunk/backend/armedbear.lisp	Tue Jul 29 17:18:10 2008
@@ -188,7 +188,6 @@
 
 (defun socket-connect (host port &key (element-type 'character)
                        timeout deadline (nodelay nil nodelay-specified))
-  (declare (ignore nodelay timeout))
   (when deadline (unsupported 'deadline 'socket-connect))
 
   (let ((usock))