aboutsummaryrefslogtreecommitdiff
path: root/module/scripts
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2023-10-30 16:39:59 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2023-11-06 00:46:26 +0100
commit1000dde87131a77f456139bdf19e0a87b0776608 (patch)
tree503937fb0a6d5d6aa47a6e5d3be94c511c739286 /module/scripts
parentHAdd sections to introspection documentation. (diff)
downloadcalp-1000dde87131a77f456139bdf19e0a87b0776608.tar.gz
calp-1000dde87131a77f456139bdf19e0a87b0776608.tar.xz
Merge (hnh module-introspection static) into parent module.
It only contained a single binding, and the base module was already utilities.
Diffstat (limited to 'module/scripts')
-rw-r--r--module/scripts/module-dependants.scm1
-rw-r--r--module/scripts/module-imports.scm6
-rw-r--r--module/scripts/peg-to-graph.scm4
3 files changed, 6 insertions, 5 deletions
diff --git a/module/scripts/module-dependants.scm b/module/scripts/module-dependants.scm
index 6bda1917..f39c548d 100644
--- a/module/scripts/module-dependants.scm
+++ b/module/scripts/module-dependants.scm
@@ -15,7 +15,6 @@
:use-module (ice-9 format)
:use-module (texinfo string-utils)
:use-module (hnh module-introspection)
- :use-module ((hnh module-introspection static-util) :select (get-forms))
:export (main))
(define %summary "Print all modules which depend on module specified in target file.")
diff --git a/module/scripts/module-imports.scm b/module/scripts/module-imports.scm
index 7758c53a..39dc78da 100644
--- a/module/scripts/module-imports.scm
+++ b/module/scripts/module-imports.scm
@@ -13,8 +13,10 @@
(define-module (scripts module-imports)
:use-module ((srfi srfi-1) :select (lset-difference))
:use-module ((rnrs lists) :select (remp filter partition))
- :use-module ((hnh module-introspection) :select (module-declaration? unique-symbols))
- :use-module ((hnh module-introspection static-util) :select (get-forms))
+ :use-module ((hnh module-introspection)
+ :select (module-declaration?
+ unique-symbols
+ get-forms))
:use-module ((hnh module-introspection module-uses) :select (module-uses*))
:export (main)
)
diff --git a/module/scripts/peg-to-graph.scm b/module/scripts/peg-to-graph.scm
index afd7a4c3..82974042 100644
--- a/module/scripts/peg-to-graph.scm
+++ b/module/scripts/peg-to-graph.scm
@@ -1,7 +1,7 @@
(define-module (scripts peg-to-graph)
:use-module ((graphviz) :prefix #{gv:}#)
- :use-module ((hnh module-introspection) :select (unique-symbols))
- :use-module ((hnh module-introspection static-util) :select (get-forms))
+ :use-module ((hnh module-introspection)
+ :select (unique-symbols get-forms))
:use-module (srfi srfi-1)
:use-module (ice-9 match)
:use-module (hnh util options)