proto.h revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
* This file is autogenerated from data in embed.pl. Edit that file
* and run 'make regen_headers' to effect changes.
*/
#if defined(PERL_IMPLICIT_SYS)
PERL_CALLCONV PerlInterpreter* perl_alloc_using(struct IPerlMem* m, struct IPerlMem* ms, struct IPerlMem* mp, struct IPerlEnv* e, struct IPerlStdIO* io, struct IPerlLIO* lio, struct IPerlDir* d, struct IPerlSock* s, struct IPerlProc* p);
#endif
PERL_CALLCONV int perl_parse(PerlInterpreter* interp, XSINIT_t xsinit, int argc, char** argv, char** env);
#if defined(USE_ITHREADS)
# if defined(PERL_IMPLICIT_SYS)
PERL_CALLCONV PerlInterpreter* perl_clone_using(PerlInterpreter *interp, UV flags, struct IPerlMem* m, struct IPerlMem* ms, struct IPerlMem* mp, struct IPerlEnv* e, struct IPerlStdIO* io, struct IPerlLIO* lio, struct IPerlDir* d, struct IPerlSock* s, struct IPerlProc* p);
# endif
#endif
#if defined(MYMALLOC)
#endif
PERL_CALLCONV void* Perl_get_context(void);
/* functions with flag 'n' should come before here */
#if defined(PERL_OBJECT)
struct interpreter interp;
#ifndef __BORLANDC__
#endif
#endif
#if defined(PERL_OBJECT)
#else
#endif
# include "pp_proto.h"
#endif
#if defined(USE_THREADS)
#endif
#ifdef CHECK_FORMAT
#endif
;
#if defined(PERL_IMPLICIT_CONTEXT)
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#endif
#ifdef CHECK_FORMAT
#endif
;
PERL_CALLCONV char* Perl_delimcpy(pTHX_ char* to, char* toend, char* from, char* fromend, int delim, I32* retlen);
#ifdef CHECK_FORMAT
#endif
;
#if !defined(WIN32)
#endif
#endif
PERL_CALLCONV bool Perl_do_open(pTHX_ GV* gv, char* name, I32 len, int as_raw, int rawmode, int rawperm, PerlIO* supplied_fp);
PERL_CALLCONV bool Perl_do_open9(pTHX_ GV *gv, char *name, I32 len, int as_raw, int rawmode, int rawperm, PerlIO *supplied_fp, SV *svs, I32 num);
#if defined(DUMP_FDS)
#endif
PERL_CALLCONV char* Perl_fbm_instr(pTHX_ unsigned char* big, unsigned char* bigend, SV* littlesv, U32 flags);
PERL_CALLCONV char* Perl_find_script(pTHX_ char *scriptname, bool dosearch, char **search_ext, I32 flags);
#if defined(USE_THREADS)
#endif
#ifdef CHECK_FORMAT
#endif
;
#if !defined(HAS_GETENV_LEN)
#endif
#if defined(USE_THREADS)
#endif
#if defined(USE_LOCALE_COLLATE)
#endif
#if defined(USE_LOCALE_COLLATE)
#endif
#ifdef CHECK_FORMAT
#endif
;
#if !defined(HAS_BCOPY) || !defined(HAS_SAFE_BCOPY)
#endif
#if !defined(HAS_BZERO) && !defined(HAS_MEMSET)
#endif
#if !defined(HAS_MEMCMP) || !defined(HAS_SANE_MEMCMP)
#endif
#if !defined(HAS_MEMSET)
#endif
#if !defined(PERL_OBJECT)
#endif
#if defined(MYSWAP)
#endif
PERL_CALLCONV OP* Perl_newFOROP(pTHX_ I32 flags, char* label, line_t forline, OP* sclr, OP* expr, OP*block, OP*cont);
#ifdef CHECK_FORMAT
#endif
;
PERL_CALLCONV OP* Perl_newWHILEOP(pTHX_ I32 flags, I32 debuggable, LOOP* loop, I32 whileline, OP* expr, OP* block, OP* cont);
PERL_CALLCONV char* Perl_ninstr(pTHX_ const char* big, const char* bigend, const char* little, const char* lend);
#if defined(PERL_OBJECT)
#endif
#if defined(USE_THREADS)
#endif
PERL_CALLCONV I32 Perl_pregexec(pTHX_ regexp* prog, char* stringarg, char* strend, char* strbeg, I32 minend, SV* screamer, U32 nosave);
PERL_CALLCONV char* Perl_re_intuit_start(pTHX_ regexp* prog, SV* sv, char* strpos, char* strend, U32 flags, struct re_scream_pos_data_s *data);
PERL_CALLCONV I32 Perl_regexec_flags(pTHX_ regexp* prog, char* stringarg, char* strend, char* strbeg, I32 minend, SV* screamer, void* data, U32 flags);
PERL_CALLCONV char* Perl_rninstr(pTHX_ const char* big, const char* bigend, const char* little, const char* lend);
#if !defined(HAS_RENAME)
#endif
PERL_CALLCONV char* Perl_screaminstr(pTHX_ SV* bigsv, SV* littlesv, I32 start_shift, I32 end_shift, I32 *state, I32 last);
#if !defined(VMS)
#endif
#ifdef CHECK_FORMAT
#endif
;
#if defined(USE_LOCALE_COLLATE)
#endif
PERL_CALLCONV void Perl_sv_insert(pTHX_ SV* bigsv, STRLEN offset, STRLEN len, char* little, STRLEN littlelen);
#ifdef CHECK_FORMAT
#endif
;
PERL_CALLCONV void Perl_sv_vcatpvfn(pTHX_ SV* sv, const char* pat, STRLEN patlen, va_list* args, SV** svargs, I32 svmax, bool *maybe_tainted);
PERL_CALLCONV void Perl_sv_vsetpvfn(pTHX_ SV* sv, const char* pat, STRLEN patlen, va_list* args, SV** svargs, I32 svmax, bool *maybe_tainted);
#if defined(UNLINK_ALL_VERSIONS)
#endif
#if defined(USE_THREADS)
#endif
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef USE_PURE_BISON
#endif
#if defined(MYMALLOC)
#endif
#if defined(LEAKTEST)
#endif
#if defined(PERL_GLOBAL_STRUCT)
#endif
#if defined(USE_THREADS)
#endif
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
#ifdef CHECK_FORMAT
#endif
;
PERL_CALLCONV void Perl_dump_vindent(pTHX_ I32 level, PerlIO *file, const char* pat, va_list *args);
PERL_CALLCONV void Perl_do_magic_dump(pTHX_ I32 level, PerlIO *file, MAGIC *mg, I32 nest, I32 maxnest, bool dumpops, STRLEN pvlim);
PERL_CALLCONV void Perl_do_sv_dump(pTHX_ I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bool dumpops, STRLEN pvlim);
#if defined(PERL_FLEXIBLE_EXCEPTIONS)
PERL_CALLCONV void* Perl_default_protect(pTHX_ volatile JMPENV *je, int *excpt, protect_body_t body, ...);
PERL_CALLCONV void* Perl_vdefault_protect(pTHX_ volatile JMPENV *je, int *excpt, protect_body_t body, va_list *args);
#endif
#if defined(USE_ITHREADS)
#if defined(HAVE_INTERP_INTERN)
#endif
#endif
#if defined(HAVE_INTERP_INTERN)
#endif
#if defined(PERL_OBJECT)
#else
#endif
#if defined(PERL_IN_AV_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_DOOP_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_GV_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_HV_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_MG_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_OP_C) || defined(PERL_DECL_PROT)
STATIC PADOFFSET S_pad_findlex(pTHX_ char* name, PADOFFSET newoff, U32 seq, CV* startcv, I32 cx_ix, I32 saweval, U32 flags);
# if defined(PL_OP_SLAB_ALLOC)
# endif
#endif
#if defined(PERL_IN_PERL_C) || defined(PERL_DECL_PROT)
# if defined(IAMSUID)
# endif
#if defined(PERL_FLEXIBLE_EXCEPTIONS)
#endif
# if defined(USE_THREADS)
# endif
#endif
#if defined(PERL_IN_PP_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_PP_CTL_C) || defined(PERL_DECL_PROT)
#if defined(PERL_FLEXIBLE_EXCEPTIONS)
#endif
#endif
#if defined(PERL_IN_PP_HOT_C) || defined(PERL_DECL_PROT)
STATIC int S_do_maybe_phash(pTHX_ AV *ary, SV **lelem, SV **firstlelem, SV **relem, SV **lastrelem);
#endif
#if defined(PERL_IN_PP_SYS_C) || defined(PERL_DECL_PROT)
# endif
#endif
#if defined(PERL_IN_REGCOMP_C) || defined(PERL_DECL_PROT)
STATIC void S_cl_and(pTHX_ struct regnode_charclass_class *cl, struct regnode_charclass_class *and_with);
STATIC void S_cl_or(pTHX_ struct regnode_charclass_class *cl, struct regnode_charclass_class *or_with);
STATIC I32 S_study_chunk(pTHX_ regnode **scanp, I32 *deltap, regnode *last, struct scan_data_t *data, U32 flags);
#endif
#if defined(PERL_IN_REGEXEC_C) || defined(PERL_DECL_PROT)
STATIC char* S_find_byclass(pTHX_ regexp * prog, regnode *c, char *s, char *strend, char *startpos, I32 norun);
#endif
#if defined(PERL_IN_RUN_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_SCOPE_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_SV_C) || defined(PERL_DECL_PROT)
# if defined(DEBUGGING)
# endif
#endif
#if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT)
STATIC char* S_force_word(pTHX_ char *start, int token, int check_keyword, int allow_pack, int allow_tick);
STATIC char* S_scan_word(pTHX_ char *s, char *dest, STRLEN destlen, int allow_package, STRLEN *slp);
STATIC SV* S_new_constant(pTHX_ char *s, STRLEN len, const char *key, SV *sv, SV *pv, const char *type);
#if 0
#endif
# if defined(CRIPPLED_CC)
# endif
# if defined(PERL_CR_FILTER)
# endif
#endif
#if defined(PERL_IN_UNIVERSAL_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT)
# if defined(LEAKTEST)
# endif
#endif
#if defined(PERL_OBJECT)
};
#endif