
30 Jul
2008
30 Jul
'08
10:57 p.m.
Author: ehuelsmann Date: Wed Jul 30 18:57:42 2008 New Revision: 408 Modified: usocket/trunk/backend/sbcl.lisp Log: Revert too much added in the last commit. Modified: usocket/trunk/backend/sbcl.lisp ============================================================================== --- usocket/trunk/backend/sbcl.lisp (original) +++ usocket/trunk/backend/sbcl.lisp Wed Jul 30 18:57:42 2008 @@ -61,9 +61,6 @@ "#define CONS(x, y) make_cons((x), (y))" "#define MAKE_INTEGER(x) make_integer((x))") - (defconstant sb-bsd-sockets::sockopt-tcp-nodelay (sockopt-tcp-nodelay)) - (export sb-bsd-sockets::sockopt-tcp-nodelay) - (defun fd-setsize () (ffi:c-inline () () :fixnum "FD_SETSIZE" :one-liner t))