summaryrefslogtreecommitdiff
path: root/guile
diff options
context:
space:
mode:
authorDirk-Jan C. Binnema <djcb@djcbsoftware.nl>2023-09-12 19:30:18 +0300
committerDirk-Jan C. Binnema <djcb@djcbsoftware.nl>2023-09-12 21:38:57 +0300
commit2f5602b93824d708d603376c47da391b7f2b106f (patch)
treec15cc263923cbc45c929ba7b474104218a976eb9 /guile
parent805c5aa287323bf7d4443bef30c1045795354501 (diff)
unit tests: improve
and add a new one for the indexer
Diffstat (limited to 'guile')
-rwxr-xr-xguile/tests/test-mu-guile.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/guile/tests/test-mu-guile.scm b/guile/tests/test-mu-guile.scm
index d4d3740..afa4f48 100755
--- a/guile/tests/test-mu-guile.scm
+++ b/guile/tests/test-mu-guile.scm
@@ -50,8 +50,8 @@ exec guile -e main -s $0 $@
(n-results-or-exit "file:custer.*" 1)
(n-results-or-exit "j:sit*" 1)
(n-results-or-exit "mime:image/jpeg" 1)
- (n-results-or-exit "mime:text/plain" 13)
- (n-results-or-exit "y:text*" 13)
+ (n-results-or-exit "mime:text/plain" 14)
+ (n-results-or-exit "y:text*" 14)
(n-results-or-exit "y:image*" 1)
(n-results-or-exit "mime:message/rfc822" 2))
@@ -97,8 +97,8 @@ exec guile -e main -s $0 $@
(define (test-stats)
"Test statistical functions."
;; average
- (num-equal-or-exit (mu:average mu:size) 82152/13)
- (num-equal-or-exit (floor (mu:stddev mu:size)) 13020.0)
+ (num-equal-or-exit (mu:average mu:size) 82601/14)
+ (num-equal-or-exit (floor (mu:stddev mu:size)) 12637.0)
(num-equal-or-exit (mu:max mu:size) 46308)
(num-equal-or-exit (mu:min mu:size) 111))