Permalink
Browse files

[GGE::Perl6Regex] made $!exp public

So that we can iterate on the expression tree after generating the regex.
  • Loading branch information...
1 parent 50141d5 commit c92b178ecd1e270c65e6ce853063537bb6540e56 @masak committed Apr 7, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 lib/GGE/Perl6Regex.pm
@@ -10,7 +10,7 @@ class GGE::Exp::WS is GGE::Exp::Subrule {
}
class GGE::Perl6Regex {
- has GGE::Exp $!exp;
+ has GGE::Exp $.exp;
has Callable $!binary;
my &unescape = -> @codes { join '', map { chr(:16($_)) }, @codes };

0 comments on commit c92b178

Please sign in to comment.