diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-11-04 16:01:35 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-01-17 05:46:09 -0500 |
| commit | d930687a073f4209e6dd028363039a5869296d74 (patch) | |
| tree | 25f61eddbea82df2ee4a1b406616cfe0744a1ea5 /testsuite/tests/rename | |
| parent | 9fa3428967c777ea8801a13e427b20ff4c4d0d59 (diff) | |
| download | haskell-d930687a073f4209e6dd028363039a5869296d74.tar.gz | |
Show missing field types (#18869)
Diffstat (limited to 'testsuite/tests/rename')
| -rw-r--r-- | testsuite/tests/rename/should_compile/T5334.stderr | 6 | ||||
| -rw-r--r-- | testsuite/tests/rename/should_fail/T12229.stderr | 3 | ||||
| -rw-r--r-- | testsuite/tests/rename/should_fail/T5892a.stderr | 3 |
3 files changed, 8 insertions, 4 deletions
diff --git a/testsuite/tests/rename/should_compile/T5334.stderr b/testsuite/tests/rename/should_compile/T5334.stderr index 3e15e5b9f0..ef22a01608 100644 --- a/testsuite/tests/rename/should_compile/T5334.stderr +++ b/testsuite/tests/rename/should_compile/T5334.stderr @@ -1,6 +1,7 @@ T5334.hs:7:5: warning: [-Wmissing-fields (in -Wdefault)] - • Fields of ‘T’ not initialised: b + • Fields of ‘T’ not initialised: + b :: Int • In the expression: T {..} In an equation for ‘t’: t = T {..} @@ -8,6 +9,7 @@ T5334.hs:7:5: warning: [-Wmissing-fields (in -Wdefault)] a = 1 T5334.hs:14:5: warning: [-Wmissing-fields (in -Wdefault)] - • Fields of ‘S’ not initialised: y + • Fields of ‘S’ not initialised: + y :: Int • In the expression: S {x = 1} In an equation for ‘s’: s = S {x = 1} diff --git a/testsuite/tests/rename/should_fail/T12229.stderr b/testsuite/tests/rename/should_fail/T12229.stderr index 4fc8678c5c..6eb4de53e2 100644 --- a/testsuite/tests/rename/should_fail/T12229.stderr +++ b/testsuite/tests/rename/should_fail/T12229.stderr @@ -1,5 +1,6 @@ T12229.hs:7:7: warning: [-Wmissing-fields (in -Wdefault)] - • Fields of ‘MkT’ not initialised: pi + • Fields of ‘MkT’ not initialised: + pi :: Float • In the expression: MkT {..} In an equation for ‘f’: f x = MkT {..} diff --git a/testsuite/tests/rename/should_fail/T5892a.stderr b/testsuite/tests/rename/should_fail/T5892a.stderr index f1041796d9..23e9deb18b 100644 --- a/testsuite/tests/rename/should_fail/T5892a.stderr +++ b/testsuite/tests/rename/should_fail/T5892a.stderr @@ -1,6 +1,7 @@ T5892a.hs:12:8: error: [-Wmissing-fields (in -Wdefault), -Werror=missing-fields] - • Fields of ‘Node’ not initialised: subForest + • Fields of ‘Node’ not initialised: + subForest :: [Tree a] • In the expression: Node {..} In the expression: let rootLabel = [] in Node {..} In an equation for ‘foo’: |