12 lines
251 B
Haskell
12 lines
251 B
Haskell
{-# LANGUAGE CPP #-}
|
|
|
|
module Main (main) where
|
|
|
|
import App qualified
|
|
import Language.Javascript.JSaddle
|
|
import Language.Javascript.JSaddle.Wasm qualified as W
|
|
|
|
foreign export javascript "hs_start" main :: IO ()
|
|
|
|
main :: IO ()
|
|
main = W.run $ App.start
|