mirror of
https://github.com/roc-lang/roc.git
synced 2025-11-02 13:58:50 +00:00
19 lines
432 B
Text
19 lines
432 B
Text
app [main!] { pf: platform "effects-platform/main.roc" }
|
|
|
|
import pf.Effect
|
|
|
|
main! : {} => {}
|
|
main! = \{} ->
|
|
["Welcome!", "What's your name?"]
|
|
|> List.forEach! Effect.putLine!
|
|
|
|
line = Effect.getLine! {}
|
|
|
|
if line == "secret" then
|
|
Effect.putLine! "You found the secret"
|
|
Effect.putLine! "Congratulations!"
|
|
else
|
|
{}
|
|
|
|
Effect.putLine! "You entered: $(line)"
|
|
Effect.putLine! "It is known"
|