summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2022-09-23 12:37:51 +0100
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-12-08 22:45:27 -0500
commit216deefd377cf495f07f05a9b355e8d842ccb5b6 (patch)
treee21a40f243a0b8349bd6336472edfec7fe658611
parent7658cdd47198512b699492688f51fc8682d194cd (diff)
downloadhaskell-216deefd377cf495f07f05a9b355e8d842ccb5b6.tar.gz
Add test for #22162
-rw-r--r--testsuite/tests/determinism/determ023/A.hs5
-rw-r--r--testsuite/tests/determinism/determ023/Makefile15
-rw-r--r--testsuite/tests/determinism/determ023/all.T1
-rw-r--r--testsuite/tests/determinism/determ023/header1
4 files changed, 22 insertions, 0 deletions
diff --git a/testsuite/tests/determinism/determ023/A.hs b/testsuite/tests/determinism/determ023/A.hs
new file mode 100644
index 0000000000..544cb4df04
--- /dev/null
+++ b/testsuite/tests/determinism/determ023/A.hs
@@ -0,0 +1,5 @@
+{-# LANGUAGE CPP #-}
+module A where
+
+{-# DEPRECATED foo "abc" #-}
+foo = ()
diff --git a/testsuite/tests/determinism/determ023/Makefile b/testsuite/tests/determinism/determ023/Makefile
new file mode 100644
index 0000000000..b3e6373c15
--- /dev/null
+++ b/testsuite/tests/determinism/determ023/Makefile
@@ -0,0 +1,15 @@
+TOP=../../..
+include $(TOP)/mk/boilerplate.mk
+include $(TOP)/mk/test.mk
+
+determ023:
+ $(RM) A.hi A.o
+ mkdir -p a
+ mkdir -p ab
+ cp A.hs a
+ cp A.hs ab
+ '$(TEST_HC)' $(TEST_HC_OPTS) -v0 -ia A -hidir=a
+ '$(TEST_HC)' $(TEST_HC_OPTS) -v0 -iab A -hidir=ab
+ '$(TEST_HC)' $(TEST_HC_OPTS) --show-iface a/A.hi > hi1
+ '$(TEST_HC)' $(TEST_HC_OPTS) --show-iface ab/A.hi > hi2
+ diff hi1 hi2
diff --git a/testsuite/tests/determinism/determ023/all.T b/testsuite/tests/determinism/determ023/all.T
new file mode 100644
index 0000000000..a2195beebe
--- /dev/null
+++ b/testsuite/tests/determinism/determ023/all.T
@@ -0,0 +1 @@
+test('determ023', [extra_files(['A.hs', 'header'])], makefile_test, ['determ023'])
diff --git a/testsuite/tests/determinism/determ023/header b/testsuite/tests/determinism/determ023/header
new file mode 100644
index 0000000000..6d48aea954
--- /dev/null
+++ b/testsuite/tests/determinism/determ023/header
@@ -0,0 +1 @@
+qux = ()