diff options
| -rw-r--r-- | embed.fnc | 2 | ||||
| -rw-r--r-- | embed.h | 2 | ||||
| -rw-r--r-- | ext/DynaLoader/DynaLoader_pm.PL | 2 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_aix.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_dllload.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_dlopen.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_dyld.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_freemint.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_hpux.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_none.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_symbian.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_vms.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_win32.xs | 1 | ||||
| -rw-r--r-- | ext/DynaLoader/dlutils.c | 1 | ||||
| -rw-r--r-- | ext/XS-APItest/APItest.xs | 4 | ||||
| -rw-r--r-- | numeric.c | 3 |
16 files changed, 19 insertions, 5 deletions
@@ -818,7 +818,7 @@ Apd |int |grok_number |NN const char *pv|STRLEN len|NULLOK UV *valuep Apd |int |grok_number_flags|NN const char *pv|STRLEN len|NULLOK UV *valuep|U32 flags ApdR |bool |grok_numeric_radix|NN const char **sp|NN const char *send Apd |UV |grok_oct |NN const char* start|NN STRLEN* len_p|NN I32* flags|NULLOK NV *result -Apdn |bool |grok_atoUV |NN const char* pv|NN UV* valptr|NULLOK const char** endptr +EXpn |bool |grok_atoUV |NN const char* pv|NN UV* valptr|NULLOK const char** endptr : These are all indirectly referenced by globals.c. This is somewhat annoying. p |int |magic_clearenv |NN SV* sv|NN MAGIC* mg p |int |magic_clear_all_env|NN SV* sv|NN MAGIC* mg @@ -178,7 +178,6 @@ #define getcwd_sv(a) Perl_getcwd_sv(aTHX_ a) #define gp_free(a) Perl_gp_free(aTHX_ a) #define gp_ref(a) Perl_gp_ref(aTHX_ a) -#define grok_atoUV Perl_grok_atoUV #define grok_bin(a,b,c,d) Perl_grok_bin(aTHX_ a,b,c,d) #define grok_hex(a,b,c,d) Perl_grok_hex(aTHX_ a,b,c,d) #define grok_infnan(a,b) Perl_grok_infnan(aTHX_ a,b) @@ -901,6 +900,7 @@ #define av_reify(a) Perl_av_reify(aTHX_ a) #define current_re_engine() Perl_current_re_engine(aTHX) #define cv_ckproto_len_flags(a,b,c,d,e) Perl_cv_ckproto_len_flags(aTHX_ a,b,c,d,e) +#define grok_atoUV Perl_grok_atoUV #define mg_find_mglob(a) Perl_mg_find_mglob(aTHX_ a) #define multideref_stringify(a,b) Perl_multideref_stringify(aTHX_ a,b) #define op_clear(a) Perl_op_clear(aTHX_ a) diff --git a/ext/DynaLoader/DynaLoader_pm.PL b/ext/DynaLoader/DynaLoader_pm.PL index c59dd5a57c..45dd6d30e9 100644 --- a/ext/DynaLoader/DynaLoader_pm.PL +++ b/ext/DynaLoader/DynaLoader_pm.PL @@ -85,7 +85,7 @@ package DynaLoader; # Tim.Bunce@ig.co.uk, August 1994 BEGIN { - $VERSION = '1.31'; + $VERSION = '1.32'; } use Config; diff --git a/ext/DynaLoader/dl_aix.xs b/ext/DynaLoader/dl_aix.xs index dc20b74256..137af19d4d 100644 --- a/ext/DynaLoader/dl_aix.xs +++ b/ext/DynaLoader/dl_aix.xs @@ -12,6 +12,7 @@ */ #define PERLIO_NOT_STDIO 0 +#define PERL_EXT /* * On AIX 4.3 and above the emulation layer is not needed any more, and diff --git a/ext/DynaLoader/dl_dllload.xs b/ext/DynaLoader/dl_dllload.xs index 1f99b61247..aac2f7bd76 100644 --- a/ext/DynaLoader/dl_dllload.xs +++ b/ext/DynaLoader/dl_dllload.xs @@ -84,6 +84,7 @@ Other comments within the dl_dlopen.xs file may be helpful as well. */ +#define PERL_EXT #include "EXTERN.h" #include "perl.h" #include "XSUB.h" diff --git a/ext/DynaLoader/dl_dlopen.xs b/ext/DynaLoader/dl_dlopen.xs index c3df9eacf9..3dce1ef844 100644 --- a/ext/DynaLoader/dl_dlopen.xs +++ b/ext/DynaLoader/dl_dlopen.xs @@ -117,6 +117,7 @@ */ #define PERL_NO_GET_CONTEXT +#define PERL_EXT #include "EXTERN.h" #define PERL_IN_DL_DLOPEN_XS diff --git a/ext/DynaLoader/dl_dyld.xs b/ext/DynaLoader/dl_dyld.xs index 3027ddae9a..7822878518 100644 --- a/ext/DynaLoader/dl_dyld.xs +++ b/ext/DynaLoader/dl_dyld.xs @@ -39,6 +39,7 @@ been tested on NeXT platforms. */ +#define PERL_EXT #include "EXTERN.h" #include "perl.h" #include "XSUB.h" diff --git a/ext/DynaLoader/dl_freemint.xs b/ext/DynaLoader/dl_freemint.xs index 0bf620ed5d..9ecafa03c7 100644 --- a/ext/DynaLoader/dl_freemint.xs +++ b/ext/DynaLoader/dl_freemint.xs @@ -37,6 +37,7 @@ * */ +#define PERL_EXT #include "EXTERN.h" #include "perl.h" #include "XSUB.h" diff --git a/ext/DynaLoader/dl_hpux.xs b/ext/DynaLoader/dl_hpux.xs index 70bedb80cf..0ed0173e82 100644 --- a/ext/DynaLoader/dl_hpux.xs +++ b/ext/DynaLoader/dl_hpux.xs @@ -22,6 +22,7 @@ #undef MAGIC #endif +#define PERL_EXT #include "EXTERN.h" #define PERL_IN_DL_HPUX_XS #include "perl.h" diff --git a/ext/DynaLoader/dl_none.xs b/ext/DynaLoader/dl_none.xs index 5a193e4346..29141775b0 100644 --- a/ext/DynaLoader/dl_none.xs +++ b/ext/DynaLoader/dl_none.xs @@ -3,6 +3,7 @@ * Stubs for platforms that do not support dynamic linking */ +#define PERL_EXT #include "EXTERN.h" #include "perl.h" #include "XSUB.h" diff --git a/ext/DynaLoader/dl_symbian.xs b/ext/DynaLoader/dl_symbian.xs index c17f397487..562b034c04 100644 --- a/ext/DynaLoader/dl_symbian.xs +++ b/ext/DynaLoader/dl_symbian.xs @@ -26,6 +26,7 @@ * trouble because of Symbian's New(), Copy(), etc definitions. */ #define DL_SYMBIAN_XS +#define PERL_EXT #include "EXTERN.h" #include "perl.h" diff --git a/ext/DynaLoader/dl_vms.xs b/ext/DynaLoader/dl_vms.xs index 576b08a9f8..ca8d54f6d2 100644 --- a/ext/DynaLoader/dl_vms.xs +++ b/ext/DynaLoader/dl_vms.xs @@ -45,6 +45,7 @@ * */ +#define PERL_EXT #include "EXTERN.h" #include "perl.h" #include "XSUB.h" diff --git a/ext/DynaLoader/dl_win32.xs b/ext/DynaLoader/dl_win32.xs index d99f11615f..605b63fda3 100644 --- a/ext/DynaLoader/dl_win32.xs +++ b/ext/DynaLoader/dl_win32.xs @@ -25,6 +25,7 @@ calls. #include <string.h> #define PERL_NO_GET_CONTEXT +#define PERL_EXT #include "EXTERN.h" #include "perl.h" diff --git a/ext/DynaLoader/dlutils.c b/ext/DynaLoader/dlutils.c index fca8e787eb..557c0ec1db 100644 --- a/ext/DynaLoader/dlutils.c +++ b/ext/DynaLoader/dlutils.c @@ -10,6 +10,7 @@ #define PERL_EUPXS_ALWAYS_EXPORT #ifndef START_MY_CXT /* Some IDEs try compiling this standalone. */ +# define PERL_EXT # include "EXTERN.h" # include "perl.h" # include "XSUB.h" diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs index 2b7b3490c3..c3f88b4bb9 100644 --- a/ext/XS-APItest/APItest.xs +++ b/ext/XS-APItest/APItest.xs @@ -1,4 +1,8 @@ #define PERL_IN_XS_APITEST + +/* We want to be able to test things that aren't API yet. */ +#define PERL_EXT + #include "EXTERN.h" #include "perl.h" #include "XSUB.h" @@ -1033,7 +1033,7 @@ Perl_grok_number_flags(pTHX_ const char *pv, STRLEN len, UV *valuep, U32 flags) } /* -=for apidoc grok_atoUV +grok_atoUV grok_atoUV parses a C-style zero-byte terminated string, looking for a decimal unsigned integer. @@ -1060,7 +1060,6 @@ used for incremental parsing, and therefore should be avoided atoi and strtol are also affected by locale settings, which can also be seen as a bug (global state controlled by user environment). -=cut */ bool |