diff options
| author | Andy Lester <andy@petdance.com> | 2005-12-22 04:57:17 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-12-22 17:09:59 +0000 |
| commit | c445ea15829fa1ef23c4453a817f9c096a56a192 (patch) | |
| tree | b82a090e6005af218bbc846b84e47ce12b81d39e /proto.h | |
| parent | efa32bb49fad39e670c055d4b6f557a0d2e1a8a2 (diff) | |
| download | perl-c445ea15829fa1ef23c4453a817f9c096a56a192.tar.gz | |
Ho! Ho! Ho! Santa brings consting!
Message-ID: <20051222165717.GA2874@petdance.com>
p4raw-id: //depot/perl@26450
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 15 |
1 files changed, 11 insertions, 4 deletions
@@ -3690,6 +3690,14 @@ STATIC bool S_utf8_mg_pos_init(pTHX_ SV *sv, MAGIC **mgp, STRLEN **cachep, I32 i __attribute__nonnull__(pTHX_6) __attribute__nonnull__(pTHX_7); +STATIC char * S_stringify_regexp(pTHX_ SV *sv, MAGIC *mg, STRLEN *lp) + __attribute__nonnull__(pTHX_1) + __attribute__nonnull__(pTHX_2); + +STATIC char * S_F0convert(NV nv, char *endbuf, STRLEN *len) + __attribute__nonnull__(2) + __attribute__nonnull__(3); + #if defined(PERL_OLD_COPY_ON_WRITE) STATIC void S_sv_release_COW(pTHX_ SV *sv, const char *pvx, STRLEN len, SV *after) __attribute__nonnull__(pTHX_1) @@ -3818,11 +3826,7 @@ STATIC SV* S_new_constant(pTHX_ const char *s, STRLEN len, const char *key, SV * __attribute__nonnull__(pTHX_3) __attribute__nonnull__(pTHX_4); -# if defined(DEBUGGING) -STATIC int S_tokereport(pTHX_ I32 rv); -# endif STATIC int S_ao(pTHX_ int toketype); -STATIC void S_depcom(pTHX); STATIC const char* S_incl_perldb(pTHX); # if defined(PERL_CR_FILTER) STATIC I32 S_cr_textfilter(pTHX_ int idx, SV *sv, int maxlen); @@ -3830,6 +3834,9 @@ STATIC void S_strip_return(pTHX_ SV *sv) __attribute__nonnull__(pTHX_1); # endif +# if defined(DEBUGGING) +STATIC int S_tokereport(pTHX_ I32 rv); +# endif #endif #if defined(PERL_IN_UNIVERSAL_C) || defined(PERL_DECL_PROT) |