roc/crates/cli/tests/test-projects/effectful/print_line.roc
Jan 68e524e110
snake_case-ify all remaining camelCase names in hiding (#7561)
* Snake-case-ify def names in comments

* Snake-case-ify def names in strings

* Snake-case-ify ignored function parameters

* Snake-case-ify test script names, for consistency

* Update CI snapshot to match snake_case

* snake case correction

---------

Co-authored-by: Anton-4 <17049058+Anton-4@users.noreply.github.com>
2025-02-05 16:05:03 +01:00

19 lines
457 B
Text

app [main!] { pf: platform "../test-platform-effects-zig/main.roc" }
import pf.Effect
main! : {} => {}
main! = \{} ->
["Welcome!", "What's your name?"]
|> List.for_each!(Effect.put_line!)
line = Effect.get_line!({})
if line == "secret" then
Effect.put_line!("You found the secret")
Effect.put_line!("Congratulations!")
else
{}
Effect.put_line!("You entered: ${line}")
Effect.put_line!("It is known")