en:pfw:dlshift_drshift
Differences
This shows you the differences between two versions of the page.
| Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
| en:pfw:dlshift_drshift [2024-04-09 14:32] – [Coded with LSHIFT and RSHIFT] albert | en:pfw:dlshift_drshift [2024-04-09 14:41] (current) – [Test results (noForth t)] albert | ||
|---|---|---|---|
| Line 40: | Line 40: | ||
| : (TEST) ( ud ud -- ) 2over 2over du.hex du.hex | : (TEST) ( ud ud -- ) 2over 2over du.hex du.hex | ||
| cr ." #shifts dlshift--------- drshift---------" | cr ." #shifts dlshift--------- drshift---------" | ||
| - | 32 2* 3 + -2 | + | 32 2* 2 + -2 |
| do cr i 3 and 0= if cr then i 7 .r space | do cr i 3 and 0= if cr then i 7 .r space | ||
| 2over 2over i dlshift du.hex i drshift du.hex | 2over 2over i dlshift du.hex i drshift du.hex | ||
| Line 136: | Line 136: | ||
| 40 0000000000000000 0000000000000000 | 40 0000000000000000 0000000000000000 | ||
| - | 41 0000000000000000 0000000000000000 | + | 41 0000000000000000 0000000000000000 OK.0 |
| - | 42 0000000000000000 0000000000000000 | + | |
| </ | </ | ||
| < | < | ||
| - | |||
| @)test2 0000000000000001 8000000000000000 | @)test2 0000000000000001 8000000000000000 | ||
| #shifts dlshift--------- drshift--------- | #shifts dlshift--------- drshift--------- | ||
| Line 227: | Line 225: | ||
| 40 0000000000000000 0000000000000000 | 40 0000000000000000 0000000000000000 | ||
| - | | + | 41 0000000000000000 0000000000000000 |
| - | | + | |
| </ | </ | ||
| ===== Contributions ===== | ===== Contributions ===== | ||
en/pfw/dlshift_drshift.1712665928.txt.gz · Last modified: 2024-04-09 14:32 by albert