roc/examples/gui/breakout/platform/main.roc
2022-09-11 22:32:15 -06:00

14 lines
440 B
Text

platform "gui"
requires { Model } { program : _ }
exposes [Game]
packages {}
imports [Game.{ Bounds, Elem, Event }]
provides [programForHost]
# TODO allow changing the window title - maybe via a Task, since that shouldn't happen all the time
programForHost : {
init : (Bounds -> Model) as Init,
update : (Model, Event -> Model) as Update,
render : (Model -> List Elem) as Render,
}
programForHost = program