diff options
| author | Tomasz Konojacki <me@xenu.pl> | 2021-06-04 22:05:04 +0200 |
|---|---|---|
| committer | xenu <me@xenu.pl> | 2021-06-09 19:32:14 +0200 |
| commit | 6e512bc2beef5b8b17502db7edf50b5984776318 (patch) | |
| tree | edaaaa9d096a12cf43b5620afa8712a8951c1472 /perl.c | |
| parent | 44e4059baf939468ae61cb63c0c2871c40147dc3 (diff) | |
| download | perl-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 'perl.c')
| -rw-r--r-- | perl.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1280,7 +1280,7 @@ perl_destruct(pTHXx) PL_regex_pad = NULL; #endif -#ifdef PERL_IMPLICIT_CONTEXT +#ifdef MULTIPLICITY /* the entries in this list are allocated via SV PVX's, so get freed * in sv_clean_all */ Safefree(PL_my_cxt_list); @@ -3903,7 +3903,7 @@ S_init_interp(pTHX) #ifdef MULTIPLICITY # define PERLVAR(prefix,var,type) # define PERLVARA(prefix,var,n,type) -# if defined(PERL_IMPLICIT_CONTEXT) +# if defined(MULTIPLICITY) # define PERLVARI(prefix,var,type,init) aTHX->prefix##var = init; # define PERLVARIC(prefix,var,type,init) aTHX->prefix##var = init; # else |