diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2021-05-12 21:57:48 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-05-19 23:35:59 -0400 |
| commit | 10ae305e4ef05e1817ba92fb1d7a7079612c78a3 (patch) | |
| tree | d798f2a14b873b35b25b7aa3429a440effeb2705 /testsuite/tests/printer | |
| parent | 327256178e8378c9d5cfd9b1990788d7eca2294f (diff) | |
| download | haskell-10ae305e4ef05e1817ba92fb1d7a7079612c78a3.tar.gz | |
EPA: Remove duplicate annotations from HsDataDefn
They are repeated in the surrounding DataDecl and FamEqn.
Updates haddock submodule
Closes #19834
Diffstat (limited to 'testsuite/tests/printer')
| -rw-r--r-- | testsuite/tests/printer/Makefile | 4 | ||||
| -rw-r--r-- | testsuite/tests/printer/T18791.stderr | 10 | ||||
| -rw-r--r-- | testsuite/tests/printer/Test19834.hs | 4 | ||||
| -rw-r--r-- | testsuite/tests/printer/all.T | 2 |
4 files changed, 10 insertions, 10 deletions
diff --git a/testsuite/tests/printer/Makefile b/testsuite/tests/printer/Makefile index 653b9d3300..94893f6347 100644 --- a/testsuite/tests/printer/Makefile +++ b/testsuite/tests/printer/Makefile @@ -583,3 +583,7 @@ Test19821: $(CHECK_PPR) $(LIBDIR) Test19821.hs $(CHECK_EXACT) $(LIBDIR) Test19821.hs +.PHONY: Test19834 +Test19834: + $(CHECK_PPR) $(LIBDIR) Test19834.hs + $(CHECK_EXACT) $(LIBDIR) Test19834.hs diff --git a/testsuite/tests/printer/T18791.stderr b/testsuite/tests/printer/T18791.stderr index 3ff58cc17e..ac100b217e 100644 --- a/testsuite/tests/printer/T18791.stderr +++ b/testsuite/tests/printer/T18791.stderr @@ -1,7 +1,6 @@ ==================== Parser AST ==================== - (L { T18791.hs:1:1 } (HsModule @@ -64,14 +63,7 @@ []) (Prefix) (HsDataDefn - (EpAnn - (Anchor - { T18791.hs:(4,1)-(5,17) } - (UnchangedAnchor)) - [(AddEpAnn AnnData (EpaSpan { T18791.hs:4:1-4 })) - ,(AddEpAnn AnnWhere (EpaSpan { T18791.hs:4:8-12 }))] - (EpaComments - [])) + (NoExtField) (DataType) (Nothing) (Nothing) diff --git a/testsuite/tests/printer/Test19834.hs b/testsuite/tests/printer/Test19834.hs new file mode 100644 index 0000000000..bc4a118aa3 --- /dev/null +++ b/testsuite/tests/printer/Test19834.hs @@ -0,0 +1,4 @@ +{-# LANGUAGE TypeOperators #-} +module Test19834 where + +data (a:.b) = a:.b diff --git a/testsuite/tests/printer/all.T b/testsuite/tests/printer/all.T index 51b63b880f..618206ae54 100644 --- a/testsuite/tests/printer/all.T +++ b/testsuite/tests/printer/all.T @@ -132,4 +132,4 @@ test('Test19798', ignore_stderr, makefile_test, ['Test19798']) test('Test19813', ignore_stderr, makefile_test, ['Test19813']) test('Test19814', ignore_stderr, makefile_test, ['Test19814']) test('Test19821', ignore_stderr, makefile_test, ['Test19821']) - +test('Test19834', ignore_stderr, makefile_test, ['Test19834']) |