fix errno numbers across platforms, some UI work

diff --git a/library/unix/io.factor b/library/unix/io.factor
index 5ba5735f65d6359adcdb5a8a309610d7d914847f..92ac6f6d254744a704b13053f421d495e5f4b5e7 100644 (file)
--- a/library/unix/io.factor
+++ b/library/unix/io.factor
@@ -76,9 +76,6 @@ M: port set-timeout ( timeout port -- )
 : pending-error ( port -- )
     dup port-error f rot set-port-error throw ;
 
-: EAGAIN 11 ;
-: EINTR 4 ;
-
 : defer-error ( port -- ? )
     #! Return t if it is an unrecoverable error.
     err_no dup EAGAIN = over EINTR = or [

diff --git a/library/unix/syscalls-freebsd.factor b/library/unix/syscalls-freebsd.factor
index 25af8664c3c8c7c9143a94e283be22a8baf3f49c..fa9e3a7be06709aba98282504635bb019a1fa27b 100644 (file)
--- a/library/unix/syscalls-freebsd.factor
+++ b/library/unix/syscalls-freebsd.factor
@@ -31,3 +31,7 @@ BEGIN-STRUCT: sockaddr-in
     FIELD: in_addr_t addr
     FIELD: longlong unused
 END-STRUCT
+
+: EINTR HEX: 4 ;
+: EAGAIN HEX: 23 ;
+: EINPROGRESS HEX: 24 ;

diff --git a/library/unix/syscalls-linux.factor b/library/unix/syscalls-linux.factor
index 9d449707e2ef76dba3f15ebd5854b4289836edd8..d10fcaeefc8c1faf3908b296eb0c795477013219 100644 (file)
--- a/library/unix/syscalls-linux.factor
+++ b/library/unix/syscalls-linux.factor
@@ -31,3 +31,7 @@ BEGIN-STRUCT: sockaddr-in
     FIELD: in_addr_t addr
     FIELD: longlong unused
 END-STRUCT
+
+: EINTR HEX: 4 ;
+: EAGAIN HEX: b ;
+: EINPROGRESS HEX: 73 ;

diff --git a/library/unix/syscalls-macosx.factor b/library/unix/syscalls-macosx.factor
index bfa5c557587bba660a47f94712ac3b79b7b55861..93b28adbe35938184846870da603f9013a9b782e 100644 (file)
--- a/library/unix/syscalls-macosx.factor
+++ b/library/unix/syscalls-macosx.factor
@@ -31,3 +31,7 @@ BEGIN-STRUCT: sockaddr-in
     FIELD: in_addr_t addr
     FIELD: longlong unused
 END-STRUCT
+
+: EINTR HEX: 4 ;
+: EAGAIN HEX: 23 ;
+: EINPROGRESS HEX: 24 ;

diff --git a/library/unix/syscalls.factor b/library/unix/syscalls.factor
index c1d3c84dd0bdb3f21c072fe1df7e96bdcd974a32..a423357fec8e91cf1a7e25edbfe79528f6ff2ff0 100644 (file)
--- a/library/unix/syscalls.factor
+++ b/library/unix/syscalls.factor
@@ -5,8 +5,6 @@ USING: alien errors kernel math namespaces ;
 
 ! Alien wrappers for various Unix libc functions.
 
-: EINPROGRESS 36 ;
-
 LIBRARY: factor
 FUNCTION: int err_no ( ) ;