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
|
||||
|
||||
[ ] [ [ drop ] [ error. ] recover ] unit-test
|
||||
|
@ -38,3 +39,10 @@ T{ test-failure
|
|||
{ continuation f }
|
||||
} error.
|
||||
] 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