From 9aa32579bbd57088d5571dada5fa8c856a5453fb Mon Sep 17 00:00:00 2001 From: Rodrigo Mesquita Date: Tue, 11 Apr 2023 19:27:40 +0100 Subject: Add regression test for #23229 --- testsuite/tests/ghci/should_run/T23229.hs | 1 + testsuite/tests/ghci/should_run/T23229.script | 1 + testsuite/tests/ghci/should_run/all.T | 1 + 3 files changed, 3 insertions(+) create mode 100644 testsuite/tests/ghci/should_run/T23229.hs create mode 100644 testsuite/tests/ghci/should_run/T23229.script diff --git a/testsuite/tests/ghci/should_run/T23229.hs b/testsuite/tests/ghci/should_run/T23229.hs new file mode 100644 index 0000000000..ad2cbf87da --- /dev/null +++ b/testsuite/tests/ghci/should_run/T23229.hs @@ -0,0 +1 @@ +instance Num Bool diff --git a/testsuite/tests/ghci/should_run/T23229.script b/testsuite/tests/ghci/should_run/T23229.script new file mode 100644 index 0000000000..b2bc3ca47c --- /dev/null +++ b/testsuite/tests/ghci/should_run/T23229.script @@ -0,0 +1 @@ +:l T23229 diff --git a/testsuite/tests/ghci/should_run/all.T b/testsuite/tests/ghci/should_run/all.T index 96693241dd..15df5e417c 100644 --- a/testsuite/tests/ghci/should_run/all.T +++ b/testsuite/tests/ghci/should_run/all.T @@ -88,3 +88,4 @@ test('UnliftedDataType2', just_ghci, compile_and_run, ['']) test('SizedLiterals', [req_interp, extra_files(["SizedLiteralsA.hs"]),extra_hc_opts("-O -fbyte-code-and-object-code -fprefer-byte-code")], compile_and_run, ['']) test('T22829', just_ghci + [extra_hc_opts("-Wmissing-import-lists -Werror")], compile_and_run, ['']) +test('T23229', just_ghci + [extra_hc_opts("-this-unit-id my-package -Wno-missing-methods T23229")], ghci_script, ['T23229.script']) -- cgit v1.2.1