tools.test: fix <test-failure> stack effect for file -> path change.

locals-and-roots
John Benediktsson 2016-03-29 08:06:56 -07:00
parent 19466f2d66
commit d99f67d5bb
1 changed files with 1 additions and 1 deletions

View File

@ -31,7 +31,7 @@ T{ error-type-holder
SYMBOL: verbose-tests?
t verbose-tests? set-global
: <test-failure> ( error experiment file line# -- test-failure )
: <test-failure> ( error experiment path line# -- test-failure )
test-failure new
swap >>line#
swap >>path