kernel: don't test callstack overflow on OpenBSD or Windows
parent
46ec4ff093
commit
43ac59a9f4
|
@ -1,7 +1,8 @@
|
||||||
USING: arrays byte-arrays kernel kernel.private math memory
|
USING: arrays byte-arrays kernel kernel.private math memory
|
||||||
namespaces sequences tools.test math.private quotations
|
namespaces sequences tools.test math.private quotations
|
||||||
continuations prettyprint io.streams.string debugger assocs
|
continuations prettyprint io.streams.string debugger assocs
|
||||||
sequences.private accessors locals.backend grouping words ;
|
sequences.private accessors locals.backend grouping words
|
||||||
|
system ;
|
||||||
IN: kernel.tests
|
IN: kernel.tests
|
||||||
|
|
||||||
[ 0 ] [ f size ] unit-test
|
[ 0 ] [ f size ] unit-test
|
||||||
|
@ -48,7 +49,9 @@ IN: kernel.tests
|
||||||
|
|
||||||
: overflow-c ( -- ) overflow-c overflow-c ;
|
: overflow-c ( -- ) overflow-c overflow-c ;
|
||||||
|
|
||||||
[ overflow-c ] [ { "kernel-error" 14 f f } = ] must-fail-with
|
os [ windows? ] [ openbsd? ] bi or [
|
||||||
|
[ overflow-c ] [ { "kernel-error" 14 f f } = ] must-fail-with
|
||||||
|
] unless
|
||||||
|
|
||||||
[ -7 <byte-array> ] must-fail
|
[ -7 <byte-array> ] must-fail
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue