diff options
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -37,7 +37,7 @@ VIRTUAL I32 Perl_block_gimme(pTHX); VIRTUAL int Perl_block_start(pTHX_ int full); VIRTUAL void Perl_boot_core_UNIVERSAL(pTHX); VIRTUAL void Perl_call_list(pTHX_ I32 oldscope, AV* av_list); -VIRTUAL I32 Perl_cando(pTHX_ I32 bit, I32 effective, Stat_t* statbufp); +VIRTUAL bool Perl_cando(pTHX_ Mode_t mode, Uid_t effective, Stat_t* statbufp); VIRTUAL U32 Perl_cast_ulong(pTHX_ NV f); VIRTUAL I32 Perl_cast_i32(pTHX_ NV f); VIRTUAL IV Perl_cast_iv(pTHX_ NV f); @@ -125,6 +125,7 @@ VIRTUAL void Perl_do_sprintf(pTHX_ SV* sv, I32 len, SV** sarg); VIRTUAL Off_t Perl_do_sysseek(pTHX_ GV* gv, Off_t pos, int whence); VIRTUAL Off_t Perl_do_tell(pTHX_ GV* gv); VIRTUAL I32 Perl_do_trans(pTHX_ SV* sv); +VIRTUAL UV Perl_do_vecget(pTHX_ SV* sv, I32 offset, I32 size); VIRTUAL void Perl_do_vecset(pTHX_ SV* sv); VIRTUAL void Perl_do_vop(pTHX_ I32 optype, SV* sv, SV* left, SV* right); VIRTUAL OP* Perl_dofile(pTHX_ OP* term); @@ -197,7 +198,7 @@ VIRTUAL HE* Perl_hv_store_ent(pTHX_ HV* tb, SV* key, SV* val, U32 hash); VIRTUAL void Perl_hv_undef(pTHX_ HV* tb); VIRTUAL I32 Perl_ibcmp(pTHX_ const char* a, const char* b, I32 len); VIRTUAL I32 Perl_ibcmp_locale(pTHX_ const char* a, const char* b, I32 len); -VIRTUAL I32 Perl_ingroup(pTHX_ I32 testgid, I32 effective); +VIRTUAL bool Perl_ingroup(pTHX_ Gid_t testgid, Uid_t effective); VIRTUAL void Perl_init_debugger(pTHX); VIRTUAL void Perl_init_stacks(pTHX); VIRTUAL U32 Perl_intro_my(pTHX); @@ -465,7 +466,7 @@ VIRTUAL void Perl_set_numeric_local(pTHX); VIRTUAL void Perl_set_numeric_radix(pTHX); VIRTUAL void Perl_set_numeric_standard(pTHX); VIRTUAL void Perl_require_pv(pTHX_ const char* pv); -VIRTUAL void Perl_pidgone(pTHX_ int pid, int status); +VIRTUAL void Perl_pidgone(pTHX_ Pid_t pid, int status); VIRTUAL void Perl_pmflag(pTHX_ U16* pmfl, int ch); VIRTUAL OP* Perl_pmruntime(pTHX_ OP* pm, OP* expr, OP* repl); VIRTUAL OP* Perl_pmtrans(pTHX_ OP* o, OP* expr, OP* repl); @@ -655,7 +656,7 @@ VIRTUAL UV Perl_utf8_to_uv(pTHX_ U8 *s, I32* retlen); VIRTUAL U8* Perl_uv_to_utf8(pTHX_ U8 *d, UV uv); VIRTUAL void Perl_vivify_defelem(pTHX_ SV* sv); VIRTUAL void Perl_vivify_ref(pTHX_ SV* sv, U32 to_what); -VIRTUAL I32 Perl_wait4pid(pTHX_ int pid, int* statusp, int flags); +VIRTUAL I32 Perl_wait4pid(pTHX_ Pid_t pid, int* statusp, int flags); VIRTUAL void Perl_warn(pTHX_ const char* pat, ...); VIRTUAL void Perl_vwarn(pTHX_ const char* pat, va_list* args); VIRTUAL void Perl_warner(pTHX_ U32 err, const char* pat, ...); @@ -845,7 +846,7 @@ STATIC SV* S_method_common(pTHX_ SV* meth, U32* hashp); #endif #if defined(PERL_IN_PP_SYS_C) || defined(PERL_DECL_PROT) STATIC OP* S_doform(pTHX_ CV *cv, GV *gv, OP *retop); -STATIC int S_emulate_eaccess(pTHX_ const char* path, int mode); +STATIC int S_emulate_eaccess(pTHX_ const char* path, Mode_t mode); # if !defined(HAS_MKDIR) || !defined(HAS_RMDIR) STATIC int S_dooneliner(pTHX_ char *cmd, char *filename); # endif @@ -855,7 +856,6 @@ STATIC regnode* S_reg(pTHX_ I32, I32 *); STATIC regnode* S_reganode(pTHX_ U8, U32); STATIC regnode* S_regatom(pTHX_ I32 *); STATIC regnode* S_regbranch(pTHX_ I32 *, I32); -STATIC void S_regc(pTHX_ U8, char *); STATIC void S_reguni(pTHX_ UV, char *, I32*); STATIC regnode* S_regclass(pTHX); STATIC regnode* S_regclassutf8(pTHX); |