debugger: adding a test case that breaks the fix for #1187.
parent
b102f138b3
commit
6bf1f1dd99
|
@ -1,4 +1,5 @@
|
||||||
USING: alien.syntax debugger kernel continuations tools.test ;
|
USING: accessors alien.syntax arrays continuations debugger
|
||||||
|
kernel namespaces tools.test ;
|
||||||
IN: debugger.tests
|
IN: debugger.tests
|
||||||
|
|
||||||
[ ] [ [ drop ] [ error. ] recover ] unit-test
|
[ ] [ [ drop ] [ error. ] recover ] unit-test
|
||||||
|
@ -38,3 +39,10 @@ T{ test-failure
|
||||||
{ continuation f }
|
{ continuation f }
|
||||||
} error.
|
} error.
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
|
[
|
||||||
|
{ "kernel-error" 3 0 "hi" }
|
||||||
|
{ 1 2 3 { "kernel-error" 3 0 "hi" } }
|
||||||
|
] [
|
||||||
|
[ 1 2 3 "hi" f <array> ] [ ] recover error-continuation get data>>
|
||||||
|
] unit-test
|
||||||
|
|
Loading…
Reference in New Issue