X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=xsh%2Futil.h;fp=xsh%2Futil.h;h=500472364a3545615e9b38ecd5781d318a1ce177;hb=00aa7ca18fae4f70a0d6484539d9270780d83371;hp=2e4009212e9567eee0e31b3110bf64efeffb35e6;hpb=bed9ac0713800543385ae073d3c046fb3390190a;p=perl%2Fmodules%2FScope-Upper.git diff --git a/xsh/util.h b/xsh/util.h index 2e40092..5004723 100644 --- a/xsh/util.h +++ b/xsh/util.h @@ -28,13 +28,6 @@ # define XSH_ASSERT(C) #endif -#undef VOID2 -#ifdef __cplusplus -# define VOID2(T, P) static_cast(P) -#else -# define VOID2(T, P) (P) -#endif - #ifndef STMT_START # define STMT_START do #endif @@ -66,19 +59,6 @@ #define xsh_dup(S, P) sv_dup((S), (P)) #define xsh_dup_inc(S, P) SvREFCNT_inc(xsh_dup((S), (P))) -/* Context for PerlMemShared_*() functions */ -#ifdef PERL_IMPLICIT_SYS -# define pPMS pTHX -# define pPMS_ pTHX_ -# define aPMS aTHX -# define aPMS_ aTHX_ -#else -# define pPMS void -# define pPMS_ -# define aPMS -# define aPMS_ -#endif - #ifdef USE_ITHREADS # define XSH_LOCK(M) MUTEX_LOCK(M) # define XSH_UNLOCK(M) MUTEX_UNLOCK(M)