diff options
Diffstat (limited to 'testsuite/tests/rts/T7919A.hs')
| -rw-r--r-- | testsuite/tests/rts/T7919A.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/testsuite/tests/rts/T7919A.hs b/testsuite/tests/rts/T7919A.hs index 4dc013aeff..ddbdb04750 100644 --- a/testsuite/tests/rts/T7919A.hs +++ b/testsuite/tests/rts/T7919A.hs @@ -20,7 +20,9 @@ largeData = (dataName) [] Nothing - [normalC dataName (replicate size (((,) <$> notStrict) `ap` [t| Int |]))] + [normalC dataName + (replicate size (((,) <$> bang noSourceUnpackedness + noSourceStrictness) `ap` [t| Int |]))] (cxt []) conE' :: Name -> [ExpQ] -> ExpQ |