From 2146e2d53ea08c207a7842dc31eaa5d325caa555 Mon Sep 17 00:00:00 2001 From: Marios Titas Date: Mon, 5 Jan 2015 17:22:06 +0000 Subject: [PATCH] mark the import of statvfs as safe (#1) --- ChangeLog | 3 +++ System/DiskSpace.hsc | 2 +- disk-free-space.cabal | 2 +- 3 files changed, 5 insertions(+), 2 deletions(-) create mode 100644 ChangeLog diff --git a/ChangeLog b/ChangeLog new file mode 100644 index 0000000..2a8cb4b --- /dev/null +++ b/ChangeLog @@ -0,0 +1,3 @@ +v0.1.0.1 + + * Mark the import of statvfs as safe. diff --git a/System/DiskSpace.hsc b/System/DiskSpace.hsc index b282413..766a671 100644 --- a/System/DiskSpace.hsc +++ b/System/DiskSpace.hsc @@ -20,7 +20,7 @@ import Foreign.C #include -foreign import ccall unsafe statvfs :: CString -> Ptr a -> IO CInt +foreign import ccall safe statvfs :: CString -> Ptr a -> IO CInt type FsBlkCnt = #type fsblkcnt_t diff --git a/disk-free-space.cabal b/disk-free-space.cabal index 04cea82..4172e80 100644 --- a/disk-free-space.cabal +++ b/disk-free-space.cabal @@ -1,5 +1,5 @@ name: disk-free-space -version: 0.1.0.0 +version: 0.1.0.1 synopsis: Retrieve information about disk space usage description: A cross-platform library retrieve information about disk space usage.