diff options
Diffstat (limited to 'testsuite/tests/deriving/should_compile/drv-empty-data.stderr')
| -rw-r--r-- | testsuite/tests/deriving/should_compile/drv-empty-data.stderr | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/testsuite/tests/deriving/should_compile/drv-empty-data.stderr b/testsuite/tests/deriving/should_compile/drv-empty-data.stderr index cb6a89b226..9d7cb859bd 100644 --- a/testsuite/tests/deriving/should_compile/drv-empty-data.stderr +++ b/testsuite/tests/deriving/should_compile/drv-empty-data.stderr @@ -46,7 +46,9 @@ Derived class instances: instance Language.Haskell.TH.Syntax.Lift (DrvEmptyData.Void a) where Language.Haskell.TH.Syntax.lift z = GHC.Base.pure (case z of) - Language.Haskell.TH.Syntax.liftTyped z = GHC.Base.pure (case z of) + Language.Haskell.TH.Syntax.liftTyped z + = Language.Haskell.TH.Syntax.unsafeCodeCoerce + (GHC.Base.pure (case z of)) $tVoid :: Data.Data.DataType $tVoid = Data.Data.mkDataType "Void" [] |