mirror of
https://github.com/forth-ev/VolksForth.git
synced 2024-11-22 20:34:07 +00:00
add lshift, rshift and 2over to ans-shim.fth
This commit is contained in:
parent
760848aa25
commit
6dbacecb9b
@ -7,3 +7,8 @@
|
|||||||
|
|
||||||
: invert not ;
|
: invert not ;
|
||||||
|
|
||||||
|
: lshift 0 DO 2* LOOP ;
|
||||||
|
|
||||||
|
: rshift 0 DO 2/ 32767 and LOOP ;
|
||||||
|
|
||||||
|
: 2over 3 pick 3 pick ;
|
||||||
|
Loading…
Reference in New Issue
Block a user