Mercurial > repos > tabletprog
view samples/ui.tp @ 367:e2c1309ab750
Use dict hash instead of dict linear in JSON parser. Implement basic string escapes in JSON parser.
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 09 Aug 2015 18:07:23 -0700 |
parents | b8f721bde066 |
children |
line wrap: on
line source
#{ main <- { wind <- ui window: #{ title <- "Quiche UI Test" color <- ui r: 192u8 g: 192u8 b: 192u8 children <- #[ ui image: #{ source <- "944.bmp" } ui text: #{ text <- "The quick brown fox\njumps over the lazy dog." } ] } wind show: ui enterEventLoop } }