diff options
| -rw-r--r-- | src/CabalHelper/Shared/InterfaceTypes.hs | 2 | ||||
| -rw-r--r-- | tests/GhcSession.hs | 3 |
2 files changed, 1 insertions, 4 deletions
diff --git a/src/CabalHelper/Shared/InterfaceTypes.hs b/src/CabalHelper/Shared/InterfaceTypes.hs index 5cdd98c..37758bc 100644 --- a/src/CabalHelper/Shared/InterfaceTypes.hs +++ b/src/CabalHelper/Shared/InterfaceTypes.hs @@ -58,7 +58,7 @@ data ChLibraryName = ChMainLibName | ChSubLibName String deriving (Eq, Ord, Read, Show, Generic) -newtype ChModuleName = ChModuleName String +newtype ChModuleName = ChModuleName { unChModuleName :: String } deriving (Eq, Ord, Read, Show, Generic) data ChComponentInfo = ChComponentInfo diff --git a/tests/GhcSession.hs b/tests/GhcSession.hs index 80e9d17..46ccab9 100644 --- a/tests/GhcSession.hs +++ b/tests/GhcSession.hs @@ -444,9 +444,6 @@ copyMuliPackageProject srcdir destdir copyPkgExtra = do , "--output-directory="++destdir </> pkgdir ] copyPkgExtra (srcdir </> pkgdir) (destdir </> pkgdir) -unChModuleName :: ChModuleName -> String -unChModuleName (ChModuleName mn) = mn - cabalInstallVersion :: IO Version cabalInstallVersion = parseVer . trim <$> readProcess "cabal" ["--numeric-version"] "" |