factor: Rename MACRO: and MACRO: to have quot as the output in stack effects.

[factor.git] / basis / unix / unix.factor

diff --git a/basis/unix/unix.factor b/basis/unix/unix.factor
index 6108cd457e3d0bb18a2359b0a059f577a688b92d..0fb4de728de93290d3ca791b5a9b7511b05a322b 100644 (file)
--- a/basis/unix/unix.factor
+++ b/basis/unix/unix.factor
@@ -17,7 +17,7 @@ ERROR: unix-system-call-error args errno message word ;
         [ not ]
     } 1|| ;
 
-MACRO:: unix-system-call ( quot -- )
+MACRO:: unix-system-call ( quot -- quot )
     quot inputs :> n
     quot first :> word
     0 :> ret!
@@ -40,7 +40,7 @@ MACRO:: unix-system-call ( quot -- )
         ] if
     ] ;
 
-MACRO:: unix-system-call-allow-eintr ( quot -- )
+MACRO:: unix-system-call-allow-eintr ( quot -- quot )
     quot inputs :> n
     quot first :> word
     0 :> ret!