#JS-Forth, 32 bytes
JS-Forth, 32 bytes
Not super short, but it's shorter than Java. This function pushes the result onto the stack. This requires JS-Forth because I use <<.
: f dup dup * 1- over 1- << 1+ ;
#JS-Forth, 32 bytes
Not super short, but it's shorter than Java. This function pushes the result onto the stack. This requires JS-Forth because I use <<.
: f dup dup * 1- over 1- << 1+ ;
JS-Forth, 32 bytes
Not super short, but it's shorter than Java. This function pushes the result onto the stack. This requires JS-Forth because I use <<.
: f dup dup * 1- over 1- << 1+ ;
#JS-Forth, 32 bytes
Not super short, but it's shorter than Java. This function pushes the result onto the stack. This requires JS-Forth because I use <<.
: f dup dup * 1- over 1- << 1+ ;