19 lines
349 B
Haskell
19 lines
349 B
Haskell
module App where
|
|
|
|
import Reflex
|
|
import Reflex.Dom.Core
|
|
|
|
import Language.Javascript.JSaddle
|
|
|
|
testWidget ::
|
|
( DomBuilder t m
|
|
, DomBuilderSpace m ~ GhcjsDomSpace
|
|
, MonadHold t m
|
|
, PostBuild t m
|
|
) =>
|
|
m ()
|
|
testWidget = elAttr "div" ("class" =: "content") do
|
|
text "hello, world!"
|
|
|
|
start :: JSM ()
|
|
start = mainWidget testWidget
|