aboutsummaryrefslogtreecommitdiff
path: root/tests/unit/module-introspection/module-introspection.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/unit/module-introspection/module-introspection.scm')
-rw-r--r--tests/unit/module-introspection/module-introspection.scm9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/unit/module-introspection/module-introspection.scm b/tests/unit/module-introspection/module-introspection.scm
index 48e1fbac..f51aacde 100644
--- a/tests/unit/module-introspection/module-introspection.scm
+++ b/tests/unit/module-introspection/module-introspection.scm
@@ -16,4 +16,13 @@
:export (nothing))
(define nothing '()))))
+(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))