mirror of
https://github.com/roc-lang/roc.git
synced 2025-09-27 05:49:08 +00:00
15 lines
392 B
Text
15 lines
392 B
Text
interface Stdout
|
|
exposes [line, write]
|
|
imports [Effect, Task.{ Task }, InternalTask]
|
|
|
|
line : Str -> Task {} * [Write [Stdout]*]*
|
|
line = \str ->
|
|
Effect.stdoutLine str
|
|
|> Effect.map (\_ -> Ok {})
|
|
|> InternalTask.fromEffect
|
|
|
|
write : Str -> Task {} * [Write [Stdout]*]*
|
|
write = \str ->
|
|
Effect.stdoutWrite str
|
|
|> Effect.map (\_ -> Ok {})
|
|
|> InternalTask.fromEffect
|