diff options
| -rw-r--r-- | testsuite/driver/testlib.py | 9 | ||||
| -rw-r--r-- | testsuite/tests/ghci.debugger/scripts/all.T | 5 |
2 files changed, 13 insertions, 1 deletions
diff --git a/testsuite/driver/testlib.py b/testsuite/driver/testlib.py index 040e674312..dd3b4262eb 100644 --- a/testsuite/driver/testlib.py +++ b/testsuite/driver/testlib.py @@ -468,6 +468,15 @@ def have_gdb( ): def have_readelf( ): return config.have_readelf +def integer_gmp( ): + return have_library("integer-gmp") + +def integer_simple( ): + return have_library("integer-simple") + +def llvm_build ( ): + return config.ghc_built_by_llvm + # --- def high_memory_usage(name, opts): diff --git a/testsuite/tests/ghci.debugger/scripts/all.T b/testsuite/tests/ghci.debugger/scripts/all.T index 4095cf2c0b..7240594823 100644 --- a/testsuite/tests/ghci.debugger/scripts/all.T +++ b/testsuite/tests/ghci.debugger/scripts/all.T @@ -45,7 +45,10 @@ test('print033', normal, ghci_script, ['print033.script']) test('print034', extra_files(['../GADT.hs', '../Test.hs']), ghci_script, ['print034.script']) test('print035', extra_files(['../Unboxed.hs']), ghci_script, ['print035.script']) test('print036', expect_broken(9046), ghci_script, ['print036.script']) -test('print037', normal, ghci_script, ['print037.script']) +test('print037', when(llvm_build() and integer_gmp() + , expect_broken_for(16205, ['ghci-ext'])) + , ghci_script + , ['print037.script']) test('break001', extra_files(['../Test2.hs']), ghci_script, ['break001.script']) test('break002', extra_files(['../Test2.hs']), ghci_script, ['break002.script']) |