mirror of
https://github.com/roc-lang/roc.git
synced 2025-10-03 16:44:33 +00:00
18 lines
534 B
Text
18 lines
534 B
Text
app "effect-example" imports [ Effect ] provides [ main ] to "./platform"
|
|
|
|
|
|
main : Effect.Effect {} as Fx
|
|
main =
|
|
when if 1 == 1 then True 3 else False 3.14 is
|
|
True n -> Effect.putLine (Str.fromInt n)
|
|
_ -> Effect.putLine "Yay"
|
|
|
|
# main : Effect.Effect {} as Fx
|
|
# main =
|
|
# if RBTree.isEmpty (RBTree.insert 1 2 Empty) then
|
|
# Effect.putLine "Yay"
|
|
# |> Effect.after (\{} -> Effect.getLine)
|
|
# |> Effect.after (\line -> Effect.putLine line)
|
|
# else
|
|
# Effect.putLine "Nay"
|
|
#
|