summaryrefslogtreecommitdiff
path: root/testsuite/tests/plugins/plugins08.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/plugins/plugins08.hs')
-rw-r--r--testsuite/tests/plugins/plugins08.hs18
1 files changed, 18 insertions, 0 deletions
diff --git a/testsuite/tests/plugins/plugins08.hs b/testsuite/tests/plugins/plugins08.hs
new file mode 100644
index 0000000000..403d81f076
--- /dev/null
+++ b/testsuite/tests/plugins/plugins08.hs
@@ -0,0 +1,18 @@
+-- Tests a plugin added with TH.addCorePlugin
+{-# LANGUAGE TemplateHaskell #-}
+module Main where
+
+import Simple.DataStructures
+import Language.Haskell.TH.Syntax
+
+do addCorePlugin "Simple.Plugin"
+ return []
+
+{-# ANN theMessage (ReplaceWith "Right") #-}
+{-# NOINLINE theMessage #-}
+theMessage = "Wrong"
+
+main = do
+ putStrLn "Program Started"
+ putStrLn theMessage
+ putStrLn "Program Ended"