Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-21 22:59:16 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Default test comparator should require same exactness.

Browse source
This commit is contained in:
Alex Shinn 2013-06-04 21:58:32 +09:00
parent 3704289138
commit bb00cdaf1b
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
lib/chibi/test.scm
View file

@ -671,6 +671,7 @@
(if (real? expect) (if (real? expect)
(and (inexact? expect) (and (inexact? expect)
(real? res) (real? res)
(inexact? res)
(approx-equal? expect res (current-test-epsilon))) (approx-equal? expect res (current-test-epsilon)))
(and (complex? res) (and (complex? res)
(complex? expect) (complex? expect)