diff options
| -rw-r--r-- | embed.fnc | 2 | ||||
| -rw-r--r-- | pod/perlapi.pod | 2 | ||||
| -rw-r--r-- | proto.h | 2 |
3 files changed, 3 insertions, 3 deletions
@@ -1139,7 +1139,7 @@ Ap |void |Slab_Free |NN void *op #if defined(PERL_IN_PERL_C) || defined(PERL_DECL_PROT) s |void |find_beginning -s |void |forbid_setid |char flag|int suidscript +s |void |forbid_setid |const char flag|const int suidscript s |void |incpush |NULLOK const char *dir|bool addsubdirs|bool addoldvers|bool usesep|bool canrelocate s |void |init_interp s |void |init_ids diff --git a/pod/perlapi.pod b/pod/perlapi.pod index a97032971e..eeabacf663 100644 --- a/pod/perlapi.pod +++ b/pod/perlapi.pod @@ -1373,7 +1373,7 @@ Found in file hv.h =item HeSVKEY X<HeSVKEY> -Returns the key as an C<SV*>, or C<Nullsv> if the hash entry does not +Returns the key as an C<SV*>, or C<NULL> if the hash entry does not contain an C<SV*> key. SV* HeSVKEY(HE* he) @@ -3173,7 +3173,7 @@ PERL_CALLCONV void Perl_Slab_Free(pTHX_ void *op) #if defined(PERL_IN_PERL_C) || defined(PERL_DECL_PROT) STATIC void S_find_beginning(pTHX); -STATIC void S_forbid_setid(pTHX_ char flag, int suidscript); +STATIC void S_forbid_setid(pTHX_ const char flag, const int suidscript); STATIC void S_incpush(pTHX_ const char *dir, bool addsubdirs, bool addoldvers, bool usesep, bool canrelocate); STATIC void S_init_interp(pTHX); STATIC void S_init_ids(pTHX); |