add a test for RT #69760

Raku · Feb 27, 2013 · 7d2d272 · 7d2d272
1 parent 906a054
commit 7d2d272
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -378,4 +378,10 @@ if $emits_suggestions {
 
 throws_like 'class Foobar is Foobar', X::Inheritance::SelfInherit, name => "Foobar";
 
+{
+    # RT #69760
+    my $code = q{class GrammarUserClass { method bar { PostDeclaredGrammar.parse('OH HAI'); } }; grammar PostDeclaredGrammar { rule TOP { .* } }; GrammarUserClass.bar;};
+    throws_like $code, X::Undeclared::Symbols, post_types => (Quux => *);
+}
+
 done;