KVIrc  4.9.2
DeveloperAPIs
Macros | Typedefs | Functions
ppport.h File Reference
#include <patchlevel.h>
#include <could_not_find_Perl_patchlevel.h>

Go to the source code of this file.

Macros

#define _aMY_CXT
 
#define _dpppDEC2BCD(dec)   ((((dec)/100)<<8)|((((dec)%100)/10)<<4)|((dec)%10))
 
#define _P_P_PORTABILITY_H_
 
#define _pMY_CXT
 
#define aMY_CXT
 
#define aMY_CXT_
 
#define aTHX
 
#define aTHX_
 
#define aTHXR
 
#define aTHXR_
 
#define AvFILLp   AvFILL
 
#define boolSV(b)   ((b) ? &PL_sv_yes : &PL_sv_no)
 
#define call_argv   perl_call_argv
 
#define call_method   perl_call_method
 
#define call_pv   perl_call_pv
 
#define call_sv   perl_call_sv
 
#define call_sv(sv, flags)
 
#define ckWARN(a)   PL_dowarn
 
#define CopFILE(c)   (CopFILESV(c) ? SvPVX(CopFILESV(c)) : Nullch)
 
#define CopFILE_set(c, pv)   CopFILEGV_set((c), gv_fetchfile(pv))
 
#define CopFILEAV(c)   (CopFILEGV(c) ? GvAV(CopFILEGV(c)) : Nullav)
 
#define CopFILEGV(c)   ((c)->cop_filegv)
 
#define CopFILEGV_set(c, gv)   ((c)->cop_filegv = (GV*)SvREFCNT_inc(gv))
 
#define CopFILESV(c)   (CopFILEGV(c) ? GvSV(CopFILEGV(c)) : Nullsv)
 
#define CopSTASH(c)   ((c)->cop_stash)
 
#define CopSTASH_eq(c, hv)   (CopSTASH(c) == (hv))
 
#define CopSTASH_set(c, hv)   ((c)->cop_stash = (hv))
 
#define CopSTASHPV(c)   (CopSTASH(c) ? HvNAME(CopSTASH(c)) : Nullch)
 
#define CopSTASHPV_set(c, pv)   CopSTASH_set((c), gv_stashpv(pv,GV_ADD))
 
#define CopyD(s, d, n, t)   memcpy((char*)(d),(char*)(s), (n) * sizeof(t))
 
#define CPERLscope(x)   x
 
#define D_PPP_CONSTPV_ARG(x)   ((char *) (x))
 
#define D_PPP_PERL_SIGNALS_INIT   PERL_SIGNALS_UNSAFE_FLAG
 
#define dAX   I32 ax = MARK - PL_stack_base + 1
 
#define dAXMARK
 
#define DEFSV   GvSV(PL_defgv)
 
#define DEFSV_set(sv)   (DEFSV = (sv))
 
#define dITEMS   I32 items = SP - MARK
 
#define dMY_CXT   dNOOP
 
#define dMY_CXT_SV   dNOOP
 
#define dNOOP   extern int Perl___notused PERL_UNUSED_DECL
 
#define DPPP_(name)   DPPP_CAT2(DPPP_NAMESPACE, name)
 
#define DPPP_CAT2(x, y)   CAT2(x,y)
 
#define DPPP_NAMESPACE   DPPP_
 
#define DPPP_SVPV_NOLEN_LP_ARG   &PL_na
 
#define dTHR   dNOOP
 
#define dTHX   dNOOP
 
#define dTHXa(x)   dNOOP
 
#define dTHXoa(x)   dTHXa(x)
 
#define dTHXR   dTHR
 
#define dUNDERBAR   dNOOP
 
#define dVAR   dNOOP
 
#define dXSTARG   SV * targ = sv_newmortal()
 
#define END_EXTERN_C
 
#define ERRSV   get_sv("@",FALSE)
 
#define eval_pv(a, b)   DPPP_(my_eval_pv)(aTHX_ a,b)
 
#define eval_sv   perl_eval_sv
 
#define EXTERN_C   extern
 
#define G_METHOD   64
 
#define get_av   perl_get_av
 
#define get_cv   perl_get_cv
 
#define get_cvn_flags(name, namelen, flags)   get_cv(name, flags)
 
#define get_cvs(name, flags)   get_cvn_flags(name "", sizeof(name)-1, flags)
 
#define get_hv   perl_get_hv
 
#define get_sv   perl_get_sv
 
#define grok_bin(a, b, c, d)   DPPP_(my_grok_bin)(aTHX_ a,b,c,d)
 
#define grok_hex(a, b, c, d)   DPPP_(my_grok_hex)(aTHX_ a,b,c,d)
 
#define grok_number(a, b, c)   DPPP_(my_grok_number)(aTHX_ a,b,c)
 
#define GROK_NUMERIC_RADIX(sp, send)   grok_numeric_radix(sp, send)
 
#define grok_numeric_radix(a, b)   DPPP_(my_grok_numeric_radix)(aTHX_ a,b)
 
#define grok_oct(a, b, c, d)   DPPP_(my_grok_oct)(aTHX_ a,b,c,d)
 
#define gv_fetchpvn_flags(name, len, flags, svt)   gv_fetchpv(name, flags, svt)
 
#define gv_fetchpvs(name, flags, svt)   gv_fetchpvn_flags(name "", sizeof(name) - 1, flags, svt)
 
#define gv_fetchsv(name, flags, svt)   gv_fetchpv(SvPV_nolen_const(name), flags, svt)
 
#define gv_stashpvn(str, len, create)   gv_stashpv(str,create)
 
#define gv_stashpvs(name, flags)   gv_stashpvn(name "", sizeof(name) - 1, flags)
 
#define GvSVn(gv)   GvSV(gv)
 
#define HEf_SVKEY   -2
 
#define hv_fetchs(hv, key, lval)   hv_fetch(hv, key "", sizeof(key) - 1, lval)
 
#define hv_stores(hv, key, val)   hv_store(hv, key "", sizeof(key) - 1, val, 0)
 
#define HvNAME_get(hv)   HvNAME(hv)
 
#define HvNAMELEN_get(hv)   (HvNAME_get(hv) ? (I32)strlen(HvNAME_get(hv)) : 0)
 
#define IN_LOCALE   (IN_PERL_COMPILETIME ? IN_LOCALE_COMPILETIME : IN_LOCALE_RUNTIME)
 
#define IN_LOCALE_COMPILETIME   (PL_hints & HINT_LOCALE)
 
#define IN_LOCALE_RUNTIME   (PL_curcop->op_private & HINT_LOCALE)
 
#define IN_PERL_COMPILETIME   (PL_curcop == &PL_compiling)
 
#define INT2PTR(any, d)   (any)(PTRV)(d)
 
#define IS_NUMBER_GREATER_THAN_UV_MAX   0x02
 
#define IS_NUMBER_IN_UV   0x01
 
#define IS_NUMBER_INFINITY   0x10
 
#define IS_NUMBER_NAN   0x20
 
#define IS_NUMBER_NEG   0x08
 
#define IS_NUMBER_NOT_INT   0x04
 
#define isALNUMC(c)   (isALPHA(c) || isDIGIT(c))
 
#define isASCII(c)   ((WIDEST_UTYPE) (c) <= 127)
 
#define isBLANK(c)   ((c) == ' ' || (c) == '\t')
 
#define isCNTRL(c)   ((WIDEST_UTYPE) (c) < ' ' || (c) == 127)
 
#define isGRAPH(c)   (isALNUM(c) || isPUNCT(c))
 
#define isGV_with_GP(gv)   isGV(gv)
 
#define isPRINT(c)   (((c) >= 32 && (c) < 127))
 
#define isPSXSPC(c)   (isSPACE(c) || (c) == '\v')
 
#define isPUNCT(c)   (((c) >= 33 && (c) <= 47) || ((c) >= 58 && (c) <= 64) || ((c) >= 91 && (c) <= 96) || ((c) >= 123 && (c) <= 126))
 
#define isXDIGIT(c)   (isDIGIT(c) || ((c) >= 'a' && (c) <= 'f') || ((c) >= 'A' && (c) <= 'F'))
 
#define IV_MAX   PERL_LONG_MAX
 
#define IV_MIN   PERL_LONG_MIN
 
#define IVdf   "ld"
 
#define IVSIZE   LONGSIZE
 
#define IVTYPE   long
 
#define load_module   DPPP_(my_load_module)
 
#define LONGSIZE   4
 
#define memEQ(s1, s2, l)   (!bcmp(s1,s2,l))
 
#define memEQs(s1, l, s2)   (sizeof(s2)-1 == l && memEQ(s1, (s2 ""), (sizeof(s2)-1)))
 
#define memNE(s1, s2, l)   (bcmp(s1,s2,l))
 
#define memNEs(s1, l, s2)   !memEQs(s1, l, s2)
 
#define mg_findext   DPPP_(my_mg_findext)
 
#define MoveD(s, d, n, t)   memmove((char*)(d),(char*)(s), (n) * sizeof(t))
 
#define mPUSHi(i)   sv_setiv(PUSHmortal, (IV)(i))
 
#define mPUSHn(n)   sv_setnv(PUSHmortal, (NV)(n))
 
#define mPUSHp(p, l)   sv_setpvn(PUSHmortal, (p), (l))
 
#define mPUSHs(s)   PUSHs(sv_2mortal(s))
 
#define mPUSHu(u)   sv_setuv(PUSHmortal, (UV)(u))
 
#define MUTABLE_PTR(p)   ((void *) (p))
 
#define MUTABLE_SV(p)   ((SV *)MUTABLE_PTR(p))
 
#define mXPUSHi(i)   STMT_START { EXTEND(sp,1); sv_setiv(PUSHmortal, (IV)(i)); } STMT_END
 
#define mXPUSHn(n)   STMT_START { EXTEND(sp,1); sv_setnv(PUSHmortal, (NV)(n)); } STMT_END
 
#define mXPUSHp(p, l)   STMT_START { EXTEND(sp,1); sv_setpvn(PUSHmortal, (p), (l)); } STMT_END
 
#define mXPUSHs(s)   XPUSHs(sv_2mortal(s))
 
#define mXPUSHu(u)   STMT_START { EXTEND(sp,1); sv_setuv(PUSHmortal, (UV)(u)); } STMT_END
 
#define MY_CXT   my_cxt
 
#define MY_CXT_CLONE   NOOP
 
#define MY_CXT_INIT   NOOP
 
#define my_snprintf   DPPP_(my_my_snprintf)
 
#define my_sprintf   DPPP_(my_my_sprintf)
 
#define my_strlcat   DPPP_(my_my_strlcat)
 
#define my_strlcpy   DPPP_(my_my_strlcpy)
 
#define newCONSTSUB(a, b, c)   DPPP_(my_newCONSTSUB)(aTHX_ a,b,c)
 
#define newRV_inc(sv)   newRV(sv)
 
#define newRV_noinc(a)   DPPP_(my_newRV_noinc)(aTHX_ a)
 
#define newSV_type(a)   DPPP_(my_newSV_type)(aTHX_ a)
 
#define newSVpvn(data, len)
 
#define newSVpvn_flags(a, b, c)   DPPP_(my_newSVpvn_flags)(aTHX_ a,b,c)
 
#define newSVpvn_share(a, b, c)   DPPP_(my_newSVpvn_share)(aTHX_ a,b,c)
 
#define newSVpvn_utf8(s, len, u)   newSVpvn_flags((s), (len), (u) ? SVf_UTF8 : 0)
 
#define newSVpvs(str)   newSVpvn(str "", sizeof(str) - 1)
 
#define newSVpvs_flags(str, flags)   newSVpvn_flags(str "", sizeof(str) - 1, flags)
 
#define newSVpvs_share(str)   newSVpvn_share(str "", sizeof(str) - 1, 0)
 
#define newSVuv(uv)   ((uv) <= IV_MAX ? newSViv((IV)uv) : newSVnv((NV)uv))
 
#define Newx(v, n, t)   New(0,v,n,t)
 
#define Newxc(v, n, t, c)   Newc(0,v,n,t,c)
 
#define Newxz(v, n, t)   Newz(0,v,n,t)
 
#define NOOP   (void)0
 
#define NUM2PTR(any, d)   (any)PTR2nat(d)
 
#define NVef   "e"
 
#define NVff   "f"
 
#define NVgf   "g"
 
#define NVTYPE   double
 
#define packWARN(a)   (a)
 
#define PERL_ABS(x)   ((x) < 0 ? -(x) : (x))
 
#define PERL_BCDVERSION   ((_dpppDEC2BCD(PERL_REVISION)<<24)|(_dpppDEC2BCD(PERL_VERSION)<<12)|_dpppDEC2BCD(PERL_SUBVERSION))
 
#define Perl_eval_pv   DPPP_(my_eval_pv)
 
#define Perl_grok_bin   DPPP_(my_grok_bin)
 
#define Perl_grok_hex   DPPP_(my_grok_hex)
 
#define Perl_grok_number   DPPP_(my_grok_number)
 
#define Perl_grok_numeric_radix   DPPP_(my_grok_numeric_radix)
 
#define Perl_grok_oct   DPPP_(my_grok_oct)
 
#define PERL_HASH(hash, str, len)
 
#define PERL_INT_MAX   ((int)(PERL_UINT_MAX >> 1))
 
#define PERL_INT_MIN   (-PERL_INT_MAX - ((3 & -1) == 3))
 
#define Perl_load_module   DPPP_(my_load_module)
 
#define PERL_LOADMOD_DENY   0x1
 
#define PERL_LOADMOD_IMPORT_OPS   0x4
 
#define PERL_LOADMOD_NOIMPORT   0x2
 
#define PERL_LONG_MAX   ((long) (PERL_ULONG_MAX >> 1))
 
#define PERL_LONG_MIN   (-PERL_LONG_MAX - ((3 & -1) == 3))
 
#define PERL_MAGIC_arylen   '#'
 
#define PERL_MAGIC_backref   '<'
 
#define PERL_MAGIC_bm   'B'
 
#define PERL_MAGIC_collxfrm   'o'
 
#define PERL_MAGIC_dbfile   'L'
 
#define PERL_MAGIC_dbline   'l'
 
#define PERL_MAGIC_defelem   'y'
 
#define PERL_MAGIC_env   'E'
 
#define PERL_MAGIC_envelem   'e'
 
#define PERL_MAGIC_ext   '~'
 
#define PERL_MAGIC_fm   'f'
 
#define PERL_MAGIC_glob   '*'
 
#define PERL_MAGIC_isa   'I'
 
#define PERL_MAGIC_isaelem   'i'
 
#define PERL_MAGIC_mutex   'm'
 
#define PERL_MAGIC_nkeys   'k'
 
#define PERL_MAGIC_overload   'A'
 
#define PERL_MAGIC_overload_elem   'a'
 
#define PERL_MAGIC_overload_table   'c'
 
#define PERL_MAGIC_pos   '.'
 
#define PERL_MAGIC_qr   'r'
 
#define PERL_MAGIC_regdata   'D'
 
#define PERL_MAGIC_regdatum   'd'
 
#define PERL_MAGIC_regex_global   'g'
 
#define PERL_MAGIC_shared   'N'
 
#define PERL_MAGIC_shared_scalar   'n'
 
#define PERL_MAGIC_sig   'S'
 
#define PERL_MAGIC_sigelem   's'
 
#define PERL_MAGIC_substr   'x'
 
#define PERL_MAGIC_sv   '\0'
 
#define PERL_MAGIC_taint   't'
 
#define PERL_MAGIC_tied   'P'
 
#define PERL_MAGIC_tiedelem   'p'
 
#define PERL_MAGIC_tiedscalar   'q'
 
#define PERL_MAGIC_utf8   'w'
 
#define PERL_MAGIC_uvar   'U'
 
#define PERL_MAGIC_uvar_elem   'u'
 
#define PERL_MAGIC_vec   'v'
 
#define PERL_MAGIC_vstring   'V'
 
#define Perl_mg_findext   DPPP_(my_mg_findext)
 
#define Perl_my_snprintf   DPPP_(my_my_snprintf)
 
#define Perl_my_sprintf   DPPP_(my_my_sprintf)
 
#define Perl_my_strlcat   DPPP_(my_my_strlcat)
 
#define Perl_my_strlcpy   DPPP_(my_my_strlcpy)
 
#define Perl_newCONSTSUB   DPPP_(my_newCONSTSUB)
 
#define Perl_newRV_noinc   DPPP_(my_newRV_noinc)
 
#define Perl_newSV_type   DPPP_(my_newSV_type)
 
#define Perl_newSVpvn_flags   DPPP_(my_newSVpvn_flags)
 
#define Perl_newSVpvn_share   DPPP_(my_newSVpvn_share)
 
#define PERL_PATCHLEVEL_H_IMPLICIT
 
#define Perl_pv_display   DPPP_(my_pv_display)
 
#define Perl_pv_escape   DPPP_(my_pv_escape)
 
#define PERL_PV_ESCAPE_ALL   0x1000
 
#define PERL_PV_ESCAPE_FIRSTCHAR   0x0008
 
#define PERL_PV_ESCAPE_NOBACKSLASH   0x2000
 
#define PERL_PV_ESCAPE_NOCLEAR   0x4000
 
#define PERL_PV_ESCAPE_QUOTE   0x0001
 
#define PERL_PV_ESCAPE_RE   0x8000
 
#define PERL_PV_ESCAPE_UNI   0x0100
 
#define PERL_PV_ESCAPE_UNI_DETECT   0x0200
 
#define Perl_pv_pretty   DPPP_(my_pv_pretty)
 
#define PERL_PV_PRETTY_DUMP   PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_QUOTE
 
#define PERL_PV_PRETTY_ELLIPSES   0x0002
 
#define PERL_PV_PRETTY_LTGT   0x0004
 
#define PERL_PV_PRETTY_NOCLEAR   PERL_PV_ESCAPE_NOCLEAR
 
#define PERL_PV_PRETTY_QUOTE   PERL_PV_ESCAPE_QUOTE
 
#define PERL_PV_PRETTY_REGPROP   PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
 
#define PERL_REVISION   (5)
 
#define PERL_SCAN_ALLOW_UNDERSCORES   0x01
 
#define PERL_SCAN_DISALLOW_PREFIX   0x02
 
#define PERL_SCAN_GREATER_THAN_UV_MAX   0x02
 
#define PERL_SCAN_SILENT_ILLDIGIT   0x04
 
#define PERL_SHORT_MAX   ((short) (PERL_USHORT_MAX >> 1))
 
#define PERL_SHORT_MIN   (-PERL_SHORT_MAX - ((3 & -1) == 3))
 
#define PERL_SIGNALS_UNSAFE_FLAG   0x0001
 
#define PERL_SUBVERSION   SUBVERSION
 
#define Perl_sv_2pv_flags   DPPP_(my_sv_2pv_flags)
 
#define Perl_sv_pvn_force_flags   DPPP_(my_sv_pvn_force_flags)
 
#define Perl_sv_unmagicext   DPPP_(my_sv_unmagicext)
 
#define PERL_UCHAR_MAX   ((unsigned char)~(unsigned)0)
 
#define PERL_UCHAR_MIN   ((unsigned char)0)
 
#define PERL_UINT_MAX   (~(unsigned int)0)
 
#define PERL_UINT_MIN   ((unsigned int)0)
 
#define PERL_ULONG_MAX   (~(unsigned long)0)
 
#define PERL_ULONG_MIN   ((unsigned long)0L)
 
#define PERL_UNUSED_ARG(x)   ((void)x)
 
#define PERL_UNUSED_CONTEXT
 
#define PERL_UNUSED_DECL
 
#define PERL_UNUSED_VAR(x)   ((void)x)
 
#define PERL_USHORT_MAX   ((unsigned short)~(unsigned)0)
 
#define PERL_USHORT_MIN   ((unsigned short)0)
 
#define PERL_VERSION   PATCHLEVEL
 
#define Perl_vload_module   DPPP_(my_vload_module)
 
#define PERLIO_FUNCS_CAST(funcs)   (funcs)
 
#define PERLIO_FUNCS_DECL(funcs)   PerlIO_funcs funcs
 
#define PL_bufend   bufend
 
#define PL_bufptr   bufptr
 
#define PL_compiling   compiling
 
#define PL_copline   copline
 
#define PL_curcop   curcop
 
#define PL_curstash   curstash
 
#define PL_DBsignal   DBsignal
 
#define PL_DBsingle   DBsingle
 
#define PL_DBsub   DBsub
 
#define PL_DBtrace   DBtrace
 
#define PL_debstash   debstash
 
#define PL_defgv   defgv
 
#define PL_diehook   diehook
 
#define PL_dirty   dirty
 
#define PL_dowarn   dowarn
 
#define PL_errgv   errgv
 
#define PL_error_count   error_count
 
#define PL_expect   expect
 
#define PL_hexdigit   hexdigit
 
#define PL_hints   hints
 
#define PL_in_my   in_my
 
#define PL_laststatval   laststatval
 
#define PL_lex_state   lex_state
 
#define PL_lex_stuff   lex_stuff
 
#define PL_linestr   linestr
 
#define PL_na   na
 
#define PL_no_modify   no_modify
 
#define PL_parser   ((void *) 1)
 
#define PL_perl_destruct_level   perl_destruct_level
 
#define PL_perldb   perldb
 
#define PL_ppaddr   ppaddr
 
#define PL_rsfp   rsfp
 
#define PL_rsfp_filters   rsfp_filters
 
#define PL_signals   DPPP_(my_PL_signals)
 
#define PL_stack_base   stack_base
 
#define PL_stack_sp   stack_sp
 
#define PL_statcache   statcache
 
#define PL_stdingv   stdingv
 
#define PL_Sv   Sv
 
#define PL_sv_arenaroot   sv_arenaroot
 
#define PL_sv_no   sv_no
 
#define PL_sv_undef   sv_undef
 
#define PL_sv_yes   sv_yes
 
#define PL_tainted   tainted
 
#define PL_tainting   tainting
 
#define PL_tokenbuf   tokenbuf
 
#define pMY_CXT   void
 
#define pMY_CXT_
 
#define Poison(d, n, t)   PoisonFree(d,n,t)
 
#define PoisonFree(d, n, t)   PoisonWith(d,n,t,0xEF)
 
#define PoisonNew(d, n, t)   PoisonWith(d,n,t,0xAB)
 
#define PoisonWith(d, n, t, b)   (void)memset((char*)(d), (U8)(b), (n) * sizeof(t))
 
#define pTHX   void
 
#define pTHX_
 
#define PTR2IV(p)   INT2PTR(IV,p)
 
#define PTR2nat(p)   (PTRV)(p)
 
#define PTR2NV(p)   NUM2PTR(NV,p)
 
#define PTR2ul(p)   INT2PTR(unsigned long,p)
 
#define PTR2UV(p)   INT2PTR(UV,p)
 
#define PTRV   unsigned
 
#define PUSHmortal   PUSHs(sv_newmortal())
 
#define PUSHu(u)   STMT_START { sv_setuv(TARG, (UV)(u)); PUSHTARG; } STMT_END
 
#define pv_display(a, b, c, d, e)   DPPP_(my_pv_display)(aTHX_ a,b,c,d,e)
 
#define pv_escape(a, b, c, d, e, f)   DPPP_(my_pv_escape)(aTHX_ a,b,c,d,e,f)
 
#define pv_pretty(a, b, c, d, e, f, g)   DPPP_(my_pv_pretty)(aTHX_ a,b,c,d,e,f,g)
 
#define SAVE_DEFSV   SAVESPTR(GvSV(PL_defgv))
 
#define START_EXTERN_C
 
#define START_MY_CXT   static my_cxt_t my_cxt;
 
#define STMT_END   while (0)
 
#define STMT_START   do
 
#define STR_WITH_LEN(s)   (s ""), (sizeof(s)-1)
 
#define sv_2pv_flags(a, b, c)   DPPP_(my_sv_2pv_flags)(aTHX_ a,b,c)
 
#define sv_2pv_nolen(sv)   SvPV_nolen(sv)
 
#define sv_2pvbyte   sv_2pv
 
#define sv_2pvbyte_nolen(sv)   sv_2pv_nolen(sv)
 
#define sv_2uv(sv)   ((PL_Sv = (sv)), (UV) (SvNOK(PL_Sv) ? SvNV(PL_Sv) : sv_2nv(PL_Sv)))
 
#define sv_catpv_mg(sv, ptr)
 
#define sv_catpvf_mg   Perl_sv_catpvf_mg
 
#define sv_catpvn_mg(sv, ptr, len)
 
#define sv_catpvn_nomg   sv_catpvn
 
#define sv_catpvs(sv, str)   sv_catpvn(sv, str "", sizeof(str) - 1)
 
#define sv_catsv_mg(dsv, ssv)
 
#define sv_catsv_nomg   sv_catsv
 
#define SV_CONST_RETURN   0
 
#define SV_COW_DROP_PV   0
 
#define SV_COW_SHARED_HASH_KEYS   0
 
#define SV_GMAGIC   0
 
#define SV_HAS_TRAILING_NUL   0
 
#define SV_IMMEDIATE_UNREF   0
 
#define SV_MUTABLE_RETURN   0
 
#define SV_NOSTEAL   0
 
#define sv_pvn_force_flags(a, b, c)   DPPP_(my_sv_pvn_force_flags)(aTHX_ a,b,c)
 
#define sv_pvn_nomg   sv_pvn
 
#define sv_setiv_mg(sv, i)
 
#define sv_setnv_mg(sv, num)
 
#define sv_setpv_mg(sv, ptr)
 
#define sv_setpvf_mg   Perl_sv_setpvf_mg
 
#define sv_setpvn_mg(sv, ptr, len)
 
#define sv_setpvs(sv, str)   sv_setpvn(sv, str "", sizeof(str) - 1)
 
#define sv_setsv_mg(dsv, ssv)
 
#define sv_setsv_nomg   sv_setsv
 
#define sv_setuv(sv, uv)
 
#define sv_setuv_mg(sv, i)
 
#define SV_SMAGIC   0
 
#define sv_unmagicext(a, b, c)   DPPP_(my_sv_unmagicext)(aTHX_ a,b,c)
 
#define sv_usepvn_mg(sv, ptr, len)
 
#define SV_UTF8_NO_ENCODING   0
 
#define sv_uv(sv)   SvUVx(sv)
 
#define SVf   "_"
 
#define SVf_UTF8   0
 
#define SVfARG(p)   ((void*)(p))
 
#define SvGETMAGIC(x)   STMT_START { if (SvGMAGICAL(x)) mg_get(x); } STMT_END
 
#define SvIV_nomg   SvIV
 
#define SvMAGIC_set(sv, val)
 
#define SvPV_const(sv, lp)   SvPV_flags_const(sv, lp, SV_GMAGIC)
 
#define SvPV_flags(sv, lp, flags)
 
#define SvPV_flags_const(sv, lp, flags)
 
#define SvPV_flags_const_nolen(sv, flags)
 
#define SvPV_flags_mutable(sv, lp, flags)
 
#define SvPV_force(sv, lp)   SvPV_force_flags(sv, lp, SV_GMAGIC)
 
#define SvPV_force_flags(sv, lp, flags)
 
#define SvPV_force_flags_mutable(sv, lp, flags)
 
#define SvPV_force_flags_nolen(sv, flags)
 
#define SvPV_force_mutable(sv, lp)   SvPV_force_flags_mutable(sv, lp, SV_GMAGIC)
 
#define SvPV_force_nolen(sv)   SvPV_force_flags_nolen(sv, SV_GMAGIC)
 
#define SvPV_force_nomg(sv, lp)   SvPV_force_flags(sv, lp, 0)
 
#define SvPV_force_nomg_nolen(sv)   SvPV_force_flags_nolen(sv, 0)
 
#define SvPV_mutable(sv, lp)   SvPV_flags_mutable(sv, lp, SV_GMAGIC)
 
#define SvPV_nolen(sv)
 
#define SvPV_nolen_const(sv)
 
#define SvPV_nomg(sv, lp)   SvPV_flags(sv, lp, 0)
 
#define SvPV_nomg_const(sv, lp)   SvPV_flags_const(sv, lp, 0)
 
#define SvPV_nomg_const_nolen(sv)   SvPV_flags_const_nolen(sv, 0)
 
#define SvPV_nomg_nolen(sv)
 
#define SvPV_renew(sv, n)
 
#define SvPVbyte   SvPV
 
#define SvPVX_const(sv)   ((const char*) (0 + SvPVX(sv)))
 
#define SvPVX_mutable(sv)   (0 + SvPVX(sv))
 
#define SvREFCNT_inc(sv)   ((PL_Sv=(SV*)(sv)) ? (++(SvREFCNT(PL_Sv)),PL_Sv) : NULL)
 
#define SvREFCNT_inc_NN(sv)   (PL_Sv=(SV*)(sv),++(SvREFCNT(PL_Sv)),PL_Sv)
 
#define SvREFCNT_inc_simple(sv)   ((sv) ? (SvREFCNT(sv)++,(SV*)(sv)) : NULL)
 
#define SvREFCNT_inc_simple_NN(sv)   (++SvREFCNT(sv), (SV*)(sv))
 
#define SvREFCNT_inc_simple_void(sv)   STMT_START { if (sv) SvREFCNT(sv)++; } STMT_END
 
#define SvREFCNT_inc_simple_void_NN(sv)   (void)(++SvREFCNT((SV*)(sv)))
 
#define SvREFCNT_inc_void(sv)   (void)((PL_Sv=(SV*)(sv)) ? ++(SvREFCNT(PL_Sv)) : 0)
 
#define SvREFCNT_inc_void_NN(sv)   (void)(++SvREFCNT((SV*)(sv)))
 
#define SvRV_set(sv, val)
 
#define SvSHARED_HASH(sv)   (0 + SvUVX(sv))
 
#define SvSTASH_set(sv, val)
 
#define SvUV(sv)   (SvIOK(sv) ? SvUVX(sv) : sv_2uv(sv))
 
#define SvUV_nomg   SvUV
 
#define SvUV_set(sv, val)
 
#define SvUVX(sv)   ((UV)SvIVX(sv))
 
#define SvUVx(sv)   ((PL_Sv = (sv)), SvUV(PL_Sv))
 
#define SvUVXx(sv)   SvUVX(sv)
 
#define SvVSTRING_mg(sv)   (SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_vstring) : NULL)
 
#define UNDERBAR   DEFSV
 
#define UTF8_MAXBYTES   UTF8_MAXLEN
 
#define UV_MAX   PERL_ULONG_MAX
 
#define UV_MIN   PERL_ULONG_MIN
 
#define UVof   "lo"
 
#define UVSIZE   IVSIZE
 
#define UVTYPE   unsigned IVTYPE
 
#define UVuf   "lu"
 
#define UVxf   "lx"
 
#define UVXf   "lX"
 
#define vload_module(a, b, c, d)   DPPP_(my_vload_module)(aTHX_ a,b,c,d)
 
#define WARN_ALL   0
 
#define WARN_AMBIGUOUS   29
 
#define WARN_ASSERTIONS   46
 
#define WARN_BAREWORD   30
 
#define WARN_CLOSED   6
 
#define WARN_CLOSURE   1
 
#define WARN_DEBUGGING   22
 
#define WARN_DEPRECATED   2
 
#define WARN_DIGIT   31
 
#define WARN_EXEC   7
 
#define WARN_EXITING   3
 
#define WARN_GLOB   4
 
#define WARN_INPLACE   23
 
#define WARN_INTERNAL   24
 
#define WARN_IO   5
 
#define WARN_LAYER   8
 
#define WARN_MALLOC   25
 
#define WARN_MISC   12
 
#define WARN_NEWLINE   9
 
#define WARN_NUMERIC   13
 
#define WARN_ONCE   14
 
#define WARN_OVERFLOW   15
 
#define WARN_PACK   16
 
#define WARN_PARENTHESIS   32
 
#define WARN_PIPE   10
 
#define WARN_PORTABLE   17
 
#define WARN_PRECEDENCE   33
 
#define WARN_PRINTF   34
 
#define WARN_PROTOTYPE   35
 
#define WARN_QW   36
 
#define WARN_RECURSION   18
 
#define WARN_REDEFINE   19
 
#define WARN_REGEXP   20
 
#define WARN_RESERVED   37
 
#define WARN_SEMICOLON   38
 
#define WARN_SEVERE   21
 
#define WARN_SIGNAL   26
 
#define WARN_SUBSTR   27
 
#define WARN_SYNTAX   28
 
#define WARN_TAINT   39
 
#define WARN_THREADS   40
 
#define WARN_UNINITIALIZED   41
 
#define WARN_UNOPENED   11
 
#define WARN_UNPACK   42
 
#define WARN_UNTIE   43
 
#define WARN_UTF8   44
 
#define WARN_VOID   45
 
#define WIDEST_UTYPE   U32
 
#define XPUSHmortal   XPUSHs(sv_newmortal())
 
#define XPUSHu(u)   STMT_START { sv_setuv(TARG, (UV)(u)); XPUSHTARG; } STMT_END
 
#define XSprePUSH   (sp = PL_stack_base + ax - 1)
 
#define XSPROTO(name)   void name(pTHX_ CV* cv)
 
#define XSRETURN(off)
 
#define XSRETURN_UV(v)   STMT_START { XST_mUV(0,v); XSRETURN(1); } STMT_END
 
#define XST_mUV(i, v)   (ST(i) = sv_2mortal(newSVuv(v)) )
 
#define ZeroD(d, n, t)   ((void)memzero((char*)(d), (n) * sizeof(t)), d)
 

Typedefs

typedef NVTYPE NV
 
typedef OP *CPERLscope Perl_check_t (pTHX_ OP *)
 
typedef OP *CPERLscope Perl_ppaddr_t (pTHX)
 

Functions

U32 DPPP_ (my_PL_signals)
 
SV *DPPP_() my_eval_pv (char *p, I32 croak_on_error)
 
UV DPPP_() my_grok_bin (pTHX_ const char *start, STRLEN *len_p, I32 *flags, NV *result)
 
UV DPPP_() my_grok_hex (pTHX_ const char *start, STRLEN *len_p, I32 *flags, NV *result)
 
int DPPP_() my_grok_number (pTHX_ const char *pv, STRLEN len, UV *valuep)
 
bool DPPP_() my_grok_numeric_radix (pTHX_ const char **sp, const char *send)
 
UV DPPP_() my_grok_oct (pTHX_ const char *start, STRLEN *len_p, I32 *flags, NV *result)
 
void DPPP_() my_load_module (U32 flags, SV *name, SV *ver,...)
 
MAGIC *DPPP_() my_mg_findext (SV *sv, int type, const MGVTBL *vtbl)
 
int DPPP_() my_my_snprintf (char *buffer, const Size_t len, const char *format,...)
 
int DPPP_() my_my_sprintf (char *buffer, const char *pat,...)
 
Size_t DPPP_() my_my_strlcat (char *dst, const char *src, Size_t size)
 
Size_t DPPP_() my_my_strlcpy (char *dst, const char *src, Size_t size)
 
void DPPP_() my_newCONSTSUB (HV *stash, const char *name, SV *sv)
 
SV *DPPP_() my_newRV_noinc (SV *sv)
 
SV *DPPP_() my_newSV_type (pTHX_ svtype const t)
 
SV *DPPP_() my_newSVpvn_flags (pTHX_ const char *s, STRLEN len, U32 flags)
 
SV *DPPP_() my_newSVpvn_share (pTHX_ const char *src, I32 len, U32 hash)
 
char *DPPP_() my_pv_display (pTHX_ SV *dsv, const char *pv, STRLEN cur, STRLEN len, STRLEN pvlim)
 
char *DPPP_() my_pv_escape (pTHX_ SV *dsv, char const *const str, const STRLEN count, const STRLEN max, STRLEN *const escaped, const U32 flags)
 
char *DPPP_() my_pv_pretty (pTHX_ SV *dsv, char const *const str, const STRLEN count, const STRLEN max, char const *const start_color, char const *const end_color, const U32 flags)
 
char *DPPP_() my_sv_2pv_flags (pTHX_ SV *sv, STRLEN *lp, I32 flags)
 
char *DPPP_() my_sv_pvn_force_flags (pTHX_ SV *sv, STRLEN *lp, I32 flags)
 
int DPPP_() my_sv_unmagicext (pTHX_ SV *const sv, const int type, MGVTBL *vtbl)
 
void DPPP_() my_vload_module (U32 flags, SV *name, SV *ver, va_list *args)
 

Macro Definition Documentation

#define _aMY_CXT
#define _dpppDEC2BCD (   dec)    ((((dec)/100)<<8)|((((dec)%100)/10)<<4)|((dec)%10))
#define _P_P_PORTABILITY_H_
#define _pMY_CXT
#define aMY_CXT
#define aMY_CXT_
#define aTHX
#define aTHX_
#define aTHXR
#define aTHXR_
#define AvFILLp   AvFILL
#define boolSV (   b)    ((b) ? &PL_sv_yes : &PL_sv_no)
#define call_argv   perl_call_argv
#define call_method   perl_call_method
#define call_pv   perl_call_pv
#define call_sv   perl_call_sv
#define call_sv (   sv,
  flags 
)
Value:
((flags) & G_METHOD ? perl_call_method((char *) SvPV_nolen_const(sv), \
(flags) & ~G_METHOD) : perl_call_sv(sv, flags))
#define G_METHOD
Definition: ppport.h:965
#define SvPV_nolen_const(sv)
Definition: ppport.h:1553
#define ckWARN (   a)    PL_dowarn
#define CopFILE (   c)    (CopFILESV(c) ? SvPVX(CopFILESV(c)) : Nullch)
#define CopFILE_set (   c,
  pv 
)    CopFILEGV_set((c), gv_fetchfile(pv))
#define CopFILEAV (   c)    (CopFILEGV(c) ? GvAV(CopFILEGV(c)) : Nullav)
#define CopFILEGV (   c)    ((c)->cop_filegv)
#define CopFILEGV_set (   c,
  gv 
)    ((c)->cop_filegv = (GV*)SvREFCNT_inc(gv))
#define CopFILESV (   c)    (CopFILEGV(c) ? GvSV(CopFILEGV(c)) : Nullsv)
#define CopSTASH (   c)    ((c)->cop_stash)
#define CopSTASH_eq (   c,
  hv 
)    (CopSTASH(c) == (hv))
#define CopSTASH_set (   c,
  hv 
)    ((c)->cop_stash = (hv))
#define CopSTASHPV (   c)    (CopSTASH(c) ? HvNAME(CopSTASH(c)) : Nullch)
#define CopSTASHPV_set (   c,
  pv 
)    CopSTASH_set((c), gv_stashpv(pv,GV_ADD))
#define CopyD (   s,
  d,
  n,
  t 
)    memcpy((char*)(d),(char*)(s), (n) * sizeof(t))
#define CPERLscope (   x)    x
#define D_PPP_CONSTPV_ARG (   x)    ((char *) (x))
#define D_PPP_PERL_SIGNALS_INIT   PERL_SIGNALS_UNSAFE_FLAG
#define dAX   I32 ax = MARK - PL_stack_base + 1
#define dAXMARK
Value:
I32 ax = POPMARK; \
register SV ** const mark = PL_stack_base + ax++
#define PL_stack_base
Definition: ppport.h:854
#define DEFSV   GvSV(PL_defgv)
#define DEFSV_set (   sv)    (DEFSV = (sv))
#define dITEMS   I32 items = SP - MARK
#define dMY_CXT   dNOOP
#define dMY_CXT_SV   dNOOP
#define dNOOP   extern int Perl___notused PERL_UNUSED_DECL
#define DPPP_ (   name)    DPPP_CAT2(DPPP_NAMESPACE, name)
#define DPPP_CAT2 (   x,
  y 
)    CAT2(x,y)
#define DPPP_NAMESPACE   DPPP_
#define DPPP_SVPV_NOLEN_LP_ARG   &PL_na
#define dTHR   dNOOP
#define dTHX   dNOOP
#define dTHXa (   x)    dNOOP
#define dTHXoa (   x)    dTHXa(x)
#define dTHXR   dTHR
#define dUNDERBAR   dNOOP
#define dVAR   dNOOP
#define dXSTARG   SV * targ = sv_newmortal()
#define END_EXTERN_C
#define ERRSV   get_sv("@",FALSE)
#define eval_pv (   a,
 
)    DPPP_(my_eval_pv)(aTHX_ a,b)
#define eval_sv   perl_eval_sv
#define EXTERN_C   extern
#define G_METHOD   64
#define get_av   perl_get_av
#define get_cv   perl_get_cv
#define get_cvn_flags (   name,
  namelen,
  flags 
)    get_cv(name, flags)
#define get_cvs (   name,
  flags 
)    get_cvn_flags(name "", sizeof(name)-1, flags)
#define get_hv   perl_get_hv
#define get_sv   perl_get_sv
#define grok_bin (   a,
  b,
  c,
  d 
)    DPPP_(my_grok_bin)(aTHX_ a,b,c,d)
#define grok_hex (   a,
  b,
  c,
  d 
)    DPPP_(my_grok_hex)(aTHX_ a,b,c,d)
#define grok_number (   a,
  b,
  c 
)    DPPP_(my_grok_number)(aTHX_ a,b,c)
#define GROK_NUMERIC_RADIX (   sp,
  send 
)    grok_numeric_radix(sp, send)
#define grok_numeric_radix (   a,
 
)    DPPP_(my_grok_numeric_radix)(aTHX_ a,b)
#define grok_oct (   a,
  b,
  c,
  d 
)    DPPP_(my_grok_oct)(aTHX_ a,b,c,d)
#define gv_fetchpvn_flags (   name,
  len,
  flags,
  svt 
)    gv_fetchpv(name, flags, svt)
#define gv_fetchpvs (   name,
  flags,
  svt 
)    gv_fetchpvn_flags(name "", sizeof(name) - 1, flags, svt)
#define gv_fetchsv (   name,
  flags,
  svt 
)    gv_fetchpv(SvPV_nolen_const(name), flags, svt)
#define gv_stashpvn (   str,
  len,
  create 
)    gv_stashpv(str,create)
#define gv_stashpvs (   name,
  flags 
)    gv_stashpvn(name "", sizeof(name) - 1, flags)
#define GvSVn (   gv)    GvSV(gv)
#define HEf_SVKEY   -2
#define hv_fetchs (   hv,
  key,
  lval 
)    hv_fetch(hv, key "", sizeof(key) - 1, lval)
#define hv_stores (   hv,
  key,
  val 
)    hv_store(hv, key "", sizeof(key) - 1, val, 0)
#define HvNAME_get (   hv)    HvNAME(hv)
#define HvNAMELEN_get (   hv)    (HvNAME_get(hv) ? (I32)strlen(HvNAME_get(hv)) : 0)
#define IN_LOCALE_COMPILETIME   (PL_hints & HINT_LOCALE)
#define IN_LOCALE_RUNTIME   (PL_curcop->op_private & HINT_LOCALE)
#define IN_PERL_COMPILETIME   (PL_curcop == &PL_compiling)
#define INT2PTR (   any,
  d 
)    (any)(PTRV)(d)
#define IS_NUMBER_GREATER_THAN_UV_MAX   0x02
#define IS_NUMBER_IN_UV   0x01
#define IS_NUMBER_INFINITY   0x10
#define IS_NUMBER_NAN   0x20
#define IS_NUMBER_NEG   0x08
#define IS_NUMBER_NOT_INT   0x04
#define isALNUMC (   c)    (isALPHA(c) || isDIGIT(c))
#define isASCII (   c)    ((WIDEST_UTYPE) (c) <= 127)
#define isBLANK (   c)    ((c) == ' ' || (c) == '\t')
#define isCNTRL (   c)    ((WIDEST_UTYPE) (c) < ' ' || (c) == 127)
#define isGRAPH (   c)    (isALNUM(c) || isPUNCT(c))
#define isGV_with_GP (   gv)    isGV(gv)
#define isPRINT (   c)    (((c) >= 32 && (c) < 127))
#define isPSXSPC (   c)    (isSPACE(c) || (c) == '\v')
#define isPUNCT (   c)    (((c) >= 33 && (c) <= 47) || ((c) >= 58 && (c) <= 64) || ((c) >= 91 && (c) <= 96) || ((c) >= 123 && (c) <= 126))
#define isXDIGIT (   c)    (isDIGIT(c) || ((c) >= 'a' && (c) <= 'f') || ((c) >= 'A' && (c) <= 'F'))
#define IV_MAX   PERL_LONG_MAX
#define IV_MIN   PERL_LONG_MIN
#define IVdf   "ld"
#define IVSIZE   LONGSIZE
#define IVTYPE   long
#define load_module   DPPP_(my_load_module)
#define LONGSIZE   4
#define memEQ (   s1,
  s2,
  l 
)    (!bcmp(s1,s2,l))
#define memEQs (   s1,
  l,
  s2 
)    (sizeof(s2)-1 == l && memEQ(s1, (s2 ""), (sizeof(s2)-1)))
#define memNE (   s1,
  s2,
  l 
)    (bcmp(s1,s2,l))
#define memNEs (   s1,
  l,
  s2 
)    !memEQs(s1, l, s2)
#define mg_findext   DPPP_(my_mg_findext)
#define MoveD (   s,
  d,
  n,
  t 
)    memmove((char*)(d),(char*)(s), (n) * sizeof(t))
#define mPUSHi (   i)    sv_setiv(PUSHmortal, (IV)(i))
#define mPUSHn (   n)    sv_setnv(PUSHmortal, (NV)(n))
#define mPUSHp (   p,
  l 
)    sv_setpvn(PUSHmortal, (p), (l))
#define mPUSHs (   s)    PUSHs(sv_2mortal(s))
#define mPUSHu (   u)    sv_setuv(PUSHmortal, (UV)(u))
#define MUTABLE_PTR (   p)    ((void *) (p))
#define MUTABLE_SV (   p)    ((SV *)MUTABLE_PTR(p))
#define mXPUSHi (   i)    STMT_START { EXTEND(sp,1); sv_setiv(PUSHmortal, (IV)(i)); } STMT_END
#define mXPUSHn (   n)    STMT_START { EXTEND(sp,1); sv_setnv(PUSHmortal, (NV)(n)); } STMT_END
#define mXPUSHp (   p,
  l 
)    STMT_START { EXTEND(sp,1); sv_setpvn(PUSHmortal, (p), (l)); } STMT_END
#define mXPUSHs (   s)    XPUSHs(sv_2mortal(s))
#define mXPUSHu (   u)    STMT_START { EXTEND(sp,1); sv_setuv(PUSHmortal, (UV)(u)); } STMT_END
#define MY_CXT   my_cxt
#define MY_CXT_CLONE   NOOP
#define MY_CXT_INIT   NOOP
#define my_snprintf   DPPP_(my_my_snprintf)
#define my_sprintf   DPPP_(my_my_sprintf)
#define my_strlcat   DPPP_(my_my_strlcat)
#define my_strlcpy   DPPP_(my_my_strlcpy)
#define newCONSTSUB (   a,
  b,
  c 
)    DPPP_(my_newCONSTSUB)(aTHX_ a,b,c)
#define newRV_inc (   sv)    newRV(sv)
#define newRV_noinc (   a)    DPPP_(my_newRV_noinc)(aTHX_ a)
#define newSV_type (   a)    DPPP_(my_newSV_type)(aTHX_ a)
#define newSVpvn (   data,
  len 
)
Value:
((data) \
? ((len) ? newSVpv((data), (len)) : newSVpv("", 0)) \
: newSV(0))
#define newSVpvn_flags (   a,
  b,
  c 
)    DPPP_(my_newSVpvn_flags)(aTHX_ a,b,c)
#define newSVpvn_share (   a,
  b,
  c 
)    DPPP_(my_newSVpvn_share)(aTHX_ a,b,c)
#define newSVpvn_utf8 (   s,
  len,
  u 
)    newSVpvn_flags((s), (len), (u) ? SVf_UTF8 : 0)
#define newSVpvs (   str)    newSVpvn(str "", sizeof(str) - 1)
#define newSVpvs_flags (   str,
  flags 
)    newSVpvn_flags(str "", sizeof(str) - 1, flags)
#define newSVpvs_share (   str)    newSVpvn_share(str "", sizeof(str) - 1, 0)
#define newSVuv (   uv)    ((uv) <= IV_MAX ? newSViv((IV)uv) : newSVnv((NV)uv))
#define Newx (   v,
  n,
  t 
)    New(0,v,n,t)
#define Newxc (   v,
  n,
  t,
  c 
)    Newc(0,v,n,t,c)
#define Newxz (   v,
  n,
  t 
)    Newz(0,v,n,t)
#define NOOP   (void)0
#define NUM2PTR (   any,
  d 
)    (any)PTR2nat(d)
#define NVef   "e"
#define NVff   "f"
#define NVgf   "g"
#define NVTYPE   double
#define packWARN (   a)    (a)
#define PERL_ABS (   x)    ((x) < 0 ? -(x) : (x))
#define PERL_BCDVERSION   ((_dpppDEC2BCD(PERL_REVISION)<<24)|(_dpppDEC2BCD(PERL_VERSION)<<12)|_dpppDEC2BCD(PERL_SUBVERSION))
#define Perl_eval_pv   DPPP_(my_eval_pv)
#define Perl_grok_bin   DPPP_(my_grok_bin)
#define Perl_grok_hex   DPPP_(my_grok_hex)
#define Perl_grok_number   DPPP_(my_grok_number)
#define Perl_grok_numeric_radix   DPPP_(my_grok_numeric_radix)
#define Perl_grok_oct   DPPP_(my_grok_oct)
#define PERL_HASH (   hash,
  str,
  len 
)
Value:
const char *s_PeRlHaSh = str; \
I32 i_PeRlHaSh = len; \
U32 hash_PeRlHaSh = 0; \
while (i_PeRlHaSh--) \
hash_PeRlHaSh = hash_PeRlHaSh * 33 + *s_PeRlHaSh++; \
(hash) = hash_PeRlHaSh; \
while(t.hasNext())
Definition: KvsObject_http.cpp:202
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define PERL_INT_MAX   ((int)(PERL_UINT_MAX >> 1))
#define PERL_INT_MIN   (-PERL_INT_MAX - ((3 & -1) == 3))
#define Perl_load_module   DPPP_(my_load_module)
#define PERL_LOADMOD_DENY   0x1
#define PERL_LOADMOD_IMPORT_OPS   0x4
#define PERL_LOADMOD_NOIMPORT   0x2
#define PERL_LONG_MAX   ((long) (PERL_ULONG_MAX >> 1))
#define PERL_LONG_MIN   (-PERL_LONG_MAX - ((3 & -1) == 3))
#define PERL_MAGIC_arylen   '#'
#define PERL_MAGIC_backref   '<'
#define PERL_MAGIC_bm   'B'
#define PERL_MAGIC_collxfrm   'o'
#define PERL_MAGIC_dbfile   'L'
#define PERL_MAGIC_dbline   'l'
#define PERL_MAGIC_defelem   'y'
#define PERL_MAGIC_env   'E'
#define PERL_MAGIC_envelem   'e'
#define PERL_MAGIC_ext   '~'
#define PERL_MAGIC_fm   'f'
#define PERL_MAGIC_glob   '*'
#define PERL_MAGIC_isa   'I'
#define PERL_MAGIC_isaelem   'i'
#define PERL_MAGIC_mutex   'm'
#define PERL_MAGIC_nkeys   'k'
#define PERL_MAGIC_overload   'A'
#define PERL_MAGIC_overload_elem   'a'
#define PERL_MAGIC_overload_table   'c'
#define PERL_MAGIC_pos   '.'
#define PERL_MAGIC_qr   'r'
#define PERL_MAGIC_regdata   'D'
#define PERL_MAGIC_regdatum   'd'
#define PERL_MAGIC_regex_global   'g'
#define PERL_MAGIC_shared   'N'
#define PERL_MAGIC_shared_scalar   'n'
#define PERL_MAGIC_sig   'S'
#define PERL_MAGIC_sigelem   's'
#define PERL_MAGIC_substr   'x'
#define PERL_MAGIC_sv   '\0'
#define PERL_MAGIC_taint   't'
#define PERL_MAGIC_tied   'P'
#define PERL_MAGIC_tiedelem   'p'
#define PERL_MAGIC_tiedscalar   'q'
#define PERL_MAGIC_utf8   'w'
#define PERL_MAGIC_uvar   'U'
#define PERL_MAGIC_uvar_elem   'u'
#define PERL_MAGIC_vec   'v'
#define PERL_MAGIC_vstring   'V'
#define Perl_mg_findext   DPPP_(my_mg_findext)
#define Perl_my_snprintf   DPPP_(my_my_snprintf)
#define Perl_my_sprintf   DPPP_(my_my_sprintf)
#define Perl_my_strlcat   DPPP_(my_my_strlcat)
#define Perl_my_strlcpy   DPPP_(my_my_strlcpy)
#define Perl_newCONSTSUB   DPPP_(my_newCONSTSUB)
#define Perl_newRV_noinc   DPPP_(my_newRV_noinc)
#define Perl_newSV_type   DPPP_(my_newSV_type)
#define Perl_newSVpvn_flags   DPPP_(my_newSVpvn_flags)
#define Perl_newSVpvn_share   DPPP_(my_newSVpvn_share)
#define PERL_PATCHLEVEL_H_IMPLICIT
#define Perl_pv_display   DPPP_(my_pv_display)
#define Perl_pv_escape   DPPP_(my_pv_escape)
#define PERL_PV_ESCAPE_ALL   0x1000
#define PERL_PV_ESCAPE_FIRSTCHAR   0x0008
#define PERL_PV_ESCAPE_NOBACKSLASH   0x2000
#define PERL_PV_ESCAPE_NOCLEAR   0x4000
#define PERL_PV_ESCAPE_QUOTE   0x0001
#define PERL_PV_ESCAPE_RE   0x8000
#define PERL_PV_ESCAPE_UNI   0x0100
#define PERL_PV_ESCAPE_UNI_DETECT   0x0200
#define Perl_pv_pretty   DPPP_(my_pv_pretty)
#define PERL_PV_PRETTY_DUMP   PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_QUOTE
#define PERL_PV_PRETTY_ELLIPSES   0x0002
#define PERL_PV_PRETTY_LTGT   0x0004
#define PERL_PV_PRETTY_NOCLEAR   PERL_PV_ESCAPE_NOCLEAR
#define PERL_PV_PRETTY_QUOTE   PERL_PV_ESCAPE_QUOTE
#define PERL_PV_PRETTY_REGPROP   PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
#define PERL_REVISION   (5)
#define PERL_SCAN_ALLOW_UNDERSCORES   0x01
#define PERL_SCAN_DISALLOW_PREFIX   0x02
#define PERL_SCAN_GREATER_THAN_UV_MAX   0x02
#define PERL_SCAN_SILENT_ILLDIGIT   0x04
#define PERL_SHORT_MAX   ((short) (PERL_USHORT_MAX >> 1))
#define PERL_SHORT_MIN   (-PERL_SHORT_MAX - ((3 & -1) == 3))
#define PERL_SIGNALS_UNSAFE_FLAG   0x0001
#define PERL_SUBVERSION   SUBVERSION
#define Perl_sv_2pv_flags   DPPP_(my_sv_2pv_flags)
#define Perl_sv_pvn_force_flags   DPPP_(my_sv_pvn_force_flags)
#define Perl_sv_unmagicext   DPPP_(my_sv_unmagicext)
#define PERL_UCHAR_MAX   ((unsigned char)~(unsigned)0)
#define PERL_UCHAR_MIN   ((unsigned char)0)
#define PERL_UINT_MAX   (~(unsigned int)0)
#define PERL_UINT_MIN   ((unsigned int)0)
#define PERL_ULONG_MAX   (~(unsigned long)0)
#define PERL_ULONG_MIN   ((unsigned long)0L)
#define PERL_UNUSED_ARG (   x)    ((void)x)
#define PERL_UNUSED_CONTEXT
#define PERL_UNUSED_DECL
#define PERL_UNUSED_VAR (   x)    ((void)x)
#define PERL_USHORT_MAX   ((unsigned short)~(unsigned)0)
#define PERL_USHORT_MIN   ((unsigned short)0)
#define PERL_VERSION   PATCHLEVEL
#define Perl_vload_module   DPPP_(my_vload_module)
#define PERLIO_FUNCS_CAST (   funcs)    (funcs)
#define PERLIO_FUNCS_DECL (   funcs)    PerlIO_funcs funcs
#define PL_bufend   bufend
#define PL_bufptr   bufptr
#define PL_compiling   compiling
#define PL_copline   copline
#define PL_curcop   curcop
#define PL_curstash   curstash
#define PL_DBsignal   DBsignal
#define PL_DBsingle   DBsingle
#define PL_DBsub   DBsub
#define PL_DBtrace   DBtrace
#define PL_debstash   debstash
#define PL_defgv   defgv
#define PL_diehook   diehook
#define PL_dirty   dirty
#define PL_dowarn   dowarn
#define PL_errgv   errgv
#define PL_error_count   error_count
#define PL_expect   expect
#define PL_hexdigit   hexdigit
#define PL_hints   hints
#define PL_in_my   in_my
#define PL_laststatval   laststatval
#define PL_lex_state   lex_state
#define PL_lex_stuff   lex_stuff
#define PL_linestr   linestr
#define PL_na   na
#define PL_no_modify   no_modify
#define PL_parser   ((void *) 1)
#define PL_perl_destruct_level   perl_destruct_level
#define PL_perldb   perldb
#define PL_ppaddr   ppaddr
#define PL_rsfp   rsfp
#define PL_rsfp_filters   rsfp_filters
#define PL_signals   DPPP_(my_PL_signals)
#define PL_stack_base   stack_base
#define PL_stack_sp   stack_sp
#define PL_statcache   statcache
#define PL_stdingv   stdingv
#define PL_Sv   Sv
#define PL_sv_arenaroot   sv_arenaroot
#define PL_sv_no   sv_no
#define PL_sv_undef   sv_undef
#define PL_sv_yes   sv_yes
#define PL_tainted   tainted
#define PL_tainting   tainting
#define PL_tokenbuf   tokenbuf
#define pMY_CXT   void
#define pMY_CXT_
#define Poison (   d,
  n,
  t 
)    PoisonFree(d,n,t)
#define PoisonFree (   d,
  n,
  t 
)    PoisonWith(d,n,t,0xEF)
#define PoisonNew (   d,
  n,
  t 
)    PoisonWith(d,n,t,0xAB)
#define PoisonWith (   d,
  n,
  t,
 
)    (void)memset((char*)(d), (U8)(b), (n) * sizeof(t))
#define pTHX   void
#define pTHX_
#define PTR2IV (   p)    INT2PTR(IV,p)
#define PTR2nat (   p)    (PTRV)(p)
#define PTR2NV (   p)    NUM2PTR(NV,p)
#define PTR2ul (   p)    INT2PTR(unsigned long,p)
#define PTR2UV (   p)    INT2PTR(UV,p)
#define PTRV   unsigned
#define PUSHmortal   PUSHs(sv_newmortal())
#define PUSHu (   u)    STMT_START { sv_setuv(TARG, (UV)(u)); PUSHTARG; } STMT_END
#define pv_display (   a,
  b,
  c,
  d,
  e 
)    DPPP_(my_pv_display)(aTHX_ a,b,c,d,e)
#define pv_escape (   a,
  b,
  c,
  d,
  e,
  f 
)    DPPP_(my_pv_escape)(aTHX_ a,b,c,d,e,f)
#define pv_pretty (   a,
  b,
  c,
  d,
  e,
  f,
  g 
)    DPPP_(my_pv_pretty)(aTHX_ a,b,c,d,e,f,g)
#define SAVE_DEFSV   SAVESPTR(GvSV(PL_defgv))
#define START_EXTERN_C
#define START_MY_CXT   static my_cxt_t my_cxt;
#define STMT_END   while (0)
#define STMT_START   do
#define STR_WITH_LEN (   s)    (s ""), (sizeof(s)-1)
#define sv_2pv_flags (   a,
  b,
  c 
)    DPPP_(my_sv_2pv_flags)(aTHX_ a,b,c)
#define sv_2pv_nolen (   sv)    SvPV_nolen(sv)
#define sv_2pvbyte   sv_2pv
#define sv_2pvbyte_nolen (   sv)    sv_2pv_nolen(sv)
#define sv_2uv (   sv)    ((PL_Sv = (sv)), (UV) (SvNOK(PL_Sv) ? SvNV(PL_Sv) : sv_2nv(PL_Sv)))
#define sv_catpv_mg (   sv,
  ptr 
)
Value:
SV *TeMpSv = sv; \
sv_catpv(TeMpSv,ptr); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define sv_catpvf_mg   Perl_sv_catpvf_mg
#define sv_catpvn_mg (   sv,
  ptr,
  len 
)
Value:
SV *TeMpSv = sv; \
sv_catpvn(TeMpSv,ptr,len); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define sv_catpvn_nomg   sv_catpvn
#define sv_catpvs (   sv,
  str 
)    sv_catpvn(sv, str "", sizeof(str) - 1)
#define sv_catsv_mg (   dsv,
  ssv 
)
Value:
SV *TeMpSv = dsv; \
sv_catsv(TeMpSv,ssv); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
S ssv[]
Definition: detector.cpp:179
#define STMT_START
Definition: ppport.h:616
#define sv_catsv_nomg   sv_catsv
#define SV_CONST_RETURN   0
#define SV_COW_DROP_PV   0
#define SV_COW_SHARED_HASH_KEYS   0
#define SV_GMAGIC   0
#define SV_HAS_TRAILING_NUL   0
#define SV_IMMEDIATE_UNREF   0
#define SV_MUTABLE_RETURN   0
#define SV_NOSTEAL   0
#define sv_pvn_force_flags (   a,
  b,
  c 
)    DPPP_(my_sv_pvn_force_flags)(aTHX_ a,b,c)
#define sv_pvn_nomg   sv_pvn
#define sv_setiv_mg (   sv,
  i 
)
Value:
SV *TeMpSv = sv; \
sv_setiv(TeMpSv,i); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
#define i
Definition: detector.cpp:73
#define STMT_START
Definition: ppport.h:616
#define sv_setnv_mg (   sv,
  num 
)
Value:
SV *TeMpSv = sv; \
sv_setnv(TeMpSv,num); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define sv_setpv_mg (   sv,
  ptr 
)
Value:
SV *TeMpSv = sv; \
sv_setpv(TeMpSv,ptr); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define sv_setpvf_mg   Perl_sv_setpvf_mg
#define sv_setpvn_mg (   sv,
  ptr,
  len 
)
Value:
SV *TeMpSv = sv; \
sv_setpvn(TeMpSv,ptr,len); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define sv_setpvs (   sv,
  str 
)    sv_setpvn(sv, str "", sizeof(str) - 1)
#define sv_setsv_mg (   dsv,
  ssv 
)
Value:
SV *TeMpSv = dsv; \
sv_setsv(TeMpSv,ssv); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
S ssv[]
Definition: detector.cpp:179
#define STMT_START
Definition: ppport.h:616
#define sv_setsv_nomg   sv_setsv
#define sv_setuv (   sv,
  uv 
)
Value:
UV TeMpUv = uv; \
if (TeMpUv <= IV_MAX) \
sv_setiv(sv, TeMpUv); \
else \
sv_setnv(sv, (double)TeMpUv); \
#define IV_MAX
Definition: ppport.h:380
if(m_pFile) delete m_pFile
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define sv_setuv_mg (   sv,
  i 
)
Value:
SV *TeMpSv = sv; \
sv_setuv(TeMpSv,i); \
SvSETMAGIC(TeMpSv); \
#define sv_setuv(sv, uv)
Definition: ppport.h:403
#define STMT_END
Definition: ppport.h:617
#define i
Definition: detector.cpp:73
#define STMT_START
Definition: ppport.h:616
#define SV_SMAGIC   0
#define sv_unmagicext (   a,
  b,
  c 
)    DPPP_(my_sv_unmagicext)(aTHX_ a,b,c)
#define sv_usepvn_mg (   sv,
  ptr,
  len 
)
Value:
SV *TeMpSv = sv; \
sv_usepvn(TeMpSv,ptr,len); \
SvSETMAGIC(TeMpSv); \
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define SV_UTF8_NO_ENCODING   0
#define sv_uv (   sv)    SvUVx(sv)
#define SVf   "_"
#define SVf_UTF8   0
#define SVfARG (   p)    ((void*)(p))
#define SvGETMAGIC (   x)    STMT_START { if (SvGMAGICAL(x)) mg_get(x); } STMT_END
#define SvIV_nomg   SvIV
#define SvMAGIC_set (   sv,
  val 
)
Value:
STMT_START { assert(SvTYPE(sv) >= SVt_PVMG); \
(((XPVMG*) SvANY(sv))->xmg_magic = (val)); } STMT_END
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define SvPV_const (   sv,
  lp 
)    SvPV_flags_const(sv, lp, SV_GMAGIC)
#define SvPV_flags (   sv,
  lp,
  flags 
)
Value:
((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
? ((lp = SvCUR(sv)), SvPVX(sv)) : sv_2pv_flags(sv, &lp, flags))
#define sv_2pv_flags(a, b, c)
Definition: ppport.h:1452
#define SvPV_flags_const (   sv,
  lp,
  flags 
)
Value:
((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
? ((lp = SvCUR(sv)), SvPVX_const(sv)) : \
(const char*) sv_2pv_flags(sv, &lp, flags|SV_CONST_RETURN))
#define SvPVX_const(sv)
Definition: ppport.h:1583
#define SV_CONST_RETURN
Definition: ppport.h:1428
#define sv_2pv_flags(a, b, c)
Definition: ppport.h:1452
#define SvPV_flags_const_nolen (   sv,
  flags 
)
Value:
((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
? SvPVX_const(sv) : \
#define SvPVX_const(sv)
Definition: ppport.h:1583
#define DPPP_SVPV_NOLEN_LP_ARG
Definition: ppport.h:1483
#define SV_CONST_RETURN
Definition: ppport.h:1428
#define sv_2pv_flags(a, b, c)
Definition: ppport.h:1452
#define SvPV_flags_mutable (   sv,
  lp,
  flags 
)
Value:
((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
? ((lp = SvCUR(sv)), SvPVX_mutable(sv)) : \
#define SV_MUTABLE_RETURN
Definition: ppport.h:1431
#define SvPVX_mutable(sv)
Definition: ppport.h:1586
#define sv_2pv_flags(a, b, c)
Definition: ppport.h:1452
#define SvPV_force (   sv,
  lp 
)    SvPV_force_flags(sv, lp, SV_GMAGIC)
#define SvPV_force_flags (   sv,
  lp,
  flags 
)
Value:
((SvFLAGS(sv) & (SVf_POK|SVf_THINKFIRST)) == SVf_POK \
? ((lp = SvCUR(sv)), SvPVX(sv)) : sv_pvn_force_flags(sv, &lp, flags))
#define sv_pvn_force_flags(a, b, c)
Definition: ppport.h:1471
#define SvPV_force_flags_mutable (   sv,
  lp,
  flags 
)
Value:
((SvFLAGS(sv) & (SVf_POK|SVf_THINKFIRST)) == SVf_POK \
? ((lp = SvCUR(sv)), SvPVX_mutable(sv)) \
#define sv_pvn_force_flags(a, b, c)
Definition: ppport.h:1471
#define SV_MUTABLE_RETURN
Definition: ppport.h:1431
#define SvPVX_mutable(sv)
Definition: ppport.h:1586
#define SvPV_force_flags_nolen (   sv,
  flags 
)
Value:
((SvFLAGS(sv) & (SVf_POK|SVf_THINKFIRST)) == SVf_POK \
? SvPVX(sv) : sv_pvn_force_flags(sv, DPPP_SVPV_NOLEN_LP_ARG, flags))
#define sv_pvn_force_flags(a, b, c)
Definition: ppport.h:1471
#define DPPP_SVPV_NOLEN_LP_ARG
Definition: ppport.h:1483
#define SvPV_force_mutable (   sv,
  lp 
)    SvPV_force_flags_mutable(sv, lp, SV_GMAGIC)
#define SvPV_force_nolen (   sv)    SvPV_force_flags_nolen(sv, SV_GMAGIC)
#define SvPV_force_nomg (   sv,
  lp 
)    SvPV_force_flags(sv, lp, 0)
#define SvPV_force_nomg_nolen (   sv)    SvPV_force_flags_nolen(sv, 0)
#define SvPV_mutable (   sv,
  lp 
)    SvPV_flags_mutable(sv, lp, SV_GMAGIC)
#define SvPV_nolen (   sv)
Value:
((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
#define SV_GMAGIC
Definition: ppport.h:1416
#define DPPP_SVPV_NOLEN_LP_ARG
Definition: ppport.h:1483
#define sv_2pv_flags(a, b, c)
Definition: ppport.h:1452
#define SvPV_nolen_const (   sv)
Value:
((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
#define SvPVX_const(sv)
Definition: ppport.h:1583
#define SV_GMAGIC
Definition: ppport.h:1416
#define DPPP_SVPV_NOLEN_LP_ARG
Definition: ppport.h:1483
#define SV_CONST_RETURN
Definition: ppport.h:1428
#define sv_2pv_flags(a, b, c)
Definition: ppport.h:1452
#define SvPV_nomg (   sv,
  lp 
)    SvPV_flags(sv, lp, 0)
#define SvPV_nomg_const (   sv,
  lp 
)    SvPV_flags_const(sv, lp, 0)
#define SvPV_nomg_const_nolen (   sv)    SvPV_flags_const_nolen(sv, 0)
#define SvPV_nomg_nolen (   sv)
Value:
((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
? SvPVX(sv) : sv_2pv_flags(sv, DPPP_SVPV_NOLEN_LP_ARG, 0))
#define DPPP_SVPV_NOLEN_LP_ARG
Definition: ppport.h:1483
#define sv_2pv_flags(a, b, c)
Definition: ppport.h:1452
#define SvPV_renew (   sv,
  n 
)
Value:
STMT_START { SvLEN_set(sv, n); \
SvPV_set((sv), (char *) saferealloc( \
(Malloc_t)SvPVX(sv), (MEM_SIZE)((n)))); \
#define n
Definition: detector.cpp:78
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define SvPVbyte   SvPV
#define SvPVX_const (   sv)    ((const char*) (0 + SvPVX(sv)))
#define SvPVX_mutable (   sv)    (0 + SvPVX(sv))
#define SvREFCNT_inc (   sv)    ((PL_Sv=(SV*)(sv)) ? (++(SvREFCNT(PL_Sv)),PL_Sv) : NULL)
#define SvREFCNT_inc_NN (   sv)    (PL_Sv=(SV*)(sv),++(SvREFCNT(PL_Sv)),PL_Sv)
#define SvREFCNT_inc_simple (   sv)    ((sv) ? (SvREFCNT(sv)++,(SV*)(sv)) : NULL)
#define SvREFCNT_inc_simple_NN (   sv)    (++SvREFCNT(sv), (SV*)(sv))
#define SvREFCNT_inc_simple_void (   sv)    STMT_START { if (sv) SvREFCNT(sv)++; } STMT_END
#define SvREFCNT_inc_simple_void_NN (   sv)    (void)(++SvREFCNT((SV*)(sv)))
#define SvREFCNT_inc_void (   sv)    (void)((PL_Sv=(SV*)(sv)) ? ++(SvREFCNT(PL_Sv)) : 0)
#define SvREFCNT_inc_void_NN (   sv)    (void)(++SvREFCNT((SV*)(sv)))
#define SvRV_set (   sv,
  val 
)
Value:
STMT_START { assert(SvTYPE(sv) >= SVt_RV); \
(((XRV*) SvANY(sv))->xrv_rv = (val)); } STMT_END
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define SvSHARED_HASH (   sv)    (0 + SvUVX(sv))
#define SvSTASH_set (   sv,
  val 
)
Value:
STMT_START { assert(SvTYPE(sv) >= SVt_PVMG); \
(((XPVMG*) SvANY(sv))->xmg_stash = (val)); } STMT_END
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define SvUV (   sv)    (SvIOK(sv) ? SvUVX(sv) : sv_2uv(sv))
#define SvUV_nomg   SvUV
#define SvUV_set (   sv,
  val 
)
Value:
STMT_START { assert(SvTYPE(sv) == SVt_IV || SvTYPE(sv) >= SVt_PVIV); \
(((XPVIV*) SvANY(sv))->xiv_iv = (IV) (val)); } STMT_END
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define SvUVX (   sv)    ((UV)SvIVX(sv))
#define SvUVx (   sv)    ((PL_Sv = (sv)), SvUV(PL_Sv))
#define SvUVXx (   sv)    SvUVX(sv)
#define SvVSTRING_mg (   sv)    (SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_vstring) : NULL)
#define UNDERBAR   DEFSV
#define UTF8_MAXBYTES   UTF8_MAXLEN
#define UV_MAX   PERL_ULONG_MAX
#define UV_MIN   PERL_ULONG_MIN
#define UVof   "lo"
#define UVSIZE   IVSIZE
#define UVTYPE   unsigned IVTYPE
#define UVuf   "lu"
#define UVxf   "lx"
#define UVXf   "lX"
#define vload_module (   a,
  b,
  c,
  d 
)    DPPP_(my_vload_module)(aTHX_ a,b,c,d)
#define WARN_ALL   0
#define WARN_AMBIGUOUS   29
#define WARN_ASSERTIONS   46
#define WARN_BAREWORD   30
#define WARN_CLOSED   6
#define WARN_CLOSURE   1
#define WARN_DEBUGGING   22
#define WARN_DEPRECATED   2
#define WARN_DIGIT   31
#define WARN_EXEC   7
#define WARN_EXITING   3
#define WARN_GLOB   4
#define WARN_INPLACE   23
#define WARN_INTERNAL   24
#define WARN_IO   5
#define WARN_LAYER   8
#define WARN_MALLOC   25
#define WARN_MISC   12
#define WARN_NEWLINE   9
#define WARN_NUMERIC   13
#define WARN_ONCE   14
#define WARN_OVERFLOW   15
#define WARN_PACK   16
#define WARN_PARENTHESIS   32
#define WARN_PIPE   10
#define WARN_PORTABLE   17
#define WARN_PRECEDENCE   33
#define WARN_PRINTF   34
#define WARN_PROTOTYPE   35
#define WARN_QW   36
#define WARN_RECURSION   18
#define WARN_REDEFINE   19
#define WARN_REGEXP   20
#define WARN_RESERVED   37
#define WARN_SEMICOLON   38
#define WARN_SEVERE   21
#define WARN_SIGNAL   26
#define WARN_SUBSTR   27
#define WARN_SYNTAX   28
#define WARN_TAINT   39
#define WARN_THREADS   40
#define WARN_UNINITIALIZED   41
#define WARN_UNOPENED   11
#define WARN_UNPACK   42
#define WARN_UNTIE   43
#define WARN_UTF8   44
#define WARN_VOID   45
#define WIDEST_UTYPE   U32
#define XPUSHmortal   XPUSHs(sv_newmortal())
#define XPUSHu (   u)    STMT_START { sv_setuv(TARG, (UV)(u)); XPUSHTARG; } STMT_END
#define XSprePUSH   (sp = PL_stack_base + ax - 1)
#define XSPROTO (   name)    void name(pTHX_ CV* cv)
#define XSRETURN (   off)
Value:
PL_stack_sp = PL_stack_base + ax + ((off) - 1); \
return; \
#define PL_stack_sp
Definition: ppport.h:855
#define PL_stack_base
Definition: ppport.h:854
#define STMT_END
Definition: ppport.h:617
#define STMT_START
Definition: ppport.h:616
#define XSRETURN_UV (   v)    STMT_START { XST_mUV(0,v); XSRETURN(1); } STMT_END
#define XST_mUV (   i,
  v 
)    (ST(i) = sv_2mortal(newSVuv(v)) )
#define ZeroD (   d,
  n,
  t 
)    ((void)memzero((char*)(d), (n) * sizeof(t)), d)

Typedef Documentation

typedef NVTYPE NV
typedef OP* CPERLscope Perl_check_t(pTHX_ OP *)
typedef OP* CPERLscope Perl_ppaddr_t(pTHX)

Function Documentation

U32 DPPP_ ( my_PL_signals  )
SV* DPPP_() my_eval_pv ( char *  p,
I32  croak_on_error 
)
UV DPPP_() my_grok_bin ( pTHX_ const char *  start,
STRLEN *  len_p,
I32 *  flags,
NV result 
)
UV DPPP_() my_grok_hex ( pTHX_ const char *  start,
STRLEN *  len_p,
I32 *  flags,
NV result 
)
int DPPP_() my_grok_number ( pTHX_ const char *  pv,
STRLEN  len,
UV *  valuep 
)
bool DPPP_() my_grok_numeric_radix ( pTHX_ const char **  sp,
const char *  send 
)
UV DPPP_() my_grok_oct ( pTHX_ const char *  start,
STRLEN *  len_p,
I32 *  flags,
NV result 
)
void DPPP_() my_load_module ( U32  flags,
SV *  name,
SV *  ver,
  ... 
)
MAGIC* DPPP_() my_mg_findext ( SV *  sv,
int  type,
const MGVTBL *  vtbl 
)
int DPPP_() my_my_snprintf ( char *  buffer,
const Size_t  len,
const char *  format,
  ... 
)
int DPPP_() my_my_sprintf ( char *  buffer,
const char *  pat,
  ... 
)
Size_t DPPP_() my_my_strlcat ( char *  dst,
const char *  src,
Size_t  size 
)
Size_t DPPP_() my_my_strlcpy ( char *  dst,
const char *  src,
Size_t  size 
)
void DPPP_() my_newCONSTSUB ( HV *  stash,
const char *  name,
SV *  sv 
)
SV* DPPP_() my_newRV_noinc ( SV *  sv)
SV* DPPP_() my_newSV_type ( pTHX_ svtype const  t)
SV* DPPP_() my_newSVpvn_flags ( pTHX_ const char *  s,
STRLEN  len,
U32  flags 
)
SV* DPPP_() my_newSVpvn_share ( pTHX_ const char *  src,
I32  len,
U32  hash 
)
char* DPPP_() my_pv_display ( pTHX_ SV *  dsv,
const char *  pv,
STRLEN  cur,
STRLEN  len,
STRLEN  pvlim 
)
char* DPPP_() my_pv_escape ( pTHX_ SV *  dsv,
char const *const  str,
const STRLEN  count,
const STRLEN  max,
STRLEN *const  escaped,
const U32  flags 
)
char* DPPP_() my_pv_pretty ( pTHX_ SV *  dsv,
char const *const  str,
const STRLEN  count,
const STRLEN  max,
char const *const  start_color,
char const *const  end_color,
const U32  flags 
)
char* DPPP_() my_sv_2pv_flags ( pTHX_ SV *  sv,
STRLEN *  lp,
I32  flags 
)
char* DPPP_() my_sv_pvn_force_flags ( pTHX_ SV *  sv,
STRLEN *  lp,
I32  flags 
)
int DPPP_() my_sv_unmagicext ( pTHX_ SV *const  sv,
const int  type,
MGVTBL *  vtbl 
)
void DPPP_() my_vload_module ( U32  flags,
SV *  name,
SV *  ver,
va_list *  args 
)