summaryrefslogtreecommitdiff
path: root/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered18.hs
diff options
context:
space:
mode:
authorDavid Terei <code@davidterei.com>2014-08-04 17:43:09 -0400
committerDavid Terei <code@davidterei.com>2014-11-06 11:16:38 -0800
commitf4ead30b96aa8faaf4d23815cc32f7adfadd28df (patch)
tree05a49146183f09d917b2d9b5560741003977e1f4 /testsuite/tests/safeHaskell/safeInfered/UnsafeInfered18.hs
parentc96a613c98d07fab4facc77bdd0701b7a17d332a (diff)
downloadhaskell-f4ead30b96aa8faaf4d23815cc32f7adfadd28df.tar.gz
Warn for Safe Haskell when -XOverlappingInstances or
-XIncoherentInstances turned on.
Diffstat (limited to 'testsuite/tests/safeHaskell/safeInfered/UnsafeInfered18.hs')
-rw-r--r--testsuite/tests/safeHaskell/safeInfered/UnsafeInfered18.hs11
1 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered18.hs b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered18.hs
new file mode 100644
index 0000000000..a6dbfe1745
--- /dev/null
+++ b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered18.hs
@@ -0,0 +1,11 @@
+{-# OPTIONS_GHC -fwarn-unsafe #-}
+{-# LANGUAGE FlexibleInstances #-}
+{-# LANGUAGE OverlappingInstances #-}
+module UnsafeInfered18 where
+
+class C a where
+ f :: a -> String
+
+instance C a where
+ f _ = "a"
+