Review suggestions for GHC-17335

Bodigrim · Bodigrim · commit 8821db3a16f2 · 2025-03-12T00:28:40.000Z
diff --git a/message-index/messages/GHC-17335/dsIncompleteRecSel/after/DsIncompleteRecSel.hs b/message-index/messages/GHC-17335/dsIncompleteRecSel/after/DsIncompleteRecSel.hs
@@ -2,5 +2,6 @@ module DsIncompleteRecSel where
 
 data T = T1 | T2 {x :: Bool}
 
+f :: T -> Bool
 f T1 = True -- handle the T1 case
 f a = x a
diff --git a/message-index/messages/GHC-17335/dsIncompleteRecSel/before/DsIncompleteRecSel.hs b/message-index/messages/GHC-17335/dsIncompleteRecSel/before/DsIncompleteRecSel.hs
@@ -2,4 +2,5 @@ module DsIncompleteRecSel where
 
 data T = T1 | T2 {x :: Bool}
 
+f :: T -> Bool
 f a = x a

Original file line number	Diff line number	Diff line change
`@@ -2,4 +2,5 @@ module DsIncompleteRecSel where`
`2`	`2`
`3`	`3`	`data T = T1 \| T2 {x :: Bool}`
`4`	`4`
	`5`	`+f :: T -> Bool`
`5`	`6`	`f a = x a`