Commit | Line | Data |
---|---|---|
08402297 AT |
1 | @ Test 0 xor 0 = 0 |
2 | SSSSN | PUSH 0 | |
3 | SSSSN | PUSH 0 | |
4 | NSTTSTSTTN | JSR > 101110 (xor) | |
5 | NSTTSSTN | JSR > 1001 (print number from stack) | |
6 | ||
7 | @ Test 0 xor 1 = 1 | |
8 | SSSSN | PUSH 0 | |
9 | SSSTN | PUSH +1 | |
10 | NSTTSTSTTN | JSR > 101110 (xor) | |
11 | NSTTSSTN | JSR > 1001 (print number from stack) | |
12 | ||
13 | @ Test 1 xor 1 = 0 | |
14 | SSSTN | PUSH +1 | |
15 | SSSTN | PUSH +1 | |
16 | NSTTSTSTTN | JSR > 101110 (xor) | |
17 | NSTTSSTN | JSR > 1001 (print number from stack) | |
18 | ||
19 | @ Test 1 xor 1...1 = 1...10 | |
20 | SSSTN | PUSH +1 | |
21 | SSTTN | PUSH -1 | |
22 | NSTTSTSTTN | JSR > 101110 (xor) | |
23 | NSTTSSTN | JSR > 1001 (print number from stack) | |
24 | ||
25 | @ Test 1010...1010 xor 0101...0101 = 1...1 | |
26 | @ Note that -6148914691236517206 = 1010...1010 in twos-complement but we | |
27 | @ enter it in sign magnitude format so the bit pattern appears different. | |
28 | SSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTTSN | PUSH -6148914691236517206 | |
29 | SSSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTSTN | PUSH +6148914691236517205 | |
30 | NSTTSTSTTN | JSR > 101110 (xor) | |
31 | NSTTSSTN | JSR > 1001 (print number from stack) | |
32 | ||
33 | @ All done. | |
34 | NNN | DIE | |
35 | ||
36 | #include <logic.pvvs> | |
37 | #include <stdio.pvvs> |