diff --git a/basis/unix/unix.factor b/basis/unix/unix.factor index fa61e9041a..afe24905d6 100644 --- a/basis/unix/unix.factor +++ b/basis/unix/unix.factor @@ -62,6 +62,8 @@ MACRO:: unix-system-call ( quot -- ) ] ] ; +HOOK: open-file os ( path flags mode -- fd ) + << { @@ -155,8 +157,6 @@ FUNCTION: int shutdown ( int fd, int how ) ; FUNCTION: int open ( char* path, int flags, int prot ) ; -HOOK: open-file os ( path flags mode -- fd ) - M: unix open-file [ open ] unix-system-call ; FUNCTION: DIR* opendir ( char* path ) ;