diff options
| author | Karl Williamson <khw@cpan.org> | 2023-02-22 15:35:38 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2023-03-01 16:59:36 -0700 |
| commit | 596a08d178db0b06f82e95e5389e608471599103 (patch) | |
| tree | 15b6035d53da95335d00cb000493debee9135c94 /ext | |
| parent | a769d3e640ceecd7ce719115d3f36d2194247282 (diff) | |
| download | perl-596a08d178db0b06f82e95e5389e608471599103.tar.gz | |
POSIX.xs: Silence compiler warning
This happens only in the unlikely event that localeconv() isn't present
on the system.
There are two ways used in this file to announce the lack of system.
This commit converts to the other way than previously, and the warning
goes away.
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/POSIX/POSIX.xs | 7 | ||||
| -rw-r--r-- | ext/POSIX/lib/POSIX.pm | 2 |
2 files changed, 3 insertions, 6 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index ec409c06fd..4e4fae6286 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -1560,10 +1560,6 @@ END_EXTERN_C #endif #endif -#if ! defined(HAS_LOCALECONV) && ! defined(HAS_LOCALECONV_L) -# define localeconv() not_here("localeconv") -#endif /* HAS_LOCALECONV */ - #ifdef HAS_LONG_DOUBLE # if LONG_DOUBLESIZE > NVSIZE # undef HAS_LONG_DOUBLE /* XXX until we figure out how to use them */ @@ -2062,7 +2058,8 @@ HV * localeconv() CODE: #ifndef HAS_LOCALECONV - localeconv(); /* A stub to call not_here(). */ + RETVAL = NULL; + not_here("localeconv"); #else RETVAL = Perl_localeconv(aTHX); #endif /* HAS_LOCALECONV */ diff --git a/ext/POSIX/lib/POSIX.pm b/ext/POSIX/lib/POSIX.pm index 5f56575ca6..a6a32ede94 100644 --- a/ext/POSIX/lib/POSIX.pm +++ b/ext/POSIX/lib/POSIX.pm @@ -4,7 +4,7 @@ use warnings; our ($AUTOLOAD, %SIGRT); -our $VERSION = '2.11'; +our $VERSION = '2.12'; require XSLoader; |