summaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2013-07-19 01:59:18 -0400
committerJesse Luehrs <doy@tozt.net>2013-07-19 01:59:59 -0400
commit56de12a2999763ca14aefdf4ac1af1d527ccbc71 (patch)
treed612dff83690f7fe722a1d44039ff582f7786e8e /lib
parentc4af186f76844b38e775e3454545acc84b4f144a (diff)
downloadparse-keyword-56de12a2999763ca14aefdf4ac1af1d527ccbc71.tar.gz
parse-keyword-56de12a2999763ca14aefdf4ac1af1d527ccbc71.zip
start trying to implement some helper functions
these don't really work properly, but it's a start
Diffstat (limited to 'lib')
-rw-r--r--lib/Parse/Keyword.pm14
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/Parse/Keyword.pm b/lib/Parse/Keyword.pm
index b2e2709..aca308f 100644
--- a/lib/Parse/Keyword.pm
+++ b/lib/Parse/Keyword.pm
@@ -25,6 +25,20 @@ sub import {
};
install_keyword_handler($sub, $keywords->{$keyword});
}
+
+ my @helpers = qw(
+ lex_peek_unichar
+ lex_read_space
+ lex_read_to
+ parse_block
+ ensure_linestr_len
+ linestr
+ );
+
+ for my $helper (@helpers) {
+ no strict 'refs';
+ *{ $caller . '::' . $helper } = \&{ __PACKAGE__ . '::' . $helper };
+ }
}
1;