embed.fnc: Mark doing_taint as Core only

[perl5.git] / embed.fnc

diff --git a/embed.fnc b/embed.fnc
index 9717cbf..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)
@@ -745,7 +745,7 @@ pPR |const char*    |get_no_modify
 pPR    |U32*   |get_opargs
 ApPR   |PPADDR_t*|get_ppaddr
 : Used by CXINC, which appears to be in widespread use
-ApR    |I32    |cxinc
+CpR    |I32    |cxinc
 Afp    |void   |deb            |NN const char* pat|...
 Ap     |void   |vdeb           |NN const char* pat|NULLOK va_list* args
 Ap     |void   |debprofdump
@@ -1392,7 +1392,7 @@ S |void   |move_proto_attr|NN OP **proto|NN OP **attrs \
 #endif
 : Used in op.c and pp_sys.c
 p      |int    |mode_from_discipline|NULLOK const char* s|STRLEN len
-Ap     |const char*    |moreswitches   |NN const char* s
+Cp     |const char*    |moreswitches   |NN const char* s
 Apd    |NV     |my_atof        |NN const char *s
 ATdpR  |NV     |my_strtod      |NN const char * const s|NULLOK char ** e
 Aprd   |void   |my_exit        |U32 status
@@ -1961,7 +1961,7 @@ Cp        |I32    |regexec_flags  |NN REGEXP *const rx|NN char *stringarg \
                                |NN char *strend|NN char *strbeg \
                                |SSize_t minend|NN SV *sv \
                                |NULLOK void *data|U32 flags
-ApR    |regnode*|regnext       |NULLOK regnode* p
+CpR    |regnode*|regnext       |NULLOK regnode* p
 EXp    |SV*|reg_named_buff          |NN REGEXP * const rx|NULLOK SV * const key \
                                  |NULLOK SV * const value|const U32 flags
 EXp    |SV*|reg_named_buff_iter     |NN REGEXP * const rx|NULLOK const SV * const lastkey \
@@ -2653,8 +2653,8 @@ ATpa      |Malloc_t|safesyscalloc |MEM_SIZE elements|MEM_SIZE size
 ATpR   |Malloc_t|safesysrealloc|Malloc_t where|MEM_SIZE nbytes
 ATp    |Free_t |safesysfree    |Malloc_t where
 CrTp   |void   |croak_memory_wrap
-Ap     |int    |runops_standard
-Ap     |int    |runops_debug
+Cp     |int    |runops_standard
+Cp     |int    |runops_debug
 Afpd   |void   |sv_catpvf_mg   |NN SV *const sv|NN const char *const pat|...
 Apd    |void   |sv_vcatpvf_mg  |NN SV *const sv|NN const char *const pat \
                                |NULLOK va_list *const args