roc/examples/interactive/effects.roc
2022-03-07 20:10:50 -07:00

17 lines
471 B
Text

app "effects"
packages { pf: "effects-platform" }
imports [ pf.Effect ]
provides [ main ] to pf
main : Effect.Effect {}
main =
Effect.after
(Effect.getLine)
\line ->
Effect.after
(Effect.putLine "You entered: \(line)")
\{ } ->
Effect.after
(Effect.putLine "It is known")
\{ } ->
Effect.always {}