[t] We now pass 24-module.t.

jnthn · Nov 19, 2010 · 38cad29 · 38cad29
1 parent 0210b86
commit 38cad29
Showing 1 changed file with 19 additions and 0 deletions.
diff --git a/t/nqp/24-module.t b/t/nqp/24-module.t
@@ -0,0 +1,19 @@
+#! nqp
+
+# check module
+
+plan(3);
+
+XYZ::foo('ok 1');
+XYZ::sayfoo();
+
+module XYZ {
+    our $value := 'ok 2';
+    our sub foo($x) { $value := $x; }
+    our sub sayfoo() { say($value // 'ok 1'); }
+    sayfoo();
+}
+
+XYZ::foo('ok 3');
+XYZ::sayfoo();
+