Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Switch QAST::Regex attributes to use native types.
  • Loading branch information
jnthn committed Apr 5, 2012
1 parent f3ec4c5 commit ba5e1c1
Showing 1 changed file with 6 additions and 7 deletions.
13 changes: 6 additions & 7 deletions src/QAST/Regex.nqp
@@ -1,17 +1,16 @@
class QAST::Regex is QAST::Node {
has $!rxtype;
has $!subtype;
has $!backtrack;
has $!negate;
has $!min;
has $!max;
has str $!rxtype;
has str $!subtype;
has str $!backtrack;
has int $!negate;
has int $!min;
has int $!max;

method rxtype(*@value) { $!rxtype := @value[0] if @value; $!rxtype }
method subtype(*@value) { $!subtype := @value[0] if @value; $!subtype }
method backtrack(*@value) { $!backtrack := @value[0] if @value; $!backtrack }
method negate(*@value) { $!negate := @value[0] if @value; $!negate }
method min(*@value) { $!min := @value[0] if @value; $!min }
method max(*@value) { $!max := @value[0] if @value; $!max }

}

0 comments on commit ba5e1c1

Please sign in to comment.