| Noam Zilberstein | af5d64a | 2014-07-31 15:44:13 -0700 | [diff] [blame] | 1 | {-# OPTIONS_GHC -fno-warn-unused-imports #-} |
| Roger Meier | 16c164e | 2014-08-07 03:09:23 +0200 | [diff] [blame] | 2 | module Main where |
| 3 | |
| 4 | import qualified Prelude as P |
| 5 | |
| 6 | import NameConflictTest_Consts |
| 7 | import NameConflictTest_Types |
| 8 | import Qualified |
| 9 | import Qualified_Client |
| 10 | import Qualified_Iface |
| 11 | import Extern |
| 12 | import Extern_Client |
| 13 | import Extern_Iface |
| 14 | |
| 15 | main :: P.IO () |
| 16 | main = do |
| 17 | P.putStrLn "Values:" |
| 18 | P.print ([JUST, TRUE, FALSE] :: [Maybe]) |
| 19 | P.print ([LEFT, RIGHT] :: [Either]) |
| Noam Zilberstein | af5d64a | 2014-07-31 15:44:13 -0700 | [diff] [blame] | 20 | P.print (Problem_ P.True P.False) |