From 4a57d4fd2e7bc860bae264a8cae9fed2b088214d Mon Sep 17 00:00:00 2001 From: Leif Andersen Date: Thu, 31 Dec 2015 12:22:51 -0700 Subject: [PATCH] Make tests for raco doc more robust. --- doc-coverage/raco.rkt | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/doc-coverage/raco.rkt b/doc-coverage/raco.rkt index 400618f..88f7dab 100644 --- a/doc-coverage/raco.rkt +++ b/doc-coverage/raco.rkt @@ -109,7 +109,9 @@ (check-equal? (with-output-to-string (lambda () (system* (find-exe) "-l" "raco" "doc-coverage" "-r" "0.5" "racket/match"))) - "Module racket/match document ratio: 28/29\n") + (format "Module racket/match document ratio: ~a/~a\n" + (length (module->documented-exported-names 'racket/match)) + (length (module->all-exported-names 'racket/match)))) (check-equal? (with-output-to-string (lambda () (system* (find-exe) "-l" "raco" "doc-coverage" "-b" "match" "racket")))