Merge branch 'master' into new_codegen
commit
dc74d1a9b6
|
@ -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 ;
|
||||
|
||||
|
|
|
@ -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 -- )
|
||||
|
|
Loading…
Reference in New Issue