From bbaa8b95bdf9c1808458679fa6e42f64d15f917a Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Tue, 11 Nov 2008 13:30:12 -0600 Subject: [PATCH] mounted -> file-systems --- basis/unix/statfs/linux/linux.factor | 2 +- basis/unix/statfs/macosx/macosx.factor | 2 +- basis/unix/statfs/statfs.factor | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/basis/unix/statfs/linux/linux.factor b/basis/unix/statfs/linux/linux.factor index aae8d09145..d2d892cfb7 100644 --- a/basis/unix/statfs/linux/linux.factor +++ b/basis/unix/statfs/linux/linux.factor @@ -32,7 +32,7 @@ frequency pass-number ; ] with-scope [ mtab-csv>mtab-entry ] map ; -M: linux mounted +M: linux file-systems parse-mtab [ [ mount-point>> file-system-info ] keep { diff --git a/basis/unix/statfs/macosx/macosx.factor b/basis/unix/statfs/macosx/macosx.factor index 6bf09fcdc0..7c30c4b9d4 100644 --- a/basis/unix/statfs/macosx/macosx.factor +++ b/basis/unix/statfs/macosx/macosx.factor @@ -122,7 +122,7 @@ TUPLE: macosx-file-system-info < file-system-info block-size io-size blocks blocks-free blocks-available files files-free file-system-id owner type-id flags filesystem-subtype ; -M: macosx mounted ( -- array ) +M: macosx file-systems ( -- array ) f dup 0 getmntinfo64 dup io-error [ *void* ] dip "statfs64" heap-size [ * memory>byte-array ] keep group diff --git a/basis/unix/statfs/statfs.factor b/basis/unix/statfs/statfs.factor index e77ef37b0f..db31dabfa2 100644 --- a/basis/unix/statfs/statfs.factor +++ b/basis/unix/statfs/statfs.factor @@ -8,7 +8,7 @@ TUPLE: file-system-info root-directory total-free-size total-size ; HOOK: >file-system-info os ( struct -- statfs ) -HOOK: mounted os ( -- array ) +HOOK: file-systems os ( -- array ) os { { linux [ "unix.statfs.linux" require ] }