5 files changed, 16 insertions, 0 deletions
diff --git a/tests/test-module-tree/README.md b/tests/test-module-tree/README.md
new file mode 100644
index 00000000..07cdca5d
--- /dev/null
+++ b/tests/test-module-tree/README.md
@@ -0,0 +1,4 @@
+Test module tree
+================
+
+This directory contains test data, primarily for the module-introspection.
diff --git a/tests/test-module-tree/a.scm b/tests/test-module-tree/a.scm
new file mode 100644
index 00000000..c332b884
--- /dev/null
+++ b/tests/test-module-tree/a.scm
@@ -0,0 +1,6 @@
+(define-module (a)
+  :use-module (srfi srfi-1)
+  :export (f))
+
+(define (f x)
+  (* x 2))
diff --git a/tests/test-module-tree/a/b.scm b/tests/test-module-tree/a/b.scm
new file mode 100644
index 00000000..3ffb0c99
--- /dev/null
+++ b/tests/test-module-tree/a/b.scm
@@ -0,0 +1,2 @@
+(define-module (a b)
+  )
diff --git a/tests/test-module-tree/a/c.scm b/tests/test-module-tree/a/c.scm
new file mode 100644
index 00000000..c5a369a3
--- /dev/null
+++ b/tests/test-module-tree/a/c.scm
@@ -0,0 +1,3 @@
+;;; This is not a module!
+
+(+ 1 2)
diff --git a/tests/test-module-tree/b.scm b/tests/test-module-tree/b.scm
new file mode 100644
index 00000000..341fab35
--- /dev/null
+++ b/tests/test-module-tree/b.scm
@@ -0,0 +1 @@
+(define-module (b))