win32 fixes

library/io/windows/load.factor

@@ -2,7 +2,6 @@ REQUIRES: library/windows library/io/buffer ;
 
 PROVIDE: library/io/windows {
     "errors.factor"
-    "winsock.factor"
     "io-internals.factor"
     "stream.factor"
     "server.factor"

library/io/windows/stream.factor

@@ -69,8 +69,7 @@ TUPLE: win32-stream handle in-buffer out-buffer fileptr file-size timeout cutoff
     ] [
         pick dupd consume-input
         dup empty? [
-            2drop >string-or-f nip dup f =
-            [ "Stream closed" throw ] when ! XXX: what do we do here?
+            2drop >string-or-f nip
         ] [
             swapd over >r nappend r>
             [ length - ] keep swap do-read-count

library/windows/load.factor

@@ -11,6 +11,7 @@ PROVIDE: library/windows {
     "user32-structs.factor"
     "user32-types.factor"
     "user32.factor"
+    "winsock.factor"
     "opengl32.factor"
     "utils.factor"
 } ;