1 files changed, 29 insertions, 0 deletions
diff --git a/testsuite/tests/safeHaskell/flags/all.T b/testsuite/tests/safeHaskell/flags/all.T
new file mode 100644
index 0000000000..7848b8328d
--- /dev/null
+++ b/testsuite/tests/safeHaskell/flags/all.T
@@ -0,0 +1,29 @@
+# Just do the normal way, SafeHaskell is all in the frontend
+def f( opts ):
+  opts.only_ways = ['normal']
+
+setTestOpts(f)
+
+test('SafeFlags01', normal, compile, ['-trust base'])
+test('SafeFlags02', normal, compile, [''])
+test('SafeFlags03', normal, compile, [''])
+
+# no longer support a SafeLanguage flag, so expect fail for them.
+test('SafeFlags04', normal, compile_fail, ['-trust base'])
+
+test('SafeFlags05', normal, compile, ['-trust base'])
+test('SafeFlags06', normal, compile, [''])
+
+# no longer support a SafeLanguage flag, so expect fail for them.
+test('SafeFlags07', normal, compile_fail, ['-trust base'])
+
+# no longer support a SafeLanguage flag, so expect fail for them.
+test('SafeFlags08', normal, compile_fail, ['-trust base'])
+test('SafeFlags09', normal, compile_fail, [''])
+
+test('SafeFlags10', normal, compile_fail, [''])
+test('SafeFlags11', normal, compile, ['-trust base'])
+
+test('Flags01', normal, compile, [''])
+test('Flags02', normal, compile, [''])
+