Change two 'dies-ok' to 'throws-like'

Raku · Jun 18, 2015 · 3192739 · 3192739
1 parent 841ebd8
commit 3192739
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/S06-advanced/lexical-subs.t b/S06-advanced/lexical-subs.t
@@ -9,7 +9,8 @@ plan 11;
         my sub g(){"g"}; my sub h(){g()}; h();
     };
     is(f(), 'g', 'can indirectly call lexical sub');
-    eval-dies-ok('g', 'lexical sub not visible outside current scope');
+    throws-like 'g', X::Undeclared::Symbols,
+        'lexical sub not visible outside current scope';
 }
 
 {
@@ -64,7 +65,7 @@ plan 11;
 
 # RT #57788
 {
-    eval-dies-ok 'sub a { }; sub a { }';
+    throws-like 'sub a { }; sub a { }', X::Redeclaration;
 }
 
 # vim: ft=perl6 :