suzanne.soy/doc-coverage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix documentation statistics functions

Browse Source
This commit is contained in:
JackFirth 2015-02-20 23:46:56 -08:00
parent 04d28e74db
commit 49e64893cc
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
doc-coverage/export-count.rkt
View File

@ -2,10 +2,15 @@
(require "export-lists.rkt") (require "export-lists.rkt")
(provide module-num-exports
module-num-documented-exports
module-num-undocumented-exports
module-documentation-ratio)
(define module-num-exports (compose length module->all-exported-names)) (define module-num-exports (compose length module->all-exported-names))
(define module-num-documented-exports (compose length module->documented-exported-names)) (define module-num-documented-exports (compose length module->documented-exported-names))
(define module-num-undocumented-exports (compose length module->undocumented-exported-names)) (define module-num-undocumented-exports (compose length module->undocumented-exported-names))
(define (module-documentation% mod) (define (module-documentation-ratio mod)
(/ (module-num-documented-exports mod) (/ (module-num-documented-exports mod)
(module-num-undocumented-exports mod))) (module-num-exports mod)))