Don't expose the S.M.Prelude

adetokunbo · Jan 16, 2024 · 1aa57b0 · 1aa57b0
1 parent 379493a
commit 1aa57b0
Show file tree

Hide file tree

Showing 5 changed files with 11 additions and 5 deletions.
diff --git a/mem-info.cabal b/mem-info.cabal
@@ -36,10 +36,11 @@ library
  exposed-modules:
  System.MemInfo
  System.MemInfo.Choices
- System.MemInfo.Prelude
  System.MemInfo.Print
  System.MemInfo.Proc
  System.MemInfo.SysInfo
+ other-modules:
+ System.MemInfo.Prelude
 
  hs-source-dirs: src
  build-depends:
@@ -78,10 +79,12 @@ test-suite test
  , genvalidity
  , genvalidity-hspec
  , genvalidity-text
+ , hashable
  , mem-info
  , hspec >=2.1 && <2.11
  , QuickCheck
  , text
+ , unix
 
 -- printmem is the printmem command
 executable printmem

diff --git a/test/MemInfo/OrphanInstances.hs b/test/MemInfo/OrphanInstances.hs
@@ -19,8 +19,8 @@ module MemInfo.OrphanInstances where
 
 import Data.GenValidity (GenValid (..))
 import Data.GenValidity.Text ()
-import System.MemInfo.Prelude
 import System.MemInfo.Proc (ExeInfo (..), StatusInfo)
+import System.Posix.Types (CPid (..), ProcessID)
 import Test.Validity (Validity)
 
 

diff --git a/test/MemInfo/PrintSpec.hs b/test/MemInfo/PrintSpec.hs
@@ -8,10 +8,11 @@ SPDX-License-Identifier: BSD3
 -}
 module MemInfo.PrintSpec (spec) where
 
+import Data.Text (Text)
 import qualified Data.Text as Text
-import System.MemInfo.Prelude
 import System.MemInfo.Print (fmtAsHeader, fmtMemUsage, fmtOverall)
 import System.MemInfo.Proc (MemUsage (..))
+import System.Posix.Types (ProcessID)
 import Test.Hspec
 
 

diff --git a/test/MemInfo/ProcSpec.hs b/test/MemInfo/ProcSpec.hs
@@ -9,11 +9,13 @@ SPDX-License-Identifier: BSD3
 -}
 module MemInfo.ProcSpec (spec) where
 
+import Data.Hashable (hash)
+import Data.Text (Text)
 import qualified Data.Text as Text
 import Data.Word (Word16)
 import Fmt (blockMapF, build, fmt, (+|), (|+))
 import MemInfo.OrphanInstances ()
-import System.MemInfo.Prelude
+import Numeric.Natural (Natural)
 import System.MemInfo.Proc
 import Test.Hspec
 import Test.QuickCheck

diff --git a/test/MemInfo/SysInfoSpec.hs b/test/MemInfo/SysInfoSpec.hs
@@ -10,10 +10,10 @@ SPDX-License-Identifier: BSD3
 module MemInfo.SysInfoSpec (spec) where
 
 import Data.GenValidity (GenValid (..))
+import Data.Text (Text)
 import Data.Word (Word8)
 import Fmt (build, fmt, (+|), (|+))
 import MemInfo.OrphanInstances ()
-import System.MemInfo.Prelude
 import System.MemInfo.SysInfo (KernelVersion, parseKernelVersion)
 import Test.Hspec
 import Test.QuickCheck