Skip the GHCi debugger tests when unregisterised (trac #1545)

testsuite/config/ghc

@@ -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):

testsuite/mk/test.mk

@@ -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

testsuite/tests/ghc-regress/ghci.debugger/scripts/all.T

+
+# 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'])