roc/examples/cli/cli-platform/Stderr.roc
2022-10-08 20:50:25 -06:00

15 lines
392 B
Text

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