th-expand-syns 0.3.0.0 → 0.3.0.1
raw patch · 2 files changed
+5/−5 lines, 2 filesdep ~containersPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: containers
API changes (from Hackage documentation)
Files
Language/Haskell/TH/ExpandSyns.hs view
@@ -9,7 +9,7 @@ ,evades,evade) where import Language.Haskell.TH hiding(cxt)-import Data.Set as Set +import qualified Data.Set as Set import Data.Generics import Control.Monad @@ -198,10 +198,10 @@ evade :: Data d => Name -> d -> Name evade n t = let- vars :: Set Name- vars = everything union (mkQ Set.empty Set.singleton) t+ vars :: Set.Set Name+ vars = everything Set.union (mkQ Set.empty Set.singleton) t - go n1 = if n1 `member` vars+ go n1 = if n1 `Set.member` vars then go (bump n1) else n1
th-expand-syns.cabal view
@@ -1,5 +1,5 @@ name: th-expand-syns-version: 0.3.0.0+version: 0.3.0.1 synopsis: Expands type synonyms in Template Haskell ASTs description: Expands type synonyms in Template Haskell ASTs category: Template Haskell