That seems reasonable to me. Please do.

Here it is (together with a gentle reminder at the end of the .t file :-)

But feel free to leave this line out.


Uwe
Index: t/p6rules/anchors.t
===================================================================
--- t/p6rules/anchors.t	(revision 8065)
+++ t/p6rules/anchors.t	(working copy)
@@ -1,4 +1,4 @@
-use Parrot::Test 'no_plan';
+use Parrot::Test tests => 26;
 use Parrot::Test::PGE;
 
 $str = q{abc
@@ -36,3 +36,7 @@
 p6rule_isnt($str, 'ghi\B', 'EOS nonword boundary');
 p6rule_is  ($str, 'a\B',   '\w\w nonword boundary');
 p6rule_is  ($str, '-\B',   '\W\W nonword boundary');
+
+
+
+# dont forget to change the number of tests :-)
Index: t/p6rules/capture.t
===================================================================
--- t/p6rules/capture.t	(revision 8065)
+++ t/p6rules/capture.t	(working copy)
@@ -1,4 +1,4 @@
-use Parrot::Test 'no_plan';
+use Parrot::Test tests => 34;
 use Parrot::Test::PGE;
 
 p6rule_is  ('zzzabcdefzzz', '(a.)..(..)', 'basic match');
@@ -66,3 +66,7 @@
 
 p6rule_like('123x', '(.)*x',
             qr/mob: <123x @ 0>/, 'repeated dot capture')
+
+
+
+# dont forget to change the number of test :-)
Index: t/p6rules/backtrack.t
===================================================================
--- t/p6rules/backtrack.t	(revision 8065)
+++ t/p6rules/backtrack.t	(working copy)
@@ -1,4 +1,4 @@
-use Parrot::Test 'no_plan';
+use Parrot::Test tests => 11;
 use Parrot::Test::PGE;
 
 p6rule_is(  'bazaar', 'a* a', 'control');
@@ -15,3 +15,7 @@
 
 p6rule_is(  'whence', '[ when     ever ] | whence', 'full backtrack failure');
 p6rule_isnt('whence', '[ when ::: ever ] | whence', 'full backtrack failure');
+
+
+
+# dont forget to change the number of tests :-)
Index: t/p6rules/cclass.t
===================================================================
--- t/p6rules/cclass.t	(revision 8065)
+++ t/p6rules/cclass.t	(working copy)
@@ -1,4 +1,8 @@
-use Parrot::Test 'no_plan';
+use Parrot::Test tests => 1;
 use Parrot::Test::PGE;
 
 p6rule_is(  'abcdef', 'a\N+?f', 'lazy newline')
+
+
+
+# dont forget to change the number of tests :-)

Reply via email to