roc/examples/inspect-gui.roc

37 lines
819 B
Plaintext
Raw Normal View History

app "inspect-gui"
packages { pf: "gui/platform/main.roc" }
imports [
Inspect,
2023-06-23 05:26:42 +03:00
Community,
GuiFormatter,
]
provides [render] to pf
render =
2023-06-23 05:26:42 +03:00
Community.empty
|> Community.addPerson {
firstName: "John",
lastName: "Smith",
age: 27,
hasBeard: Bool.true,
2023-06-23 05:26:42 +03:00
favoriteColor: Blue,
}
2023-06-23 05:26:42 +03:00
|> 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.inspect
|> GuiFormatter.toGui