[commit: ghc] master: Rename bundled pattern synonym tests to reflect new terminology (63cad5d)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/63cad5d440899615f393353e6262221731701003/ghc

>---------------------------------------------------------------

commit 63cad5d440899615f393353e6262221731701003
Author: Matthew Pickering <matthewtpickering at gmail.com>
Date:   Wed Nov 11 15:37:43 2015 +0000

    Rename bundled pattern synonym tests to reflect new terminology
    
    This also fixes a bug which causes intermittent test failures due to
    interdependent tests.


>---------------------------------------------------------------

63cad5d440899615f393353e6262221731701003
 testsuite/tests/patsyn/should_compile/Associated.hs              | 9 ---------
 testsuite/tests/patsyn/should_compile/Bundle.hs                  | 9 +++++++++
 .../tests/patsyn/should_compile/{Associated1.hs => Bundle1.hs}   | 2 +-
 .../should_compile/{AssociatedInternal.hs => BundleInternal.hs}  | 2 +-
 .../{AssociatedInternal1.hs => BundleInternal1.hs}               | 2 +-
 .../patsyn/should_compile/{TransAssociated.hs => TransBundle.hs} | 2 +-
 testsuite/tests/patsyn/should_compile/all.T                      | 4 ++--
 7 files changed, 15 insertions(+), 15 deletions(-)

diff --git a/testsuite/tests/patsyn/should_compile/Associated.hs b/testsuite/tests/patsyn/should_compile/Associated.hs
deleted file mode 100644
index b4ea949..0000000
--- a/testsuite/tests/patsyn/should_compile/Associated.hs
+++ /dev/null
@@ -1,9 +0,0 @@
-module Associated(A(..)) where
-
-import AssociatedInternal (A(..))
-
-foo = MkA 5
-baz = NoA
-
-qux (MkA x) = x
-qux NoA = 0
diff --git a/testsuite/tests/patsyn/should_compile/Bundle.hs b/testsuite/tests/patsyn/should_compile/Bundle.hs
new file mode 100644
index 0000000..1a30410
--- /dev/null
+++ b/testsuite/tests/patsyn/should_compile/Bundle.hs
@@ -0,0 +1,9 @@
+module Bundle(A(..)) where
+
+import BundleInternal (A(..))
+
+foo = MkA 5
+baz = NoA
+
+qux (MkA x) = x
+qux NoA = 0
diff --git a/testsuite/tests/patsyn/should_compile/Associated1.hs b/testsuite/tests/patsyn/should_compile/Bundle1.hs
similarity index 70%
rename from testsuite/tests/patsyn/should_compile/Associated1.hs
rename to testsuite/tests/patsyn/should_compile/Bundle1.hs
index fce00b3..256f2fa 100644
--- a/testsuite/tests/patsyn/should_compile/Associated1.hs
+++ b/testsuite/tests/patsyn/should_compile/Bundle1.hs
@@ -1,6 +1,6 @@
 module Associated1(A(..)) where
 
-import AssociatedInternal1 (A(..))
+import BundleInternal1 (A(..))
 
 foo = MkA 5
 baz = NoA
diff --git a/testsuite/tests/patsyn/should_compile/AssociatedInternal.hs b/testsuite/tests/patsyn/should_compile/BundleInternal.hs
similarity index 70%
rename from testsuite/tests/patsyn/should_compile/AssociatedInternal.hs
rename to testsuite/tests/patsyn/should_compile/BundleInternal.hs
index b3e6506..6a79811 100644
--- a/testsuite/tests/patsyn/should_compile/AssociatedInternal.hs
+++ b/testsuite/tests/patsyn/should_compile/BundleInternal.hs
@@ -1,5 +1,5 @@
 {-# LANGUAGE PatternSynonyms #-}
-module AssociatedInternal (A(NewA,MkA, NoA)) where
+module BundleInternal (A(NewA,MkA, NoA)) where
 
 newtype A = NewA (Maybe Int)
 
diff --git a/testsuite/tests/patsyn/should_compile/AssociatedInternal1.hs b/testsuite/tests/patsyn/should_compile/BundleInternal1.hs
similarity index 70%
rename from testsuite/tests/patsyn/should_compile/AssociatedInternal1.hs
rename to testsuite/tests/patsyn/should_compile/BundleInternal1.hs
index 7997d1d..9eee273 100644
--- a/testsuite/tests/patsyn/should_compile/AssociatedInternal1.hs
+++ b/testsuite/tests/patsyn/should_compile/BundleInternal1.hs
@@ -1,5 +1,5 @@
 {-# LANGUAGE PatternSynonyms #-}
-module AssociatedInternal1 (A(NewA,MkA, NoA)) where
+module BundleInternal1 (A(NewA,MkA, NoA)) where
 
 newtype A = NewA (Maybe Int)
 
diff --git a/testsuite/tests/patsyn/should_compile/TransAssociated.hs b/testsuite/tests/patsyn/should_compile/TransBundle.hs
similarity index 77%
rename from testsuite/tests/patsyn/should_compile/TransAssociated.hs
rename to testsuite/tests/patsyn/should_compile/TransBundle.hs
index a5fbe0c..9aceb79 100644
--- a/testsuite/tests/patsyn/should_compile/TransAssociated.hs
+++ b/testsuite/tests/patsyn/should_compile/TransBundle.hs
@@ -1,6 +1,6 @@
 module TransAssociated(A(..)) where
 
-import Associated (A(..))
+import Bundle (A(..))
 
 foo = MkA 5
 baz = NoA
diff --git a/testsuite/tests/patsyn/should_compile/all.T b/testsuite/tests/patsyn/should_compile/all.T
index 7160a81..8000d23 100644
--- a/testsuite/tests/patsyn/should_compile/all.T
+++ b/testsuite/tests/patsyn/should_compile/all.T
@@ -33,8 +33,8 @@ test('records-poly', normal, compile, [''])
 test('records-req', normal, compile, [''])
 test('records-prov-req', normal, compile, [''])
 test('records-req-only', normal, compile, [''])
-test('Associated', [extra_clean(['AssociatedInternal1.hi', 'AssociatedInternal1.o'])], multimod_compile, ['Associated1', '-v0'])
-test('TransAssociated', [extra_clean(['Associated.hi', 'Associated.o', 'AssociatedInternal.hi', 'AssociatedInternal.o'])], multimod_compile, ['TransAssociated', '-v0'])
+test('pat-syn-bundle', [extra_clean(['BundleInternal1.hi', 'BundleInternal1.o'])], multimod_compile, ['Bundle1', '-v0'])
+test('pat-syn-trans-bundle', [extra_clean(['Bundle.hi', 'Bundle.o', 'BundleInternal.hi', 'BundleInternal.o'])], multimod_compile, ['TransBundle', '-v0'])
 test('ExportSyntax', normal, compile, [''])
 test('ExportSyntaxImport', [extra_clean(['ExportSyntax.hi', 'ExportSyntax.o'])], multimod_compile, ['ExportSyntaxImport', '-v0'])
 test('poly-export', normal, compile, [''])