diff --git a/library/io/windows/load.factor b/library/io/windows/load.factor index 16488c031c..b84ace5781 100644 --- a/library/io/windows/load.factor +++ b/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" diff --git a/library/io/windows/stream.factor b/library/io/windows/stream.factor index dde2306c7d..6a1624050b 100644 --- a/library/io/windows/stream.factor +++ b/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 diff --git a/library/windows/load.factor b/library/windows/load.factor index 4f242fbe3f..9615272a80 100644 --- a/library/windows/load.factor +++ b/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" } ;