view samples/bitwise.tp @ 136:4c7c3d3e0265

Add bitwise operation sample
author Mike Pavone <pavone@retrodev.com>
date Thu, 08 Aug 2013 20:04:49 -0700
parents
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"
	}
}