diff --git a/APPENDICES/A02-some-day-maybe/multi-no-match.t b/APPENDICES/A02-some-day-maybe/multi-no-match.t index 3bef4cda8b..05fdad0bd9 100644 --- a/APPENDICES/A02-some-day-maybe/multi-no-match.t +++ b/APPENDICES/A02-some-day-maybe/multi-no-match.t @@ -7,7 +7,7 @@ use Test; # Since there's yet no existing behaviour for some of such combinations, # X::Multi::NoMatch is thrown. This APPENDIX test file is for such tests. -plan 9; +plan 10; { # RT #129773 throws-like { [].splice: 0, [] }, X::Multi::NoMatch, @@ -36,3 +36,6 @@ dies-ok { 42.words: | }, # https://github.com/rakudo/rakudo/commit/742573724c dies-ok { 42.lines: | }, 'no infinite loop when given wrong args to Cool.lines'; + +throws-like { "".match: Nil }, X::Multi::NoMatch, + '.match with Nil matcher does not hang'; diff --git a/S05-substitution/match.t b/S05-substitution/match.t index 3e4c0ef88d..706ee7a2e1 100644 --- a/S05-substitution/match.t +++ b/S05-substitution/match.t @@ -2,7 +2,7 @@ use v6; use Test; -plan 19; +plan 18; # L @@ -48,7 +48,4 @@ is $m[0], 'oo', 'match object indexes as an array'; (for 1..10 { 'st' x $_ ~ 'Z' }), 'can .subst: /:i T/, "Z"'; } -throws-like { "".match: Nil }, X::Multi::NoMatch, - '.match with Nil matcher does not hang'; - # vim: ft=perl6