steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

debugger: simplify test case.

db4
John Benediktsson 2014-12-04 11:52:52 -08:00
parent d5b8f3d3b9
commit c7271658c7
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
basis/debugger/debugger-tests.factor
View File

@ -1,5 +1,5 @@
USING: accessors alien.syntax arrays continuations debugger USING: accessors alien.syntax continuations debugger kernel
kernel namespaces tools.test ; namespaces tools.test ;
IN: debugger.tests IN: debugger.tests
[ ] [ [ drop ] [ error. ] recover ] unit-test [ ] [ [ drop ] [ error. ] recover ] unit-test
@ -40,9 +40,6 @@ T{ test-failure
} error. } error.
] unit-test ] unit-test
[ [ "foo" { 1 2 3 "foo" } ] [
{ "kernel-error" 3 0 "hi" } [ 1 2 3 "foo" throw ] [ ] recover error-continuation get data>>
{ 1 2 3 { "kernel-error" 3 0 "hi" } }
] [
[ 1 2 3 "hi" f <array> ] [ ] recover error-continuation get data>>
] unit-test ] unit-test