diff --git a/tests/more-tests/module-scoping-helper.rkt b/tests/more-tests/module-scoping-helper.rkt
new file mode 100644
index 0000000..abb79d9
--- /dev/null
+++ b/tests/more-tests/module-scoping-helper.rkt
@@ -0,0 +1,10 @@
+#lang planet dyoo/whalesong
+(require (for-syntax racket/base))
+(provide x x++ x=0)
+(define x 0)
+(define (set-x v)
+  (set! x v))
+(define-syntax (x++ stx)
+  #'(set-x (add1 x)))
+(define-syntax (x=0 stx)
+  #'(set-x 0))
\ No newline at end of file
diff --git a/tests/more-tests/module-scoping.rkt b/tests/more-tests/module-scoping.rkt
new file mode 100644
index 0000000..30b5bd7
--- /dev/null
+++ b/tests/more-tests/module-scoping.rkt
@@ -0,0 +1,13 @@
+#lang planet dyoo/whalesong
+(require "module-scoping-helper.rkt")
+x
+x++
+x++
+x
+x=0
+x++
+x
+x++
+x
+x++
+x
\ No newline at end of file