Adjust # tests because throws_like is now just 1

Raku · May 15, 2014 · ab5d8ac · ab5d8ac
1 parent 8ebd17f
commit ab5d8ac
Show file tree

Hide file tree

Showing 14 changed files with 14 additions and 16 deletions.
diff --git a/S02-names-vars/varnames.t b/S02-names-vars/varnames.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 20;
+plan 12;
 
 # L<S02/Names and Variables/special variables of Perl 5 are going away>
 

diff --git a/S02-types/array.t b/S02-types/array.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 99;
+plan 93;
 
 #L<S02/Mutable types/Array>
 

diff --git a/S03-operators/range-basic.t b/S03-operators/range-basic.t
@@ -4,7 +4,7 @@ use Test;
 use lib 't/spec/packages';
 use Test::Util;
 
-plan 144;
+plan 140;
 
 {
     my $range = 2..6;

diff --git a/S04-statements/repeat.t b/S04-statements/repeat.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 21;
+plan 19;
 
 # L<S04/The C<repeat> statement/"more Pascal-like repeat loop">
 

diff --git a/S05-metasyntax/unknown.t b/S05-metasyntax/unknown.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 13;
+plan 11;
 
 # L<S05/Simplified lexical parsing of patterns/not all non-identifier glyphs are currently meaningful as metasyntax>
 

diff --git a/S05-substitution/subst.t b/S05-substitution/subst.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 141;
+plan 140;
 
 # L<S05/Substitution/>
 

diff --git a/S06-macros/unquoting.t b/S06-macros/unquoting.t
@@ -4,7 +4,7 @@ use lib 't/spec/packages';
 use Test::Util;
 
 use Test;
-plan 10;
+plan 5;
 
 # editorial note:
 # macros in this file have been named after 20th-century physicists.
@@ -67,7 +67,6 @@ plan 10;
 }
 
 { # unquotes must evaluate to ASTs
-    #?does 5
     throws_like 'macro bohm() { quasi { {{{"not an AST"}}} } }; bohm',
                 X::TypeCheck::Splice,
                 got      => Str,

diff --git a/S11-modules/import-multi.t b/S11-modules/import-multi.t
@@ -3,7 +3,7 @@ use Test;
 use lib 't/spec/packages';
 use Test::Util;
 
-plan 19;
+plan 17;
 
 # L<S11/Importing without loading>
 

diff --git a/S11-modules/import.t b/S11-modules/import.t
@@ -2,7 +2,7 @@ use v6;
 use Test;
 use lib 't/spec/packages';
 use Test::Util;
-plan 22;
+plan 16;
 
 # L<S11/Importing without loading>
 

diff --git a/S12-introspection/meta-class.t b/S12-introspection/meta-class.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 13;
+plan 12;
 
 =begin pod
 

diff --git a/S12-methods/private.t b/S12-methods/private.t
@@ -3,7 +3,7 @@ use Test;
 use lib 't/spec/packages';
 use Test::Util;
 
-plan 16;
+plan 12;
 
 # L<S12/Private methods/"Private methods are declared using">
 

diff --git a/S17-supply/migrate.t b/S17-supply/migrate.t
@@ -4,7 +4,7 @@ use lib 't/spec/packages';
 use Test;
 use Test::Util;
 
-plan 25;
+plan 23;
 
 #?rakudo.jvm todo "D: doesn't work in signatures"
 dies_ok { Supply.migrate }, 'can not be called as a class method';

diff --git a/S32-array/create.t b/S32-array/create.t
@@ -1,5 +1,6 @@
 use v6;
 use Test;
+plan 6;
 
 # L<S32::Containers/"Array"/"=item ">
 
@@ -9,8 +10,6 @@ built-in "Array" tests
 
 =end pod
 
-plan 8;
-
 my $array_obj = Array.new(4, 5, 6);
 is($array_obj.WHAT.gist, Array.gist, 'Creating a new list object with new works.');
 is($array_obj, list(4, 5, 6), 'The list object contains the right values.');

diff --git a/S32-num/rand.t b/S32-num/rand.t
@@ -4,7 +4,7 @@ use Test;
 use lib 't/spec/packages';
 use Test::Util;
 
-plan 115;
+plan 113;
 
 =begin pod