view samples/bitwise.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 4c7c3d3e0265
children
line wrap: on
line source

#{
	main <- {
		a <- 0x42
		b <- 0x7A
		print: "a or b = " . (string: a or b) . "\n"
		print: "a and b = " . (string: a and b) . "\n"
		print: "a xor b = " . (string: a xor b) . "\n"
		print: "lshift: a by: 3 = " . (string: (lshift: a by: 3)) . "\n"
		print: "rshift: b by: 1 = " . (string: (rshift: b by: 1)) . "\n"
	}
}