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