From f3e7214ef19391ed2b6a3f7ed41d7ca4e3f93082 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Tue, 1 Feb 2022 01:03:33 +0100 Subject: Document module-dependants. --- scripts/module-dependants.scm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'scripts') diff --git a/scripts/module-dependants.scm b/scripts/module-dependants.scm index f1efb8cc..212a28c8 100755 --- a/scripts/module-dependants.scm +++ b/scripts/module-dependants.scm @@ -2,6 +2,13 @@ -e main -s !# +;;; Commentary: +;;; +;;; For a given module in the project, finds all other modules who uses that +;;; module, and break it down per symbol. +;;; +;;; Code: + (define module-dir (string-append (dirname (dirname (current-filename))) "/module")) @@ -102,7 +109,7 @@ (for-each (lambda (file) (format #t "• ~a~%" file)) files)) symbol-used-by) - (display (center-string "Unused" 80 #\= #\=)) (newline) + (display (center-string " Unused (except possibly internally) " 80 #\= #\=)) (newline) (for-each (lambda (symb) (format #t "• ~a~%" symb)) (lset-difference eqv? -- cgit v1.2.3