roc/examples/cli/cli-platform/Process.roc
2022-11-24 03:21:14 -05:00

13 lines
326 B
Text

interface Process
exposes [exit]
imports [Task.{ Task }, InternalTask, Effect]
## Exit the process with
##
## {} <- Stderr.line "Exiting right now!" |> Task.await
## Process.exit 1
exit : U8 -> Task {} *
exit = \code ->
Effect.processExit code
|> Effect.map \_ -> Ok {}
|> InternalTask.fromEffect