Skip to content

Instantly share code, notes, and snippets.

@lorenzo
Created December 9, 2016 12:52
Show Gist options
  • Save lorenzo/8dd60878f2e36021f7d9335eea4ceee4 to your computer and use it in GitHub Desktop.
Save lorenzo/8dd60878f2e36021f7d9335eea4ceee4 to your computer and use it in GitHub Desktop.
Elm.main.ports.requestAddOne.subscribe((a) => {
result = 1 + a;
Elm.main.ports.receiveAddOnce.send(result);
})
port module Main exposing (..)
port requestAddOne : Int -> Cmd Msg
port receiveAddOne : (Int -> Msg) -> Sub Msg
subscriptions model = Sub.batch [ receiveAddOnce GetAddOneResult]
update msg model =
(model, requestAddOne 1)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment