@@ -2,6 +2,8 @@ module GenericDeriving where
3import Prelude
3import Prelude
5+import Control.Monad.Eff (Eff())
6+import Control.Monad.Eff.Console (CONSOLE())
5import Data.Generic
7import Data.Generic
@@ -17,4 +19,5 @@ data A a
18derive instance genericA :: (Generic a) => Generic (A a)
20derive instance genericA :: (Generic a) => Generic (A a)
22+main :: forall eff. Eff (console :: CONSOLE | eff) Unit
20main = Control.Monad.Eff.Console.log (gShow (D { a: C [ A 1.0 "test", B 42, D { a: true } ] }))
23main = Control.Monad.Eff.Console.log (gShow (D { a: C [ A 1.0 "test", B 42, D { a: true } ] }))