Skip to content
This repository
Browse code

remove eval_dies_with_error

  • Loading branch information...
commit 014fec34be61d49f8235b0eb1fe668f061bd8e35 1 parent 2a30970
Matthew Wilson authored June 02, 2012

Showing 1 changed file with 0 additions and 10 deletions. Show diff stats Hide diff stats

  1. 10  lib/Test.pm6
10  lib/Test.pm6 100644 → 100755
@@ -143,16 +143,6 @@ sub eval_lives_ok($code,$why?) is export {
143 143
 sub eval_dies_ok($code,$why?) is export {
144 144
     $*TEST-BUILDER.ok(no-control({ eval $code }) eq "die", $why);
145 145
 }
146  
-sub eval_dies_with_error($code, $error_pattern, $why?) is export {
147  
-    my $died_with_error;
148  
-    try {
149  
-        CATCH {
150  
-            $died_with_error = "$_" ~~ $error_pattern;
151  
-        }
152  
-        eval $code;
153  
-    }
154  
-    $*TEST-BUILDER.ok($died_with_error, $why);
155  
-}
156 146
 sub eval_succeeds_ok($code,$why?,:$ignore = ()) is export {
157 147
     $*TEST-BUILDER.ok(?(no-control({ eval $code }) eq any("", @$ignore)), $why);
158 148
 }

0 notes on commit 014fec3

Please sign in to comment.
Something went wrong with that request. Please try again.