Revision: 4020 Author: hans URL: http://bknr.net/trac/changeset/4020

update from upstream U trunk/thirdparty/cl+ssl/CVS/Entries U trunk/thirdparty/cl+ssl/streams.lisp

Modified: trunk/thirdparty/cl+ssl/CVS/Entries =================================================================== --- trunk/thirdparty/cl+ssl/CVS/Entries 2008-10-27 06:26:46 UTC (rev 4019) +++ trunk/thirdparty/cl+ssl/CVS/Entries 2008-10-27 10:03:56 UTC (rev 4020) @@ -1,17 +1,17 @@ -/LICENSE/1.4/Tue Mar 11 05:01:27 2008// -/Makefile/1.1.1.1/Tue Mar 11 05:01:27 2008// -/bio.lisp/1.3/Tue Mar 11 05:01:27 2008// -/cl+ssl.asd/1.6/Tue Mar 11 05:01:27 2008// -/example.lisp/1.1/Tue Mar 11 05:01:27 2008// -/ffi-buffer-all.lisp/1.1/Tue Mar 11 05:01:27 2008// -/ffi-buffer-clisp.lisp/1.1/Tue Mar 11 05:01:27 2008// -/ffi-buffer.lisp/1.1/Tue Mar 11 05:01:27 2008// -/index.css/1.2/Tue Mar 11 05:01:27 2008// -/index.html/1.15/Tue Mar 11 05:01:27 2008// -/package.lisp/1.3/Tue Mar 11 05:01:27 2008// -/reload.lisp/1.5/Tue Mar 11 05:01:27 2008// -/test.lisp/1.4/Tue Mar 11 05:01:27 2008// -/conditions.lisp/1.3/Thu Apr 17 19:35:29 2008// -/ffi.lisp/1.8/Thu Apr 17 19:45:21 2008// -/streams.lisp/1.12/Thu Apr 17 19:45:19 2008// +/LICENSE/1.4/Mon Jun 23 13:16:26 2008// +/Makefile/1.1.1.1/Mon Jun 23 13:16:26 2008// +/bio.lisp/1.3/Mon Jun 23 13:16:26 2008// +/cl+ssl.asd/1.6/Mon Jun 23 13:16:26 2008// +/conditions.lisp/1.3/Mon Jun 23 13:16:26 2008// +/example.lisp/1.1/Mon Jun 23 13:16:26 2008// +/ffi-buffer-all.lisp/1.1/Mon Jun 23 13:16:26 2008// +/ffi-buffer-clisp.lisp/1.1/Mon Jun 23 13:16:26 2008// +/ffi-buffer.lisp/1.1/Mon Jun 23 13:16:26 2008// +/ffi.lisp/1.8/Mon Jun 23 13:16:26 2008// +/index.css/1.2/Mon Jun 23 13:16:26 2008// +/index.html/1.15/Mon Jun 23 13:16:26 2008// +/package.lisp/1.3/Mon Jun 23 13:16:26 2008// +/reload.lisp/1.5/Mon Jun 23 13:16:26 2008// +/test.lisp/1.4/Mon Jun 23 13:16:26 2008// +/streams.lisp/1.13/Mon Oct 27 10:03:01 2008// D

Modified: trunk/thirdparty/cl+ssl/streams.lisp =================================================================== --- trunk/thirdparty/cl+ssl/streams.lisp 2008-10-27 06:26:46 UTC (rev 4019) +++ trunk/thirdparty/cl+ssl/streams.lisp 2008-10-27 10:03:56 UTC (rev 4020) @@ -167,14 +167,14 @@ (defun install-nonblock-flag (fd) (ccl::fd-set-flags fd (logior (ccl::fd-get-flags fd) #$O_NONBLOCK)))

-#+sbcl +#+(and sbcl (not win32)) (defun install-nonblock-flag (fd) (sb-posix:fcntl fd sb-posix::f-setfl (logior (sb-posix:fcntl fd sb-posix::f-getfl) sb-posix::o-nonblock)))

-#-(or clozure-common-lisp sbcl) +#-(or clozure-common-lisp (and sbcl (not win32))) (defun install-nonblock-flag (fd) (declare (ignore fd)))