aboutsummaryrefslogtreecommitdiff
path: root/module/hnh/module-introspection/module-uses.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2023-02-23 06:08:04 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2023-04-10 22:58:54 +0200
commit3df2a2908ccb8904c3f5d1f40588a2bfd78152b2 (patch)
tree256ca007180d7d152fcb38f713daaf711662e150 /module/hnh/module-introspection/module-uses.scm
parentChange child/parent interface for vcomponent. (diff)
downloadcalp-3df2a2908ccb8904c3f5d1f40588a2bfd78152b2.tar.gz
calp-3df2a2908ccb8904c3f5d1f40588a2bfd78152b2.tar.xz
Fix guile3 deprecation notices.
Diffstat (limited to 'module/hnh/module-introspection/module-uses.scm')
-rw-r--r--module/hnh/module-introspection/module-uses.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/module/hnh/module-introspection/module-uses.scm b/module/hnh/module-introspection/module-uses.scm
index b82aa6d0..3bed2a5e 100644
--- a/module/hnh/module-introspection/module-uses.scm
+++ b/module/hnh/module-introspection/module-uses.scm
@@ -82,6 +82,8 @@
(_ '())))
;; find all use-modules forms, and return what they pull in
+;; NOTE this will pull in all forms looking like a (use-modules ...)
+;; form, even if they are quoted, or in a cond-expand
(define (module-use-module-uses forms)
(match forms
(('use-modules modules ...)