[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Chicken-janitors] #1358: (test-exit) returns 0 code for 'error in group
From: |
Chicken Trac |
Subject: |
[Chicken-janitors] #1358: (test-exit) returns 0 code for 'error in group outside of tests' |
Date: |
Tue, 04 Apr 2017 13:06:16 -0000 |
#1358: (test-exit) returns 0 code for 'error in group outside of tests'
------------------------+--------------------------------
Reporter: caolan | Owner: ashinn
Type: defect | Status: new
Priority: major | Milestone: someday
Component: extensions | Version: 4.12.0
Keywords: | Estimated difficulty:
------------------------+--------------------------------
I'd expect the example below to exit with code 1, instead it exits with
code 0:
{{{
(use test)
(test-group "A"
(abort "error"))
(test-group "B"
(test-assert #t))
(test-exit)
}}}
{{{
$ csi -s run.scm
Warning: error in group outside of tests
Error: error
1 test completed in 0.0 seconds.
1 error (100%).
0 out of 1 (0%) tests passed.
-- done testing A
------------------------------------------------------------
-- testing B
-----------------------------------------------------------------
#t ................................................................... [
PASS]
1 test completed in 0.0 seconds.
1 out of 1 (100%) test passed.
-- done testing B
------------------------------------------------------------
$ echo $?
0
}}}
--
Ticket URL: <https://bugs.call-cc.org/ticket/1358>
CHICKEN Scheme <https://www.call-cc.org/>
CHICKEN Scheme is a compiler for the Scheme programming language.
- [Chicken-janitors] #1358: (test-exit) returns 0 code for 'error in group outside of tests',
Chicken Trac <=