X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embed.h;h=42ca535100b7d7fe71feadac505e35a0554f073c;hb=918426be7f3660c63cebe082bf8eac82a38bf756;hp=9a8e442fb3da87bd17ed0a4d0b570899e5cabd6d;hpb=3e2f796abf3f79e1ab191424e6c63f33a4ee4497;p=p5sagit%2Fp5-mst-13.2.git diff --git a/embed.h b/embed.h index 9a8e442..42ca535 100644 --- a/embed.h +++ b/embed.h @@ -698,6 +698,7 @@ #define sv_setuv Perl_sv_setuv #define sv_setnv Perl_sv_setnv #define sv_setref_iv Perl_sv_setref_iv +#define sv_setref_uv Perl_sv_setref_uv #define sv_setref_nv Perl_sv_setref_nv #define sv_setref_pv Perl_sv_setref_pv #define sv_setref_pvn Perl_sv_setref_pvn @@ -1163,9 +1164,6 @@ # if defined(LEAKTEST) #define xstat S_xstat # endif -# if defined(EBCDIC) -#define ebcdic_control Perl_ebcdic_control -# endif #endif #if defined(PERL_OBJECT) #endif @@ -2186,6 +2184,7 @@ #define sv_setuv(a,b) Perl_sv_setuv(aTHX_ a,b) #define sv_setnv(a,b) Perl_sv_setnv(aTHX_ a,b) #define sv_setref_iv(a,b,c) Perl_sv_setref_iv(aTHX_ a,b,c) +#define sv_setref_uv(a,b,c) Perl_sv_setref_uv(aTHX_ a,b,c) #define sv_setref_nv(a,b,c) Perl_sv_setref_nv(aTHX_ a,b,c) #define sv_setref_pv(a,b,c) Perl_sv_setref_pv(aTHX_ a,b,c) #define sv_setref_pvn(a,b,c,d) Perl_sv_setref_pvn(aTHX_ a,b,c,d) @@ -2644,9 +2643,6 @@ # if defined(LEAKTEST) #define xstat(a) S_xstat(aTHX_ a) # endif -# if defined(EBCDIC) -#define ebcdic_control(a) Perl_ebcdic_control(aTHX_ a) -# endif #endif #if defined(PERL_OBJECT) #endif @@ -4290,6 +4286,8 @@ #define sv_setnv Perl_sv_setnv #define Perl_sv_setref_iv CPerlObj::Perl_sv_setref_iv #define sv_setref_iv Perl_sv_setref_iv +#define Perl_sv_setref_uv CPerlObj::Perl_sv_setref_uv +#define sv_setref_uv Perl_sv_setref_uv #define Perl_sv_setref_nv CPerlObj::Perl_sv_setref_nv #define sv_setref_nv Perl_sv_setref_nv #define Perl_sv_setref_pv CPerlObj::Perl_sv_setref_pv @@ -5130,10 +5128,6 @@ #define S_xstat CPerlObj::S_xstat #define xstat S_xstat # endif -# if defined(EBCDIC) -#define Perl_ebcdic_control CPerlObj::Perl_ebcdic_control -#define ebcdic_control Perl_ebcdic_control -# endif #endif #if defined(PERL_OBJECT) #endif