diff --git a/extra/unix/stat/stat.factor b/extra/unix/stat/stat.factor index 5864d33741..2bc60105b4 100644 --- a/extra/unix/stat/stat.factor +++ b/extra/unix/stat/stat.factor @@ -1,6 +1,6 @@ USING: kernel system combinators alien.syntax alien.c-types - math io.unix.backend vocabs.loader ; + math io.unix.backend vocabs.loader unix ; IN: unix.stat @@ -67,5 +67,5 @@ FUNCTION: int mkdir ( char* path, mode_t mode ) ; : link-status ( pathname -- stat ) "stat" dup >r - [ lstat ] unix-system-call + [ lstat ] unix-system-call drop r> ;