PERL_CALLCONV void Perl_pop_scope(pTHX);
PERL_CALLCONV OP* Perl_prepend_elem(pTHX_ I32 optype, OP* head, OP* tail);
PERL_CALLCONV void Perl_push_scope(pTHX);
-/* PERL_CALLCONV OP* ref(pTHX_ OP* o, I32 type); */
+/* PERL_CALLCONV OP* Perl_ref(pTHX_ OP* o, I32 type); */
PERL_CALLCONV OP* Perl_refkids(pTHX_ OP* o, I32 type);
PERL_CALLCONV void Perl_regdump(pTHX_ const regexp* r)
__attribute__nonnull__(pTHX_1);
+PERL_CALLCONV void Perl_regdump(pTHX_ const regexp* r)
+ __attribute__nonnull__(pTHX_1);
+
PERL_CALLCONV SV* Perl_regclass_swash(pTHX_ const regexp *prog, const struct regnode *n, bool doinit, SV **listsvp, SV **altsvp)
__attribute__nonnull__(pTHX_2);
__attribute__nonnull__(pTHX_1);
#endif
-/* PERL_CALLCONV IV sv_2iv(pTHX_ SV* sv)
+/* PERL_CALLCONV IV Perl_sv_2iv(pTHX_ SV* sv)
__attribute__nonnull__(pTHX_1); */
PERL_CALLCONV IV Perl_sv_2iv_flags(pTHX_ SV* sv, I32 flags)
PERL_CALLCONV NV Perl_sv_2nv(pTHX_ SV* sv)
__attribute__nonnull__(pTHX_1);
-/* PERL_CALLCONV char* sv_2pv(pTHX_ SV* sv, STRLEN* lp)
+/* PERL_CALLCONV char* Perl_sv_2pv(pTHX_ SV* sv, STRLEN* lp)
__attribute__nonnull__(pTHX_1); */
PERL_CALLCONV char* Perl_sv_2pv_flags(pTHX_ SV* sv, STRLEN* lp, I32 flags)
PERL_CALLCONV char* Perl_sv_pvn_nomg(pTHX_ SV* sv, STRLEN* lp)
__attribute__nonnull__(pTHX_1);
-/* PERL_CALLCONV UV sv_2uv(pTHX_ SV* sv)
+/* PERL_CALLCONV UV Perl_sv_2uv(pTHX_ SV* sv)
__attribute__nonnull__(pTHX_1); */
PERL_CALLCONV UV Perl_sv_2uv_flags(pTHX_ SV* sv, I32 flags)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
-/* PERL_CALLCONV void sv_catpvn(pTHX_ SV* sv, const char* ptr, STRLEN len)
+/* PERL_CALLCONV void Perl_sv_catpvn(pTHX_ SV* sv, const char* ptr, STRLEN len)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2); */
-/* PERL_CALLCONV void sv_catsv(pTHX_ SV* dsv, SV* ssv)
+/* PERL_CALLCONV void Perl_sv_catsv(pTHX_ SV* dsv, SV* ssv)
__attribute__nonnull__(pTHX_1); */
PERL_CALLCONV void Perl_sv_chop(pTHX_ SV* sv, const char* ptr)
PERL_CALLCONV void Perl_sv_pos_b2u(pTHX_ SV* sv, I32* offsetp)
__attribute__nonnull__(pTHX_2);
-/* PERL_CALLCONV char* sv_pvn_force(pTHX_ SV* sv, STRLEN* lp)
+/* PERL_CALLCONV char* Perl_sv_pvn_force(pTHX_ SV* sv, STRLEN* lp)
__attribute__nonnull__(pTHX_1); */
PERL_CALLCONV char* Perl_sv_pvutf8n_force(pTHX_ SV* sv, STRLEN* lp)
PERL_CALLCONV void Perl_sv_setpvn(pTHX_ SV* sv, const char* ptr, STRLEN len)
__attribute__nonnull__(pTHX_1);
-/* PERL_CALLCONV void sv_setsv(pTHX_ SV* dsv, SV* ssv)
+/* PERL_CALLCONV void Perl_sv_setsv(pTHX_ SV* dsv, SV* ssv)
__attribute__nonnull__(pTHX_1); */
-/* PERL_CALLCONV void sv_taint(pTHX_ SV* sv)
+/* PERL_CALLCONV void Perl_sv_taint(pTHX_ SV* sv)
__attribute__nonnull__(pTHX_1); */
PERL_CALLCONV bool Perl_sv_tainted(pTHX_ SV* sv)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1); */
-/* PERL_CALLCONV char* sv_pv(pTHX_ SV *sv)
+/* PERL_CALLCONV char* Perl_sv_pv(pTHX_ SV *sv)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1); */
-/* PERL_CALLCONV char* sv_pvutf8(pTHX_ SV *sv)
+/* PERL_CALLCONV char* Perl_sv_pvutf8(pTHX_ SV *sv)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1); */
-/* PERL_CALLCONV char* sv_pvbyte(pTHX_ SV *sv)
+/* PERL_CALLCONV char* Perl_sv_pvbyte(pTHX_ SV *sv)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1); */
-/* PERL_CALLCONV STRLEN sv_utf8_upgrade(pTHX_ SV *sv)
+/* PERL_CALLCONV STRLEN Perl_sv_utf8_upgrade(pTHX_ SV *sv)
__attribute__nonnull__(pTHX_1); */
PERL_CALLCONV bool Perl_sv_utf8_downgrade(pTHX_ SV *sv, bool fail_ok)
STATIC void S_save_lines(pTHX_ AV *array, SV *sv)
__attribute__nonnull__(pTHX_2);
-STATIC OP* S_doeval(pTHX_ int gimme, OP** startop, CV* outside, U32 seq)
- __attribute__warn_unused_result__;
-
+STATIC bool S_doeval(pTHX_ int gimme, OP** startop, CV* outside, U32 seq);
STATIC PerlIO * S_check_type_and_open(pTHX_ const char *name, const char *mode)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_3);
# ifdef DEBUGGING
+STATIC void S_regdump_extflags(pTHX_ const char *lead, const U32 flags);
STATIC const regnode* S_dumpuntil(pTHX_ const regexp *r, const regnode *start, const regnode *node, const regnode *last, const regnode *plast, SV* sv, I32 indent, U32 depth)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
-PERL_CALLCONV regexp * Perl_get_re_arg(pTHX_ SV *sv, U32 flags, MAGIC **mgp);
+PERL_CALLCONV REGEXP * Perl_get_re_arg(pTHX_ SV *sv);
PERL_CALLCONV struct mro_meta* Perl_mro_meta_init(pTHX_ HV* stash)
__attribute__nonnull__(pTHX_1);