diff --git a/basis/unix/stat/freebsd/freebsd.factor b/basis/unix/stat/freebsd/freebsd.factor index 93ed1a42db..8535e9f3fd 100644 --- a/basis/unix/stat/freebsd/freebsd.factor +++ b/basis/unix/stat/freebsd/freebsd.factor @@ -26,3 +26,4 @@ STRUCT: stat FUNCTION: int stat ( c-string pathname, stat* buf ) ; FUNCTION: int lstat ( c-string pathname, stat* buf ) ; +FUNCTION: int fstat ( int fd, stat* buf ) ; diff --git a/basis/unix/stat/linux/32/32.factor b/basis/unix/stat/linux/32/32.factor index b3becff240..d0f60d7581 100644 --- a/basis/unix/stat/linux/32/32.factor +++ b/basis/unix/stat/linux/32/32.factor @@ -23,6 +23,8 @@ STRUCT: stat FUNCTION: int __xstat64 ( int ver, c-string pathname, stat* buf ) ; FUNCTION: int __lxstat64 ( int ver, c-string pathname, stat* buf ) ; +FUNCTION: int __fxstat64 ( int ver, int fd, stat* buf ) ; : stat ( pathname buf -- int ) [ 1 ] 2dip __xstat64 ; : lstat ( pathname buf -- int ) [ 1 ] 2dip __lxstat64 ; +: fstat ( fd buf -- int ) [ 1 ] 2dip __fxstat64 ; diff --git a/basis/unix/stat/linux/64/64.factor b/basis/unix/stat/linux/64/64.factor index 0862bf82a0..8913fc6556 100644 --- a/basis/unix/stat/linux/64/64.factor +++ b/basis/unix/stat/linux/64/64.factor @@ -23,6 +23,8 @@ STRUCT: stat FUNCTION: int __xstat64 ( int ver, c-string pathname, stat* buf ) ; FUNCTION: int __lxstat64 ( int ver, c-string pathname, stat* buf ) ; +FUNCTION: int __fxstat64 ( int ver, int fd, stat* buf ) ; : stat ( pathname buf -- int ) [ 1 ] 2dip __xstat64 ; : lstat ( pathname buf -- int ) [ 1 ] 2dip __lxstat64 ; +: fstat ( fd buf -- int ) [ 1 ] 2dip __fxstat64 ; diff --git a/basis/unix/stat/macosx/macosx.factor b/basis/unix/stat/macosx/macosx.factor index 024cd317e8..b96c1f4eed 100644 --- a/basis/unix/stat/macosx/macosx.factor +++ b/basis/unix/stat/macosx/macosx.factor @@ -28,6 +28,8 @@ STRUCT: stat FUNCTION: int stat64 ( c-string pathname, stat* buf ) ; FUNCTION: int lstat64 ( c-string pathname, stat* buf ) ; +FUNCTION: int fstat64 ( int fd, stat* buf ) ; : stat ( path buf -- n ) stat64 ; : lstat ( path buf -- n ) lstat64 ; +: fstat ( fd buf -- n ) fstat64 ; diff --git a/basis/unix/stat/netbsd/32/32.factor b/basis/unix/stat/netbsd/32/32.factor index bb0a403751..f89b67c25d 100644 --- a/basis/unix/stat/netbsd/32/32.factor +++ b/basis/unix/stat/netbsd/32/32.factor @@ -25,6 +25,8 @@ STRUCT: stat FUNCTION: int __stat30 ( c-string pathname, stat* buf ) ; FUNCTION: int __lstat30 ( c-string pathname, stat* buf ) ; +FUNCTION: int __fstat30 ( int fd, stat* buf ) ; : stat ( pathname buf -- n ) __stat30 ; : lstat ( pathname buf -- n ) __lstat30 ; +: fstat ( fd buf -- n ) __fstat30 ; diff --git a/basis/unix/stat/netbsd/64/64.factor b/basis/unix/stat/netbsd/64/64.factor index 010dcca724..d6e2b73a25 100644 --- a/basis/unix/stat/netbsd/64/64.factor +++ b/basis/unix/stat/netbsd/64/64.factor @@ -25,6 +25,8 @@ STRUCT: stat FUNCTION: int __stat13 ( c-string pathname, stat* buf ) ; FUNCTION: int __lstat13 ( c-string pathname, stat* buf ) ; +FUNCTION: int __fstat13 ( int fd, stat* buf ) ; : stat ( pathname buf -- n ) __stat13 ; : lstat ( pathname buf -- n ) __lstat13 ; +: fstat ( fd buf -- n ) __fstat13 ; diff --git a/basis/unix/stat/openbsd/openbsd.factor b/basis/unix/stat/openbsd/openbsd.factor index b562d085b3..6c805e82cb 100644 --- a/basis/unix/stat/openbsd/openbsd.factor +++ b/basis/unix/stat/openbsd/openbsd.factor @@ -27,3 +27,4 @@ STRUCT: stat FUNCTION: int stat ( c-string pathname, stat* buf ) ; FUNCTION: int lstat ( c-string pathname, stat* buf ) ; +FUNCTION: int fstat ( int fd, stat* buf ) ;