factor/library/test/compiler/bail-out.factor

IN: scratchpad
USE: compiler
USE: errors
USE: math
USE: test
USE: kernel

: bail-out call + ;

[ f ] [ [ \ bail-out compile ] [ not ] catch ] unit-test
[ f ] [ [ \ bail-out compile ] [ not ] catch ] unit-test

[ 4 ] [ [ 2 2 ] bail-out ] unit-test