1 files changed, 15 insertions, 0 deletions
diff --git a/tests/unit/module-introspection/static-util.scm b/tests/unit/module-introspection/static-util.scm
new file mode 100644
index 00000000..f9b7e17e
--- /dev/null
+++ b/tests/unit/module-introspection/static-util.scm
@@ -0,0 +1,15 @@
+(define-module (test module-introspection static-util)
+  :use-module (srfi srfi-64)
+  :use-module (srfi srfi-88)
+  :use-module (hnh module-introspection static-util))
+
+(test-equal "All forms"
+    '((define (f x)
+        (* x 2))
+      (define-module (a)
+        :use-module (srfi srfi-1)
+        :export (f)))
+  (call-with-input-file "tests/test-module-tree/a.scm" get-forms))
+
+
+'((hnh module-introspection static-util))