#
# */ value test
#
FORWARD success;
FORWARD failure;
: MAIN 17 17 17 */ 17 = IF success ELSE failure ENDIF ;