Permalink
Browse files

add a test for RT #69760

  • Loading branch information...
1 parent 906a054 commit 7d2d2720f985dc5c0f0ab4b2cc2661156b7e263e @timo timo committed Feb 27, 2013
Showing with 6 additions and 0 deletions.
  1. +6 −0 S32-exceptions/misc.t
View
6 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;

0 comments on commit 7d2d272

Please sign in to comment.