diff options
author | 2016-03-05 11:22:32 -0400 | |
---|---|---|
committer | 2016-03-05 11:22:32 -0400 | |
commit | 80de75d25c19f37564ac6db97db534f40d26f108 (patch) | |
tree | 0ccf8611ba4fdfdccb6f90cee16c76a481d9feaa /Utility/Mounts.hs | |
parent | aa5de5e25c46cbf5c0eb2cd6e0fb6e84be5586fb (diff) | |
parent | cd8e2e4eeb70d22f9a7daa375474d80aa188574b (diff) |
Merge branch 'no-cbits'
Diffstat (limited to 'Utility/Mounts.hs')
-rw-r--r-- | Utility/Mounts.hs | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/Utility/Mounts.hs b/Utility/Mounts.hs new file mode 100644 index 000000000..192da31a1 --- /dev/null +++ b/Utility/Mounts.hs @@ -0,0 +1,21 @@ +{- portability shim for System.MountPoints + - + - Copyright 2016 Joey Hess <id@joeyh.name> + - + - License: BSD-2-clause + -} + +{-# LANGUAGE CPP #-} +{-# OPTIONS_GHC -fno-warn-tabs #-} + +module Utility.Mounts (getMounts, Mntent(..)) where + +import qualified System.MountPoints +import System.MountPoints (Mntent(..)) + +getMounts :: IO [Mntent] +#ifndef __ANDROID__ +getMounts = System.MountPoints.getMounts +#else +getMounts = System.MountPoints.getProcMounts +#endif |