mirror of
https://github.com/roc-lang/roc.git
synced 2025-09-30 15:21:12 +00:00
21 lines
490 B
Text
21 lines
490 B
Text
app "effect-example"
|
|
packages { base: "thing/platform-dir" }
|
|
imports [ base.Task ]
|
|
provides [ main ] to base
|
|
|
|
# main : Task.Task {} F64
|
|
|
|
main =
|
|
# Task.after (Task.putLine "foo") \{} -> Task.putLine "bar"
|
|
Task.after (Task.always "foo") (\_ -> Task.always {})
|
|
|
|
|
|
|
|
# main =
|
|
# # Task.after (Task.putLine "foo") \{} -> Task.putLine "bar"
|
|
# y = Task.ealways 3.14
|
|
#
|
|
# a = y |> Task.emap (\x -> x)
|
|
# b = y |> Task.emap (\x -> x)
|
|
#
|
|
# if 1 == 1 then a else b
|