summaryrefslogtreecommitdiffstats
path: root/Keyword.xs
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2013-07-23 18:56:20 -0400
committerJesse Luehrs <doy@tozt.net>2013-07-23 18:56:20 -0400
commit60b8b4ddf6ce5280991a87fe3947aa769bf9cb8b (patch)
treeee567c74cf1bcef7d44490f1204135e0ddb18f24 /Keyword.xs
parentec07fc746048ae4e894e7cb327938ccfe3eb7644 (diff)
downloadparse-keyword-60b8b4ddf6ce5280991a87fe3947aa769bf9cb8b.tar.gz
parse-keyword-60b8b4ddf6ce5280991a87fe3947aa769bf9cb8b.zip
pass the keyword name to parser functions
Diffstat (limited to 'Keyword.xs')
-rw-r--r--Keyword.xs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Keyword.xs b/Keyword.xs
index 0cad122..a697266 100644
--- a/Keyword.xs
+++ b/Keyword.xs
@@ -65,6 +65,8 @@ static OP *parser_callback(pTHX_ GV *namegv, SV *psobj, U32 *flagsp)
*/
PUSHMARK(SP);
+ mXPUSHp(GvNAME(namegv), GvNAMELEN(namegv));
+ PUTBACK;
count = call_sv(psobj, G_ARRAY);
SPAGAIN;
if (count > 1) {