diff options
Diffstat (limited to 'testsuite/tests/th/T9692.hs')
-rw-r--r-- | testsuite/tests/th/T9692.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/th/T9692.hs b/testsuite/tests/th/T9692.hs index 7f44342604..5394bea021 100644 --- a/testsuite/tests/th/T9692.hs +++ b/testsuite/tests/th/T9692.hs @@ -12,7 +12,7 @@ class C a where data F a (b :: k) :: Type instance C Int where - data F Int x = FInt x + data F Int (x :: Type) = FInt x $( do info <- qReify (mkName "F") runIO $ putStrLn $ pprint info |