escape the class name in io.files.info

db4
Doug Coleman 2009-08-30 20:10:41 -05:00
parent d8e10a691d
commit de94e49f06
1 changed files with 2 additions and 2 deletions

View File

@ -47,6 +47,6 @@ M: openbsd statvfs>file-system-info ( file-system-info statvfs -- file-system-in
M: openbsd file-systems ( -- seq )
f 0 0 getfsstat dup io-error
statfs <c-type-array> dup dup length 0 getfsstat io-error
statfs heap-size group
\ statfs <c-type-array> dup dup length 0 getfsstat io-error
\ statfs heap-size group
[ f_mntonname>> alien>native-string file-system-info ] map ;