diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2019-06-13 23:47:31 -0400 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-06-18 16:00:56 -0400 |
| commit | dbf9ca2040c71b2f04322b054322a0ede1e1b700 (patch) | |
| tree | f8d8518657c0173c313d2f57c55115668819d3d4 | |
| parent | da33f2bb3965bacec25790548d1a9b6812dfeefc (diff) | |
| download | haskell-dbf9ca2040c71b2f04322b054322a0ede1e1b700.tar.gz | |
testsuite: Add testcase for #16689
| -rw-r--r-- | testsuite/tests/safeHaskell/safeInfered/T16689.hs | 4 | ||||
| -rw-r--r-- | testsuite/tests/safeHaskell/safeInfered/all.T | 2 |
2 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/safeHaskell/safeInfered/T16689.hs b/testsuite/tests/safeHaskell/safeInfered/T16689.hs new file mode 100644 index 0000000000..a1820aa4a1 --- /dev/null +++ b/testsuite/tests/safeHaskell/safeInfered/T16689.hs @@ -0,0 +1,4 @@ +{-# LANGUAGE Safe #-} + +main = return () + diff --git a/testsuite/tests/safeHaskell/safeInfered/all.T b/testsuite/tests/safeHaskell/safeInfered/all.T index c51a0abcce..be38d8ff12 100644 --- a/testsuite/tests/safeHaskell/safeInfered/all.T +++ b/testsuite/tests/safeHaskell/safeInfered/all.T @@ -64,3 +64,5 @@ test('UnsafeWarn07', normal, compile, ['']) # Chck -fwa-safe works test('SafeWarn01', normal, compile, ['']) +test('T16689', normal, compile, ['-Wsafe']) + |