From a595130f3291141f4fb2df6ae174a6bde8b2edab Mon Sep 17 00:00:00 2001
From: Ian Lynagh <ian@well-typed.com>
Date: Sun, 16 Jun 2013 16:46:17 +0100
Subject: Fix qq00{7,8} with dynamic ghc

Untested, but I think they should pass for the profiling ways too now,
so those ways are no longer omitted.
---
 testsuite/tests/quasiquotation/qq007/Makefile | 9 +++++++++
 testsuite/tests/quasiquotation/qq007/test.T   | 5 +----
 2 files changed, 10 insertions(+), 4 deletions(-)

(limited to 'testsuite/tests/quasiquotation/qq007')

diff --git a/testsuite/tests/quasiquotation/qq007/Makefile b/testsuite/tests/quasiquotation/qq007/Makefile
index 9101fbd40a..e31a732a26 100644
--- a/testsuite/tests/quasiquotation/qq007/Makefile
+++ b/testsuite/tests/quasiquotation/qq007/Makefile
@@ -1,3 +1,12 @@
 TOP=../../..
 include $(TOP)/mk/boilerplate.mk
 include $(TOP)/mk/test.mk
+
+.PHONY: TH_QQ
+TH_QQ:
+ifeq "$(GhcDynamic)" "YES"
+	'$(TEST_HC)' $(TEST_HC_OPTS) -c QQ.hs -dynamic -osuf dyn_o -hisuf dyn_hi
+else
+	'$(TEST_HC)' $(TEST_HC_OPTS) -c QQ.hs
+endif
+
diff --git a/testsuite/tests/quasiquotation/qq007/test.T b/testsuite/tests/quasiquotation/qq007/test.T
index 61374e5719..cf59e4f733 100644
--- a/testsuite/tests/quasiquotation/qq007/test.T
+++ b/testsuite/tests/quasiquotation/qq007/test.T
@@ -1,10 +1,7 @@
 test('qq007',
      [when(fast(), skip),
       extra_clean(['QQ.hi', 'QQ.o', 'Test.hi', 'Test.o']),
-      # We'd need to jump through some hoops to run this test the
-      # profiling ways, due to the TH use, so for now we just
-      # omit the profiling ways
-      omit_ways(['profasm','profthreaded']),
+      pre_cmd('$MAKE -s --no-print-directory TH_QQ'),
       only_compiler_types(['ghc'])],
      multimod_compile,
      ['Test', '-v0'])
-- 
cgit v1.2.1