From: Nicholas Clark Date: Tue, 13 Dec 2005 20:05:31 +0000 (+0000) Subject: Update embed.fnc and headers after change 26345 (spotted by Rafael) X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d870712163dce2ef7e0a77999cef2ce40ff04bde;p=p5sagit%2Fp5-mst-13.2.git Update embed.fnc and headers after change 26345 (spotted by Rafael) p4raw-id: //depot/perl@26346 --- diff --git a/embed.fnc b/embed.fnc index 0f5d8b9..9322526 100644 --- a/embed.fnc +++ b/embed.fnc @@ -1288,8 +1288,6 @@ po |void |sv_add_backref |NN SV *tsv|NN SV *sv #if defined(PERL_IN_SV_C) || defined(PERL_DECL_PROT) nsR |char * |uiv_2buf |NN char *buf|IV iv|UV uv|int is_uv|NN char **peob -sR |IV |asIV |NN SV* sv -sR |UV |asUV |NN SV* sv s |void |sv_unglob |NN SV* sv s |void |not_a_number |NN SV *sv s |I32 |visit |NN SVFUNC_t f|U32 flags|U32 mask diff --git a/embed.h b/embed.h index 32fa5b6..9707ec2 100644 --- a/embed.h +++ b/embed.h @@ -1317,8 +1317,6 @@ #if defined(PERL_IN_SV_C) || defined(PERL_DECL_PROT) #ifdef PERL_CORE #define uiv_2buf S_uiv_2buf -#define asIV S_asIV -#define asUV S_asUV #define sv_unglob S_sv_unglob #define not_a_number S_not_a_number #define visit S_visit @@ -3330,8 +3328,6 @@ #if defined(PERL_IN_SV_C) || defined(PERL_DECL_PROT) #ifdef PERL_CORE #define uiv_2buf S_uiv_2buf -#define asIV(a) S_asIV(aTHX_ a) -#define asUV(a) S_asUV(aTHX_ a) #define sv_unglob(a) S_sv_unglob(aTHX_ a) #define not_a_number(a) S_not_a_number(aTHX_ a) #define visit(a,b,c) S_visit(aTHX_ a,b,c) diff --git a/proto.h b/proto.h index a47102f..b5dfd5b 100644 --- a/proto.h +++ b/proto.h @@ -3590,14 +3590,6 @@ STATIC char * S_uiv_2buf(char *buf, IV iv, UV uv, int is_uv, char **peob) __attribute__nonnull__(1) __attribute__nonnull__(5); -STATIC IV S_asIV(pTHX_ SV* sv) - __attribute__warn_unused_result__ - __attribute__nonnull__(pTHX_1); - -STATIC UV S_asUV(pTHX_ SV* sv) - __attribute__warn_unused_result__ - __attribute__nonnull__(pTHX_1); - STATIC void S_sv_unglob(pTHX_ SV* sv) __attribute__nonnull__(pTHX_1);