io.files.info.unix.linux: fix more M: stack effects.

diff --git a/basis/io/files/info/unix/linux/linux.factor b/basis/io/files/info/unix/linux/linux.factor
index cc49c05b2d717a7dfe4b07f47d5c024853beaff7..982301104595fb52097bb37a0ad79322f32b6c4e 100644 (file)
--- a/basis/io/files/info/unix/linux/linux.factor
+++ b/basis/io/files/info/unix/linux/linux.factor
@@ -17,7 +17,7 @@ M: linux new-file-system-info linux-file-system-info new ;
 M: linux file-system-statfs ( path -- byte-array )
     \ statfs64 <struct> [ statfs64 io-error ] keep ;
 
-M: linux statfs>file-system-info ( struct -- statfs )
+M: linux statfs>file-system-info ( file-system-info statfs -- file-system-info' )
     {
         [ f_type>> >>type ]
         [ f_bsize>> >>block-size ]
@@ -35,7 +35,7 @@ M: linux statfs>file-system-info ( struct -- statfs )
 M: linux file-system-statvfs ( path -- byte-array )
     \ statvfs64 <struct> [ statvfs64 io-error ] keep ;
 
-M: linux statvfs>file-system-info ( struct -- statfs )
+M: linux statvfs>file-system-info ( file-system-info statfs -- file-system-info' )
     {
         [ f_flag>> >>flags ]
         [ f_namemax>> >>name-max ]