roc/examples/interactive/effects.roc

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