Skip to content

Commit d4c4cc7

Browse files
committed
Fix missing type argument in TH.TyVarBndr
1 parent b59f1b3 commit d4c4cc7

1 file changed

Lines changed: 2 additions & 1 deletion

File tree

generate-new/src/Render/Utils.hs

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -95,9 +95,10 @@ chooseAlign align = if align <= 8
9595
then ("allocaBytes", 'allocaBytes, id)
9696
else ("allocaBytesAligned", 'allocaBytesAligned, (<+> viaShow align))
9797

98-
plainTVcompat :: TH.Name -> TH.TyVarBndr
9998
#if MIN_VERSION_template_haskell(2,17,0)
99+
plainTVcompat :: TH.Name -> TH.TyVarBndr TH.Specificity
100100
plainTVcompat = (`TH.PlainTV` TH.SpecifiedSpec)
101101
#else
102+
plainTVcompat :: TH.Name -> TH.TyVarBndr
102103
plainTVcompat = TH.PlainTV
103104
#endif

0 commit comments

Comments
 (0)