Add test for RT #72816

Raku · Feb 6, 2015 · 5cea494 · 5cea494
1 parent 69dda1f
commit 5cea494
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 276;
+plan 277;
 
 #?DOES 1
 throws_like { Buf.new().Str }, X::Buf::AsStr, method => 'Str';;
@@ -537,6 +537,9 @@ throws_like 'sub infix:<> (){}', X::Comp::Group,
 throws_like '&[doesntexist]', X::Comp, # XXX probably needs exception type fix
   'unknown operator should complain better';
 
+# RT #72816
+throws_like { $*an_undeclared_dynvar = 42 }, X::Dynamic::NotFound;
+
 {
     my $*foo = 0;
     throws_like { EVAL '$*foo = 1; say' }, X::Obsolete;