diff options
Diffstat (limited to 'testsuite/tests/overloadedrecflds')
| -rw-r--r-- | testsuite/tests/overloadedrecflds/should_run/overloadedrecfldsrun04.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/testsuite/tests/overloadedrecflds/should_run/overloadedrecfldsrun04.hs b/testsuite/tests/overloadedrecflds/should_run/overloadedrecfldsrun04.hs index e97fdcea9a..d3c85ba9ec 100644 --- a/testsuite/tests/overloadedrecflds/should_run/overloadedrecfldsrun04.hs +++ b/testsuite/tests/overloadedrecflds/should_run/overloadedrecfldsrun04.hs @@ -7,7 +7,10 @@ import Language.Haskell.TH.Syntax -- Splice in a datatype with field... $(return [DataD [] (mkName "R") [] Nothing - [RecC (mkName "MkR") [(mkName "foo", NotStrict, ConT ''Int)]] []]) + [RecC (mkName "MkR") [( mkName "foo" + , Bang NoSourceUnpackedness NoSourceStrictness + , ConT ''Int + )]] []]) -- New TH story means reify only sees R if we do this: $(return []) |