mirror of
https://github.com/roc-lang/roc.git
synced 2025-09-27 05:49:08 +00:00
35 lines
796 B
Text
35 lines
796 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.addPerson {
|
|
firstName: "John",
|
|
lastName: "Smith",
|
|
age: 27,
|
|
hasBeard: Bool.true,
|
|
favoriteColor: Blue,
|
|
}
|
|
|> Community.addPerson {
|
|
firstName: "Debby",
|
|
lastName: "Johnson",
|
|
age: 47,
|
|
hasBeard: Bool.false,
|
|
favoriteColor: Green,
|
|
}
|
|
|> Community.addPerson {
|
|
firstName: "Jane",
|
|
lastName: "Doe",
|
|
age: 33,
|
|
hasBeard: Bool.false,
|
|
favoriteColor: RGB (255, 255, 0),
|
|
}
|
|
|> Community.addFriend 0 2
|
|
|> Community.addFriend 1 2
|
|
|> Inspect.toStr
|
|
|> Effect.putLine!
|