Note: the error 10038 was fixed by r533. I need to pass a handle but file descriptor to Win32 function "WSAEventSelect".
--binghe > Hi, Elliott > > Thanks for your attention. > > Yesterday I used a simple test: > > * (defparameter s (usocket:socket-connect "common-lisp.net" 80)) > * (time (wait-for-input s :timeout 3)) > > The goal is to make sure WAIT-FOR-INPUT successfully wait 3 seconds. But when > WAIT-FOR-INPUT calling win32 API function "WSAEventSelect" [1] on the new > created socket handle, it report WSA error 10038 (WSAENOTSOCK, "The > descriptor is not a socket"), a funny result ... > > I followed the same method by USOCKET's LispWorks/win32 port. I think I need > to do some tests in pure C code. Not much familiar with Winsock 2. > > --binghe > > [1] http://msdn.microsoft.com/en-us/library/ms741576(v=VS.85).aspx > > 在 2010-7-6，12:22， Elliott Slaughter 写道： > >> Thanks. I'll take it out for a test drive soon. (Are there any known issues >> you're trying to solve right now?) >> >> On Mon, Jul 5, 2010 at 7:39 PM, Chun Tian (binghe) <binghe.l...@gmail.com> >> wrote: >> Hi there >> >> I'm working on it, and the initial version of WAIT-FOR-INPUT-INTERNAL for >> SBCL/win32 has been committed into USOCKET trunk [1] on yesterday. Now I'm >> fixing bugs in it. Maybe you want to help me figure out any issue in my code. >> >> Hope these new code could get stable in a week. Obviously, the goal is to >> make Hunchentoot running in SBCL/win32. >> >> --binghe >> >> [1] svn://common-lisp.net/project/usocket/svn/usocket/trunk >> >> 在 2010-7-1，23:45， Haris Bogdanović 写道： >> >>> I installed linux as my virtual machine so I'll manage till you finish >>> wndows version because in linux it works without a problem. >>> I wrote wrongly atarting a hunchentoot server. >>> It's (hunchentoot:start (make-instance 'hunchentoot:acceptor :port 8080)) >>> instead of (hunchentoot:start (make-instance '(hunchentoot:acceptor :port >>> 8080))) >>> but anyway it doesn't work in windows but in linux it does. >>> It would be nice if you could mail me when yoiu finish windows version ? >>> How long do you expect it will take you to finish that approximatelly ? >>> I would like to help you but I'm pretty new to lisp, >>> I don't know would I be competent for that. >>> >>> Thanks >> >> >> _______________________________________________ >> usocket-devel mailing list >> usocket-devel@common-lisp.net >> http://common-lisp.net/cgi-bin/mailman/listinfo/usocket-devel >> >> >> >> -- >> Elliott Slaughter >> >> "Don't worry about what anybody else is going to do. The best way to predict >> the future is to invent it." - Alan Kay > _______________________________________________ usocket-devel mailing list usocket-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/usocket-devel
