begin type interop

backend/src/ElmskellTypes.hs

@@ -0,0 +1,20 @@
+{-# LANGUAGE TemplateHaskell #-}
+
+module ElmskellTypes
+
+import Elm.Derive
+import Elm.Module
+
+data Foo
+  = Foo
+  { name :: String
+  , blablub :: Int
+  } deriving (Show, Eq)
+
+deriveBoth defaultOptions ''Foo
+
+main :: IO ()
+main =
+  putStrLn $ makeElmModule "Foo"
+  [ DefineElm (Proxy :: Proxy Foo)
+  ]