Add invert

This commit is contained in:
Koichi Nakamura 2021-01-04 09:31:24 +09:00
parent d197737bcc
commit 76c605af84

View file

@ -575,6 +575,10 @@ alias-builtin xor ^
\ ( n1 -- n2 )
: not false = ;
\ ( n1 -- n2 )
\ bitwise invert
: invert -1 xor ;
: > swap < ;
: <= > not ;
: >= < not ;