Fix #11287.
[ghc.git] / testsuite / tests / th / TH_Roles2.hs
index 30f4fc7..3f7b535 100644 (file)
@@ -4,6 +4,7 @@ module TH_Roles2 where
 
 import Language.Haskell.TH
 
-$( return [ DataD [] (mkName "T") [KindedTV (mkName "a") (VarT (mkName "k"))] [] []
+$( return [ DataD [] (mkName "T") [KindedTV (mkName "a") (VarT (mkName "k"))]
+            Nothing [] []
           , RoleAnnotD (mkName "T") [RepresentationalR] ] )