Fix Unix I/O on 64-bit

2008-07-05 03:47:09 -05:00 · 2008-07-05 03:47:09 -05:00 · 33655a7044
parent 44c1c1f679
commit 33655a7044
1 changed files with 1 additions and 1 deletions
--- a/extra/io/unix/backend/backend.factor
+++ b/extra/io/unix/backend/backend.factor
@ -168,7 +168,7 @@ M: stdin dispose

 : wait-for-stdin ( stdin -- n )
    [ control>> CHAR: X over io:stream-write1 io:stream-flush ]
-    [ size>> "uint" heap-size swap io:stream-read *uint ]
+    [ size>> "size_t" heap-size swap io:stream-read *uint ]
    bi ;

 :: refill-stdin ( buffer stdin size -- )