roc/crates/cli/tests/test-projects/effectful/inspect_logging.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

35 lines
823 B
Text

#
# Shows how Roc values can be logged
#
app [main!] { pf: platform "../test-platform-effects-zig/main.roc" }
import pf.Effect
import Community
main! = \{} ->
Community.empty
|> Community.add_person({
first_name: "John",
last_name: "Smith",
age: 27,
has_beard: Bool.true,
favorite_color: Blue,
})
|> Community.add_person({
first_name: "Debby",
last_name: "Johnson",
age: 47,
has_beard: Bool.false,
favorite_color: Green,
})
|> Community.add_person({
first_name: "Jane",
last_name: "Doe",
age: 33,
has_beard: Bool.false,
favorite_color: RGB((255, 255, 0)),
})
|> Community.add_friend(0, 2)
|> Community.add_friend(1, 2)
|> Inspect.to_str
|> Effect.put_line!