Skip the GHCi debugger tests when unregisterised (trac #1545)
authorIan Lynagh <igloo@earth.li>
Wed, 18 Jul 2007 12:20:42 +0000 (12:20 +0000)
committerIan Lynagh <igloo@earth.li>
Wed, 18 Jul 2007 12:20:42 +0000 (12:20 +0000)
testsuite/config/ghc
testsuite/mk/test.mk
testsuite/tests/ghc-regress/ghci.debugger/scripts/all.T

index 16fc237..8e0e2d6 100644 (file)
@@ -40,6 +40,8 @@ if (ghc_with_profiling == 1):
 if (ghc_with_interpreter == 1):
        config.run_ways.append('ghci')
 
+config.unregisterised = (ghc_unregisterised == 1)
+
 if (ghc_with_threaded_rts == 1):
        config.run_ways.append('threaded1')
        if (ghc_with_smp == 1):
index b8f9dbd..ec24854 100644 (file)
@@ -71,6 +71,12 @@ else
 RUNTEST_OPTS += -e ghc_with_interpreter=0
 endif
 
+ifeq "$(GhcUnregisterised)" "YES"
+RUNTEST_OPTS += -e ghc_unregisterised=1
+else
+RUNTEST_OPTS += -e ghc_unregisterised=0
+endif
+
 ifeq "$(filter thr, $(GhcRTSWays))" "thr"
 RUNTEST_OPTS += -e ghc_with_threaded_rts=1
 else
index 92e9d8f..e2bc7ae 100644 (file)
@@ -1,3 +1,10 @@
+
+# trac #1545: GHCi debugger doesn't work on an unregisterised compiler
+def f(opts):
+  if config.unregisterised:
+    opts.skip = 1
+setTestOpts(f)
+
 setTestOpts(extra_run_opts('-ignore-dot-ghci'))
 
 test('print001', normal, ghci_script, ['print001.script'])