Fix several X::AdHoc -> X::Undeclared::Symbols

Raku · Aug 17, 2014 · 400b1df · 400b1df
1 parent 6aeac74
commit 400b1df
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 4 deletions.
diff --git a/S02-literals/types.t b/S02-literals/types.t
@@ -30,7 +30,7 @@ lives_ok { EVAL 'class Task { has $.a }; Task.new(a => 3 );' },
 # time>
 
 throws_like { EVAL q[caffeine(EVAL('sub caffeine($a){~$a}'))] },
-  X::AdHoc,
+  X::Undeclared::Symbols,
   'Post declaration necessary';
 
 # vim: ft=perl6

diff --git a/S02-literals/underscores.t b/S02-literals/underscores.t
@@ -22,7 +22,7 @@ throws_like { EVAL '1__0' },
   "Multiple embedded underscores fail";
 
 throws_like { EVAL '_10' },
-  X::AdHoc,
+  X::Undeclared::Symbols,
   "Leading underscore fails";
 
 throws_like { EVAL '10_' },

diff --git a/S02-names-vars/names.t b/S02-names-vars/names.t
@@ -111,7 +111,7 @@ isa_ok (rule => 1), Pair, 'rule => something creates a Pair';
 # RT #69752
 {
     throws_like { EVAL 'Module.new' },
-      X::AdHoc,
+      X::Undeclared::Symbols,
       'error message mentions name not recognized, no maximum recursion depth exceeded';
 }
 

diff --git a/S02-names/our.t b/S02-names/our.t
@@ -9,7 +9,7 @@ plan 10;
     lives_ok { EVAL 'our sub eval_born { 5 }'},
       'can define a sub in eval';
     throws_like { EVAL 'eval_born()' },
-      X::AdHoc,
+      X::Undeclared::Symbols,
       'call to eval-born sub outside eval dies';
     is &OUR::eval_born(), 5, 'call to eval-born our sub via OUR works';
 }