haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Depend directly on template-haskell.

Browse Source
This commit is contained in:
Daniel Díaz 2015-08-11 22:10:12 +02:00
parent 4897c24d3f
commit 42ec7f53e9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-core/Yesod/Core/Internal/TH.hs
View File

@ -96,7 +96,7 @@ mkYesodGeneral name args isSub resS = do
Left t -> ( ConT (mkName t):xs, n:ns, cs ) Left t -> ( ConT (mkName t):xs, n:ns, cs )
Right ts -> ( VarT n :xs, ns Right ts -> ( VarT n :xs, ns
, fmap (\t -> , fmap (\t ->
#if MIN_VERSION_base(4,8,0) #if MIN_VERSION_template_haskell(2,10,0)
AppT (ConT $ mkName t) (VarT n) AppT (ConT $ mkName t) (VarT n)
#else #else
ClassP (mkName t) [VarT n] ClassP (mkName t) [VarT n]