Fix #15845 by defining etaExpandFamInstLHS and using it
[ghc.git] / testsuite / tests / th / T9692.stderr
index ffa5536..070e4d3 100644 (file)
@@ -1,2 +1,3 @@
 data family T9692.F (a_0 :: k_1) (b_2 :: k_3) :: *
-data instance T9692.F GHC.Types.Int (x_4 :: *) = T9692.FInt x_4
+data instance forall (x_4 :: *). T9692.F GHC.Types.Int (x_4 :: *)
+    = T9692.FInt x_4