structural-traversal 0.1.1.0 → 0.1.1.1
raw patch · 2 files changed
+2/−2 lines, 2 files
Files
src/Data/StructuralTraversal/TH.hs view
@@ -32,7 +32,7 @@ (foldl AppT (ConT tyConName) (map getTypVarTyp (init typArgs)))) [FunD upName upClauses, FunD downName downClauses]] - where -- | Gets the variable that is traversed on + where -- | Gets the variable that is traversed on varToTraverseOn :: Q Name varToTraverseOn = case reverse typArgs of (PlainTV last : _) -> return last
structural-traversal.cabal view
@@ -1,5 +1,5 @@ name: structural-traversal -version: 0.1.1.0 +version: 0.1.1.1 synopsis: Initial project template from stack description: Please see README.md homepage: http://github.com/nboldi/structural-traversal#readme