alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

* guile: update guile tests for slightly updated testcases

Browse Source
This commit is contained in:
djcb
2013-05-15 00:18:05 +03:00
parent 00d0cb0f28
commit cbe595483f
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
guile/tests/test-mu-guile.scm
View File

@ -97,9 +97,9 @@ exec guile -e main -s $0 $@
(define (test-stats) (define (test-stats)
"Test statistical functions." "Test statistical functions."
;; average ;; average
(num-equal-or-exit (mu:average mu:size) 82054/13) (num-equal-or-exit (mu:average mu:size) 82132/13)
(num-equal-or-exit (floor (mu:stddev mu:size)) 13002.0) (num-equal-or-exit (floor (mu:stddev mu:size)) 13020.0)
(num-equal-or-exit (mu:max mu:size) 46230) (num-equal-or-exit (mu:max mu:size) 46308)
(num-equal-or-exit (mu:min mu:size) 111)) (num-equal-or-exit (mu:min mu:size) 111))
(define (main args) (define (main args)