annotate samples/bitwise.tp @ 323:eb5f1fca9b78
Fix infinite loop in foldr:with
| author |
Michael Pavone <pavone@retrodev.com> |
| date |
Mon, 23 Mar 2015 21:18:26 -0700 |
| parents |
4c7c3d3e0265 |
| children |
|
| rev |
line source |
|
136
|
1 #{
|
|
|
2 main <- {
|
|
|
3 a <- 0x42
|
|
|
4 b <- 0x7A
|
|
|
5 print: "a or b = " . (string: a or b) . "\n"
|
|
|
6 print: "a and b = " . (string: a and b) . "\n"
|
|
|
7 print: "a xor b = " . (string: a xor b) . "\n"
|
|
|
8 print: "lshift: a by: 3 = " . (string: (lshift: a by: 3)) . "\n"
|
|
|
9 print: "rshift: b by: 1 = " . (string: (rshift: b by: 1)) . "\n"
|
|
|
10 }
|
|
|
11 }
|
