Skip to content

Instantly share code, notes, and snippets.

@prozacchiwawa

prozacchiwawa/Main.elm

Last active April 25, 2016 06:45
Show Gist options
  • Save prozacchiwawa/47ceec57d254f7e7e09bab4ab84f884f to your computer and use it in GitHub Desktop.
Save prozacchiwawa/47ceec57d254f7e7e09bab4ab84f884f to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Main.elm
module Main where
import Html exposing (Html, div)
import Signal exposing (Address(..))
import Module1
type Action = Stuff | Module1Action Module1.Action
type alias Model = { m1 : Module1.Model }
view : Address Action -> Model -> Html
view address model =
div [] [Module1.view address model.m1]
Raw
Module1.elm
module Module1 where
import Html exposing (Html, div)
import Html.Events exposing (onClick)
import Signal exposing (Address(..))
type Action = NoOp | DoSomething
type alias Model = { stuff : Int }
view : Address Action -> Model -> Html
view address model =
div [onClick address DoSomething] []
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment