haskell statvfs ffi binding