diff options
| author | Ian Lynagh <ian@well-typed.com> | 2012-11-10 14:37:16 +0000 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2012-11-10 14:37:16 +0000 |
| commit | ec56be8fb169410d662b91321fe356f6006d1ced (patch) | |
| tree | c14d47f9a12193b24366f47c1455359f707430c9 /testsuite/mk | |
| parent | 16f685e2b1cbef35568abb5c1603416fbfdb190a (diff) | |
| download | haskell-ec56be8fb169410d662b91321fe356f6006d1ced.tar.gz | |
Add if_compiler_debugged to testsuite driver
arrowfail001 currently fails only when DEBUG is defined.
Diffstat (limited to 'testsuite/mk')
| -rw-r--r-- | testsuite/mk/ghc-config.hs | 1 | ||||
| -rw-r--r-- | testsuite/mk/test.mk | 2 |
2 files changed, 3 insertions, 0 deletions
diff --git a/testsuite/mk/ghc-config.hs b/testsuite/mk/ghc-config.hs index b667b84d66..3145488904 100644 --- a/testsuite/mk/ghc-config.hs +++ b/testsuite/mk/ghc-config.hs @@ -17,6 +17,7 @@ main = do let fields = read info :: [(String,String)] getGhcFieldOrFail fields "GhcStage" "Stage" + getGhcFieldOrFail fields "GhcDebugged" "Debug on" getGhcFieldOrFail fields "GhcWithNativeCodeGen" "Have native code generator" getGhcFieldOrFail fields "GhcWithInterpreter" "Have interpreter" getGhcFieldOrFail fields "GhcUnregisterised" "Unregisterised" diff --git a/testsuite/mk/test.mk b/testsuite/mk/test.mk index 8b289441d0..942271c0fc 100644 --- a/testsuite/mk/test.mk +++ b/testsuite/mk/test.mk @@ -39,6 +39,8 @@ endif RUNTEST_OPTS += -e ghc_compiler_always_flags="'$(TEST_HC_OPTS)'" +RUNTEST_OPTS += -e ghc_debugged=$(GhcDebugged) + ifeq "$(GhcWithNativeCodeGen)" "YES" RUNTEST_OPTS += -e ghc_with_native_codegen=1 else |