Author: pmichaud
Date: Thu Dec 18 14:54:29 2008
New Revision: 34089
Modified:
branches/main/compilers/nqp/t/15-module.t
Log:
[nqp]: Clean up a test file for :load :init semantics.
Modified: branches/main/compilers/nqp/t/15-module.t
==============================================================================
--- branches/main/compilers/nqp/t/15-module.t (original)
+++ branches/main/compilers/nqp/t/15-module.t Thu Dec 18 14:54:29 2008
@@ -2,17 +2,17 @@
# check module
-say('1..1');
-
-our $value := 'ok 2';
+XYZ::sayfoo();
+XYZ::foo('ok 3');
+XYZ::sayfoo();
module XYZ {
- our $value := 'not ok 1';
+ our $value := 'ok 1';
sub foo($x) { $value := $x; }
sub sayfoo() { say($value); }
+ say('1..3');
+ sayfoo();
+ foo('ok 2');
}
-XYZ::foo('ok 1');
-XYZ::sayfoo();
-
