view release on metacpan or  search on metacpan

ppport.h  view on Meta::CPAN

#define newSVpvn(data, len) \
    ((data) ? ((len) ? newSVpv((data), (len)) : newSVpv("", 0)) : newSV(0))
#endif

/* Hint: gv_stashpvn
 * This function's backport doesn't support the length parameter, but
 * rather ignores it. Portability can only be ensured if the length
 * parameter is used for speed reasons, but the length can always be
 * correctly computed from the string argument.
 */
#ifndef gv_stashpvn
#define gv_stashpvn(str, len, create) gv_stashpv(str, create)
#endif

/* Replace: 1 */
#ifndef get_cv
#define get_cv perl_get_cv
#endif

#ifndef get_sv
#define get_sv perl_get_sv
#endif

#ifndef get_av
#define get_av perl_get_av
#endif

#ifndef get_hv
#define get_hv perl_get_hv
#endif

/* Replace: 0 */

#ifdef HAS_MEMCMP
#ifndef memNE
#define memNE(s1, s2, l) (memcmp(s1, s2, l))
#endif

#ifndef memEQ
#define memEQ(s1, s2, l) (!memcmp(s1, s2, l))
#endif

#else
#ifndef memNE
#define memNE(s1, s2, l) (bcmp(s1, s2, l))
#endif

#ifndef memEQ
#define memEQ(s1, s2, l) (!bcmp(s1, s2, l))
#endif

#endif
#ifndef MoveD
#define MoveD(s, d, n, t) memmove((char *)(d), (char *)(s), (n) * sizeof(t))
#endif

#ifndef CopyD
#define CopyD(s, d, n, t) memcpy((char *)(d), (char *)(s), (n) * sizeof(t))
#endif

#ifdef HAS_MEMSET
#ifndef ZeroD
#define ZeroD(d, n, t) memzero((char *)(d), (n) * sizeof(t))
#endif

#else
#ifndef ZeroD
#define ZeroD(d, n, t) ((void)memzero((char *)(d), (n) * sizeof(t)), d)
#endif

#endif
#ifndef Poison
#define Poison(d, n, t) (void)memset((char *)(d), 0xAB, (n) * sizeof(t))
#endif
#ifndef dUNDERBAR
#define dUNDERBAR dNOOP
#endif

#ifndef UNDERBAR
#define UNDERBAR DEFSV
#endif
#ifndef dAX
#define dAX I32 ax = MARK - PL_stack_base + 1
#endif

#ifndef dITEMS
#define dITEMS I32 items = SP - MARK
#endif
#ifndef dXSTARG
#define dXSTARG SV *targ = sv_newmortal()
#endif
#ifndef dTHR
#define dTHR dNOOP
#endif
#ifndef dTHX
#define dTHX dNOOP
#endif

#ifndef dTHXa
#define dTHXa(x) dNOOP
#endif
#ifndef pTHX
#define pTHX void
#endif

#ifndef pTHX_
#define pTHX_
#endif

#ifndef aTHX
#define aTHX
#endif

#ifndef aTHX_
#define aTHX_
#endif
#ifndef dTHXoa
#define dTHXoa(x) dTHXa(x)
#endif
#ifndef PUSHmortal
#define PUSHmortal PUSHs(sv_newmortal())