roc/examples/interactive/cli-platform/Stdout.roc
2022-07-07 10:06:02 -04:00

8 lines
233 B
Text

interface Stdout
exposes [line]
imports [pf.Effect, Task.{ Task }, InternalTask]
line : Str -> Task {} * [Write [Stdout]*]*
line = \str ->
Effect.map (Effect.putLine str) (\_ -> Ok {})
|> InternalTask.fromEffect