summaryrefslogtreecommitdiff
path: root/testsuite/tests/plugins/plugins01.hs
blob: 7bb2ec7e2e26532e6be8405730000d0535a7d075 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
-- Intended to test that the plugins have basic functionality --
--  * Can modify the program
--  * Get to see command line options
module Main where

import Simple.DataStructures

{-# ANN theMessage (ReplaceWith "Right") #-}
{-# NOINLINE theMessage #-}
theMessage = "Wrong"

main = do
    putStrLn "Program Started"
    putStrLn theMessage
    putStrLn "Program Ended"