view samples/bitwise.tp @ 167:5a6a55592c45

Fix some JSON parser bugs
author Mike Pavone <pavone@retrodev.com>
date Sun, 11 Aug 2013 03:01:05 -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"
	}
}