diff --git a/core/kernel/kernel-tests.factor b/core/kernel/kernel-tests.factor index a1942a4de8..2d1d044876 100644 --- a/core/kernel/kernel-tests.factor +++ b/core/kernel/kernel-tests.factor @@ -22,10 +22,12 @@ IN: kernel.tests } } [ 1 2 10 [ 3array ] 2with map ] unit-test + ! Don't leak extra roots if error is thrown { } [ 1000 [ [ 3 throw ] ignore-errors ] times ] unit-test -{ } [ 1000 [ [ -1 f ] ignore-errors ] times ] unit-test +[ -1 f ] must-fail +{ } [ 1000 [ [ -1 f ] ignore-errors ] times ] unit-test ! Travis CI fails ! Make sure we report the correct error on stack underflow [ clear drop ] [