variable-reference->module-source test

2011-03-25 15:00:52 -06:00 · 2011-03-25 15:00:52 -06:00 · 00696cbfac
commit 00696cbfac
parent ef200b3e7e
1 changed files with 8 additions and 0 deletions
--- a/collects/tests/racket/namespac.rktl
+++ b/collects/tests/racket/namespac.rktl
@ -168,4 +168,12 @@

 ;; ----------------------------------------

+(module va->ms racket/base
+  (provide modsrc)
+  (define modsrc (variable-reference->module-source (#%variable-reference))))
+
+(test 'va->ms dynamic-require ''va->ms 'modsrc)
+
+;; ----------------------------------------
+
 (report-errs)