Merge branch 'master' into new_codegen

db4
Slava Pestov 2008-10-21 23:40:03 -05:00
commit dc74d1a9b6
2 changed files with 2 additions and 3 deletions

View File

@ -14,6 +14,8 @@ HOOK: mounted-struct>mounted os ( byte-array -- mounted )
TUPLE: file-system-info root-directory total-free-size total-size ;
HOOK: >file-system-info os ( struct -- statfs )
: mounted ( -- array )
mounted* [ mounted-struct>mounted ] map ;

View File

@ -188,9 +188,6 @@ TUPLE: file-system-info mount-on free-space ;
HOOK: file-system-info os ( path -- file-system-info )
HOOK: >file-system-info os ( struct -- statfs )
<PRIVATE
HOOK: cd io-backend ( path -- )