summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2007-02-13 21:27:33 +0100
committerH.Merijn Brand <h.m.brand@xs4all.nl>2007-02-13 19:43:15 +0000
commit93b32b6daeecaf211c8a9bf2a93d0f4701c279ab (patch)
treea0ff4796f46b034f006727d9e4e425c2efc2fbfb /perl.h
parenta3b492c399ef137d223bafd54197b14ebda3d9e0 (diff)
downloadperl-93b32b6daeecaf211c8a9bf2a93d0f4701c279ab.tar.gz
add hooks for capture buffers into regex engine.
Message-ID: <9b18b3110702131127q79cc6df1lb1480d9a40d15213@mail.gmail.com> p4raw-id: //depot/perl@30265
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h7
1 files changed, 7 insertions, 0 deletions
diff --git a/perl.h b/perl.h
index f1c88d4176..6104c63563 100644
--- a/perl.h
+++ b/perl.h
@@ -219,6 +219,13 @@
#define CALLREGFREE_PVT(prog) \
if(prog) CALL_FPTR((prog)->engine->free)(aTHX_ (prog))
+#define CALLREG_NUMBUF(rx,paren,usesv) \
+ CALL_FPTR((rx)->engine->numbered_buff_get)(aTHX_ (rx),(paren),(usesv))
+
+#define CALLREG_NAMEDBUF(rx,name,flags) \
+ CALL_FPTR((rx)->engine->named_buff_get)(aTHX_ (rx),(name),(flags))
+
+
#if defined(USE_ITHREADS)
#define CALLREGDUPE(prog,param) \
Perl_re_dup(aTHX_ (prog),(param))