[commit: ghc] wip/nfs-locking: Remove TargetDir from Base.hs. (f033f1f)

git at git.haskell.org git at git.haskell.org
Thu Oct 26 23:27:35 UTC 2017


Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/nfs-locking
Link       : http://ghc.haskell.org/trac/ghc/changeset/f033f1ff0b94df3b12dd32d774043522c96f0cac/ghc

>---------------------------------------------------------------

commit f033f1ff0b94df3b12dd32d774043522c96f0cac
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Sun May 10 01:37:24 2015 +0100

    Remove TargetDir from Base.hs.


>---------------------------------------------------------------

f033f1ff0b94df3b12dd32d774043522c96f0cac
 src/Base.hs | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/Base.hs b/src/Base.hs
index 2bd350f..49b0fb2 100644
--- a/src/Base.hs
+++ b/src/Base.hs
@@ -8,7 +8,6 @@ module Base (
     module Data.Monoid,
     module Data.List,
     Stage (..),
-    TargetDir (..),
     Arg, Args,
     ShowArg (..), ShowArgs (..),
     arg, args,
@@ -29,9 +28,6 @@ data Stage = Stage0 | Stage1 | Stage2 | Stage3 deriving (Eq, Enum)
 instance Show Stage where
     show = show . fromEnum
 
--- Need TargetDir and FilePath to be distinct types
-newtype TargetDir = TargetDir { fromTargetDir :: FilePath } deriving (Show, Eq)
-
 -- The returned string or list of strings is a part of an argument list
 -- to be passed to a Builder
 type Arg  = Action String



More information about the ghc-commits mailing list