diff options
author | Karl Williamson <khw@cpan.org> | 2016-07-16 21:36:40 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2016-07-17 08:51:24 -0600 |
commit | bec88f1bea9be699db294f4c38b20fef00a7f605 (patch) | |
tree | f8308979ced111c273c780ef561584eeb53bfa4a /proto.h | |
parent | d5ea055af7777dae01aafd5eab0b2d9233acdb9c (diff) | |
download | perl-bec88f1bea9be699db294f4c38b20fef00a7f605.tar.gz |
regcomp.c: Silence compiler warning
It turns out that the changes in
0854ea0b9abfd9ff71c9dca1b5a5765dad2a20bd caused two functions to no
longer be used in re_comp.c
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -3799,6 +3799,9 @@ STATIC PerlIO * S_doopen_pm(pTHX_ SV *name) #endif #if !defined(PERL_EXT_RE_BUILD) # if defined(PERL_IN_REGCOMP_C) +STATIC void S__append_range_to_invlist(pTHX_ SV* const invlist, const UV start, const UV end); +#define PERL_ARGS_ASSERT__APPEND_RANGE_TO_INVLIST \ + assert(invlist) PERL_STATIC_INLINE IV* S_get_invlist_previous_index_addr(SV* invlist) __attribute__warn_unused_result__; #define PERL_ARGS_ASSERT_GET_INVLIST_PREVIOUS_INDEX_ADDR \ @@ -3807,6 +3810,9 @@ PERL_STATIC_INLINE IV* S_get_invlist_previous_index_addr(SV* invlist) PERL_STATIC_INLINE void S_invlist_clear(pTHX_ SV* invlist); #define PERL_ARGS_ASSERT_INVLIST_CLEAR \ assert(invlist) +STATIC void S_invlist_extend(pTHX_ SV* const invlist, const UV len); +#define PERL_ARGS_ASSERT_INVLIST_EXTEND \ + assert(invlist) PERL_STATIC_INLINE IV S_invlist_previous_index(SV* const invlist) __attribute__warn_unused_result__; #define PERL_ARGS_ASSERT_INVLIST_PREVIOUS_INDEX \ @@ -4847,9 +4853,6 @@ STATIC SV * S_space_join_names_mortal(pTHX_ char *const *array); assert(array) #endif #if defined(PERL_IN_REGCOMP_C) -STATIC void S__append_range_to_invlist(pTHX_ SV* const invlist, const UV start, const UV end); -#define PERL_ARGS_ASSERT__APPEND_RANGE_TO_INVLIST \ - assert(invlist) PERL_STATIC_INLINE UV* S__invlist_array_init(SV* const invlist, const bool will_have_0) __attribute__warn_unused_result__; #define PERL_ARGS_ASSERT__INVLIST_ARRAY_INIT \ @@ -4921,9 +4924,6 @@ STATIC SV* S_invlist_contents(pTHX_ SV* const invlist, const bool traditional_st #define PERL_ARGS_ASSERT_INVLIST_CONTENTS \ assert(invlist) -STATIC void S_invlist_extend(pTHX_ SV* const invlist, const UV len); -#define PERL_ARGS_ASSERT_INVLIST_EXTEND \ - assert(invlist) PERL_STATIC_INLINE UV S_invlist_highest(SV* const invlist) __attribute__warn_unused_result__; #define PERL_ARGS_ASSERT_INVLIST_HIGHEST \ |