From 6e199bd05cb09fa316d03bc4b62ffd857d1e46f5 Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Fri, 20 Jul 2012 14:05:35 +0100
Subject: [PATCH] Remove T7041; it doesn't make sense now that we handle gcd
differently
---
testsuite/tests/lib/integer/Makefile | 6 ------
testsuite/tests/lib/integer/T7041.hs | 6 ------
testsuite/tests/lib/integer/all.T | 4 ----
3 files changed, 16 deletions(-)
delete mode 100644 testsuite/tests/lib/integer/T7041.hs
diff --git a/testsuite/tests/lib/integer/Makefile b/testsuite/tests/lib/integer/Makefile
index 77b733de322..34d5a177baf 100644
--- a/testsuite/tests/lib/integer/Makefile
+++ b/testsuite/tests/lib/integer/Makefile
@@ -56,9 +56,3 @@ IntegerConversionRules:
-grep -q integerToWord $@.simpl && echo "integerToWord present"
-grep -q int2Word $@.simpl || echo "int2Word absent"
-.PHONY: T7041
-T7041:
- '$(TEST_HC)' -Wall -v0 -O -c $@.hs -fforce-recomp -ddump-simpl > $@.simpl
- -grep -q gcdInteger $@.simpl && echo "gcdInteger present"
- -grep -q "gcdInt\>" $@.simpl || echo "gcdInt absent"
-
diff --git a/testsuite/tests/lib/integer/T7041.hs b/testsuite/tests/lib/integer/T7041.hs
deleted file mode 100644
index 02ef996b426..00000000000
--- a/testsuite/tests/lib/integer/T7041.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-
-module T7041 where
-
-gcdInt :: Int -> Int -> Int
-gcdInt a b = fromInteger (gcd (toInteger a) (toInteger b))
-
diff --git a/testsuite/tests/lib/integer/all.T b/testsuite/tests/lib/integer/all.T
index cb5767580cf..61c061ecf80 100644
--- a/testsuite/tests/lib/integer/all.T
+++ b/testsuite/tests/lib/integer/all.T
@@ -13,8 +13,4 @@ test('IntegerConversionRules',
run_command,
['$MAKE -s --no-print-directory IntegerConversionRules'])
test('gcdInteger', normal, compile_and_run, [''])
-test('T7041',
- extra_clean(['T7041.simpl']),
- run_command,
- ['$MAKE -s --no-print-directory T7041'])
--
GitLab