[nio-cvs] r90 - branches/home/psmith/restructure/src/io

[psmith at common-lisp.net]

Author: psmith
Date: Sat Feb 17 19:37:51 2007
New Revision: 90

Modified:
   branches/home/psmith/restructure/src/io/async-fd.lisp
Log:
close on EOF

Modified: branches/home/psmith/restructure/src/io/async-fd.lisp
==============================================================================
--- branches/home/psmith/restructure/src/io/async-fd.lisp	(original)
+++ branches/home/psmith/restructure/src/io/async-fd.lisp	Sat Feb 17 19:37:51 2007
@@ -101,7 +101,8 @@
 		 (close-fd (read-fd state-machine))
 		 (error 'read-error :errno errno)))))
        ((= new-bytes 0)
-	nil);;(throw 'end-of-file nil)
+        (format-log t "async-fd:read-more - EOF on ~A~%" state-machine)
+        (error 'read-error));;(throw 'end-of-file nil)
        (t
 	  ;;Update buffer position
 	  (inc-position foreign-read-buffer new-bytes)