diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2011-06-28 09:55:19 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2011-06-28 11:43:09 +0100 |
| commit | 06d0dda1eb9a551f5f90fcba0d729a207b584bfb (patch) | |
| tree | 1184cc6fd6ecab2dc7684228d2664c7c58722514 /testsuite/tests | |
| parent | 1053d725b3520457c81e8d5000ca9d573816f88e (diff) | |
| download | haskell-06d0dda1eb9a551f5f90fcba0d729a207b584bfb.tar.gz | |
Fix spurious failure in ghcpkg05 in the nightly build
Diffstat (limited to 'testsuite/tests')
| -rw-r--r-- | testsuite/tests/ghc-regress/cabal/all.T | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/testsuite/tests/ghc-regress/cabal/all.T b/testsuite/tests/ghc-regress/cabal/all.T index ed8b9e28b7..2ec0fa8ff7 100644 --- a/testsuite/tests/ghc-regress/cabal/all.T +++ b/testsuite/tests/ghc-regress/cabal/all.T @@ -21,11 +21,19 @@ test('ghcpkg04', 'local04.package.conf.old'])], run_command, ['$MAKE -s --no-print-directory ghcpkg04']) + +# Sometimes we get spurious warnings from ghc-pkg about missing +# haddock-interfaces; this filters them out. +def normalise_haddock_junk( str ): + return re.sub(r'Warning: haddock.*\n', '', str) + test('ghcpkg05', - extra_clean(['local05a.package.conf', - 'local05a.package.conf.old', - 'local05b.package.conf', - 'local05b.package.conf.old']), + [ extra_clean(['local05a.package.conf', + 'local05a.package.conf.old', + 'local05b.package.conf', + 'local05b.package.conf.old']), + normalise_fun(normalise_haddock_junk) + ], run_command, ['$MAKE -s --no-print-directory ghcpkg05']) test('ghcpkg06', |