summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2006-09-17 16:57:57 +0200
committerNicholas Clark <nick@ccl4.org>2006-09-25 20:47:34 +0000
commit84da74a7adb7db2354917b83df794f4983438fcd (patch)
tree30eb008d7faac399df0a3f3cd9085b782eae49a8 /perl.h
parent1c540e1c282c205aa9027fe0147eccdd12cfba93 (diff)
downloadperl-84da74a7adb7db2354917b83df794f4983438fcd.tar.gz
Add hook for re_dup() into regex engine as reg_dupe (make re
Message-ID: <9b18b3110609170557r73d94c18v90285bd57a38b876@mail.gmail.com> Date: Sun, 17 Sep 2006 14:57:57 +0200 p4raw-id: //depot/perl@28891
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl.h b/perl.h
index 0f71630819..b4cd6feb02 100644
--- a/perl.h
+++ b/perl.h
@@ -200,6 +200,7 @@
#define CALLREG_INTUIT_START CALL_FPTR(PL_regint_start)
#define CALLREG_INTUIT_STRING CALL_FPTR(PL_regint_string)
#define CALLREGFREE CALL_FPTR(PL_regfree)
+#define CALLREGDUPE CALL_FPTR(PL_regdupe)
/*
* Because of backward compatibility reasons the PERL_UNUSED_DECL
@@ -4327,6 +4328,7 @@ typedef char* (CPERLscope(*re_intuit_start_t)) (pTHX_ regexp *prog, SV *sv,
struct re_scream_pos_data_s *d);
typedef SV* (CPERLscope(*re_intuit_string_t)) (pTHX_ regexp *prog);
typedef void (CPERLscope(*regfree_t)) (pTHX_ struct regexp* r);
+typedef regexp*(CPERLscope(*regdupe_t)) (pTHX_ const regexp* r, CLONE_PARAMS *param);
typedef void (*DESTRUCTORFUNC_NOCONTEXT_t) (void*);
typedef void (*DESTRUCTORFUNC_t) (pTHX_ void*);