io.sockets.windows: get the handle from the handle.

2012-05-29 11:20:55 -07:00 · 2012-05-29 11:20:55 -07:00 · d896fb2ee4
parent 95e647fc1e
commit d896fb2ee4
1 changed files with 1 additions and 1 deletions
--- a/basis/io/sockets/windows/windows.factor
+++ b/basis/io/sockets/windows/windows.factor
@ -9,7 +9,7 @@ FROM: namespaces => get ;
 IN: io.sockets.windows

 : set-socket-option ( handle level opt -- )
-    1 int <ref> dup byte-length setsockopt socket-error ;
+    [ handle>> ] 2dip 1 int <ref> dup byte-length setsockopt socket-error ;

 M: windows addrinfo-error ( n -- )
    winsock-return-check ;