This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
embed.fnc: Mark doing_taint as Core only
authorKarl Williamson <khw@cpan.org>
Wed, 22 Jul 2020 12:02:56 +0000 (06:02 -0600)
committerKarl Williamson <khw@cpan.org>
Sun, 20 Dec 2020 16:28:07 +0000 (09:28 -0700)
This appears to be for internal use, and there are no cpan usages

embed.fnc

index 819fe92..0476d1f 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -574,7 +574,7 @@ ATod        |void   |perl_free      |NN PerlInterpreter *my_perl
 ATod   |int    |perl_run       |NN PerlInterpreter *my_perl
 ATod   |int    |perl_parse     |NN PerlInterpreter *my_perl|XSINIT_t xsinit \
                                |int argc|NULLOK char** argv|NULLOK char** env
-ATpR   |bool   |doing_taint    |int argc|NULLOK char** argv|NULLOK char** env
+CTpR   |bool   |doing_taint    |int argc|NULLOK char** argv|NULLOK char** env
 #if defined(USE_ITHREADS)
 ATod   |PerlInterpreter*|perl_clone|NN PerlInterpreter *proto_perl|UV flags
 #  if defined(PERL_IMPLICIT_SYS)