diff options
-rw-r--r-- | Utility/DiskFree.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/DiskFree.hs b/Utility/DiskFree.hs index ff7070562..18c7f2ee6 100644 --- a/Utility/DiskFree.hs +++ b/Utility/DiskFree.hs @@ -15,7 +15,7 @@ import Foreign.C.Types import Foreign.C.String import Foreign.C.Error -foreign import ccall unsafe "libdiskfree.h diskfree" c_diskfree +foreign import ccall safe "libdiskfree.h diskfree" c_diskfree :: CString -> IO CULLong getDiskFree :: FilePath -> IO (Maybe Integer) |