diff options
author | Yves Orton <demerphq@gmail.com> | 2006-09-17 16:57:57 +0200 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-09-25 20:47:34 +0000 |
commit | 84da74a7adb7db2354917b83df794f4983438fcd (patch) | |
tree | 30eb008d7faac399df0a3f3cd9085b782eae49a8 /perl.h | |
parent | 1c540e1c282c205aa9027fe0147eccdd12cfba93 (diff) | |
download | perl-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.h | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -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*); |