roc/examples/interactive/effects.roc

17 lines
467 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 {}