summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorTomasz Konojacki <me@xenu.pl>2021-06-04 22:05:04 +0200
committerxenu <me@xenu.pl>2021-06-09 19:32:14 +0200
commit6e512bc2beef5b8b17502db7edf50b5984776318 (patch)
treeedaaaa9d096a12cf43b5620afa8712a8951c1472 /sv.c
parent44e4059baf939468ae61cb63c0c2871c40147dc3 (diff)
downloadperl-6e512bc2beef5b8b17502db7edf50b5984776318.tar.gz
replace all instances of PERL_IMPLICIT_CONTEXT with MULTIPLICITY
Since the removal of PERL_OBJECT (acfe0abcedaf592fb4b9cb69ce3468308ae99d91) PERL_IMPLICIT_CONTEXT and MULTIPLICITY have been synonymous and they're being used interchangeably. To simplify the code, this commit replaces all instances of PERL_IMPLICIT_CONTEXT with MULTIPLICITY. PERL_IMPLICIT_CONTEXT will stay defined for compatibility with XS modules.
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/sv.c b/sv.c
index e0dd6140f9..3c69dece01 100644
--- a/sv.c
+++ b/sv.c
@@ -9532,7 +9532,7 @@ Perl_newSVpv_share(pTHX_ const char *src, U32 hash)
return newSVpvn_share(src, strlen(src), hash);
}
-#if defined(PERL_IMPLICIT_CONTEXT)
+#if defined(MULTIPLICITY)
/* pTHX_ magic can't cope with varargs, so this is a no-context
* version of the main function, (which may itself be aliased to us).
@@ -10736,7 +10736,7 @@ Perl_sv_setpviv_mg(pTHX_ SV *const sv, const IV iv)
#endif /* NO_MATHOMS */
-#if defined(PERL_IMPLICIT_CONTEXT)
+#if defined(MULTIPLICITY)
/* pTHX_ magic can't cope with varargs, so this is a no-context
* version of the main function, (which may itself be aliased to us).
@@ -10853,7 +10853,7 @@ Perl_sv_vsetpvf_mg(pTHX_ SV *const sv, const char *const pat, va_list *const arg
SvSETMAGIC(sv);
}
-#if defined(PERL_IMPLICIT_CONTEXT)
+#if defined(MULTIPLICITY)
/* pTHX_ magic can't cope with varargs, so this is a no-context
* version of the main function, (which may itself be aliased to us).