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