Mercurial > repos > tabletprog
changeset 136:4c7c3d3e0265
Add bitwise operation sample
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 08 Aug 2013 20:04:49 -0700 |
parents | f98790d8a53d |
children | 101fa04ee9e1 |
files | samples/bitwise.tp |
diffstat | 1 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/samples/bitwise.tp Thu Aug 08 20:04:49 2013 -0700 @@ -0,0 +1,11 @@ +#{ + 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" + } +}