Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 13:49:17 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fixing typo in handling of TEST_VERBOSE env var

Browse source
This commit is contained in:
Alex Shinn 2017-01-23 22:10:48 +09:00
parent 63cea7ccb5
commit d1eaf80ce8
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/chibi/test.scm
View file

@ -726,7 +726,7 @@
(define current-test-verbosity (define current-test-verbosity
(make-parameter (make-parameter
(cond ((get-environment-variable "TEST_VERBOSE") (cond ((get-environment-variable "TEST_VERBOSE")
=> (lambda (s) (not (member s "" "0")))) => (lambda (s) (not (member s '("" "0")))))
(else #f)))) (else #f))))
(define current-test-epsilon (make-parameter 1e-5)) (define current-test-epsilon (make-parameter 1e-5))
(define current-test-comparator (make-parameter test-equal?)) (define current-test-comparator (make-parameter test-equal?))