view samples/ui.tp @ 353:95bc24c729e6

Move right hand parameter to cmp in _compileBinary to a temp reg if it is a constant since those are only supported in the left hand param currently
author Michael Pavone <pavone@retrodev.com>
date Tue, 14 Apr 2015 19:54:03 -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
	}
}