summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-regress/safeHaskell/safeLanguage/SafeLang12.hs
diff options
context:
space:
mode:
authorDavid Terei <davidterei@gmail.com>2011-07-06 19:16:15 -0700
committerDavid Terei <davidterei@gmail.com>2011-07-06 21:13:21 -0700
commit5faed3b31eaca2db336bb2a692bd1734a792734e (patch)
tree62df22733b0cbede95adcf1e6c96540a70b17500 /testsuite/tests/ghc-regress/safeHaskell/safeLanguage/SafeLang12.hs
parenta63069eb93554c5d690c0929876f41b592403ae6 (diff)
downloadhaskell-5faed3b31eaca2db336bb2a692bd1734a792734e.tar.gz
Add tests for Safe Haskell
Diffstat (limited to 'testsuite/tests/ghc-regress/safeHaskell/safeLanguage/SafeLang12.hs')
-rw-r--r--testsuite/tests/ghc-regress/safeHaskell/safeLanguage/SafeLang12.hs14
1 files changed, 14 insertions, 0 deletions
diff --git a/testsuite/tests/ghc-regress/safeHaskell/safeLanguage/SafeLang12.hs b/testsuite/tests/ghc-regress/safeHaskell/safeLanguage/SafeLang12.hs
new file mode 100644
index 0000000000..5817e54095
--- /dev/null
+++ b/testsuite/tests/ghc-regress/safeHaskell/safeLanguage/SafeLang12.hs
@@ -0,0 +1,14 @@
+{-# LANGUAGE Safe #-}
+{-# LANGUAGE TemplateHaskell #-}
+module Main where
+
+import SafeLang11_A
+import SafeLang12_B
+
+$(mkSimpleClass ''A)
+
+main = do
+ let b = c :: A
+ putStrLn $ "I have a value of A :: " ++ show b
+
+