In metaconfig.git, the branch master has been updated
<http://perl5.git.perl.org/metaconfig.git/commitdiff/d0838744f03cfe7642950ea91dd48f575d0bfd15?hp=95e252bc504aeed3f6900fe0a93b3a0bbc61b93c>
- Log -----------------------------------------------------------------
commit d0838744f03cfe7642950ea91dd48f575d0bfd15
Author: Aaron Crane <a...@cpan.org>
Date: Tue May 31 19:42:50 2016 +0100
New probe for strerror_l()
Requested by Karl Williamson for Perl.
This function is specified by POSIX.1-2008 (and therefore by Single Unix):
http://pubs.opengroup.org/onlinepubs/9699919799/functions/strerror_l.html
A U/perl/d_strerror_l.U
commit 541f0dd272df4f9326996727898393ac8f6626f7
Author: Aaron Crane <a...@cpan.org>
Date: Fri Apr 22 18:01:19 2016 +0100
New probe for querylocale()
Requested by Karl Williamson for Perl.
This function is known to exist on FreeBSD and Mac OS, for example:
https://www.freebsd.org/cgi/man.cgi?query=querylocale
https://developer.apple.com/library/ios/documentation/System/Conceptual/ManPages_iPhoneOS/man3/querylocale.3.html
M U/perl/d_newlocale.U
-----------------------------------------------------------------------
Summary of changes:
U/perl/d_newlocale.U | 17 ++++++++++++++++-
U/perl/d_strerror_l.U | 23 +++++++++++++++++++++++
2 files changed, 39 insertions(+), 1 deletion(-)
create mode 100644 U/perl/d_strerror_l.U
diff --git a/U/perl/d_newlocale.U b/U/perl/d_newlocale.U
index 910f36d..b19de88 100644
--- a/U/perl/d_newlocale.U
+++ b/U/perl/d_newlocale.U
@@ -1,7 +1,7 @@
?RCS: You may distribute under the terms of either the GNU General Public
?RCS: License or the Artistic License, as specified in the README file.
?RCS:
-?MAKE:d_newlocale d_freelocale d_uselocale d_duplocale i_xlocale: Inlibc Inhdr
+?MAKE:d_newlocale d_freelocale d_uselocale d_duplocale d_querylocale
i_xlocale: Inlibc Inhdr
?MAKE: -pick add $@ %<
?S:d_newlocale:
?S: This variable conditionally defines the HAS_NEWLOCALE symbol, which
@@ -23,6 +23,11 @@
?S: indicates to the C program that the duplocale() routine is available
?S: to duplicate a locale object.
?S:.
+?S:d_querylocale:
+?S: This variable conditionally defines the HAS_QUERYLOCALE symbol, which
+?S: indicates to the C program that the querylocale() routine is available
+?S: to return the name of the locale for a category mask.
+?S:.
?S:i_xlocale:
?S: This symbol, if defined, indicates to the C program that it should
?S: include <xlocale.h> to get uselocale() and its friends
@@ -44,6 +49,10 @@
?C: This symbol, if defined, indicates that the duplocale routine is
?C: available to duplicate a locale object.
?C:.
+?C:HAS_QUERYLOCALE:
+?C: This symbol, if defined, indicates that the querylocale routine is
+?C: available to return the name of the locale for a category mask.
+?C:.
?C:I_XLOCALE:
?C: This symbol, if defined, indicates to the C program that it should
?C: include <xlocale.h> to get uselocale() and its friends.
@@ -52,6 +61,7 @@
?H:#$d_freelocale HAS_FREELOCALE /**/
?H:#$d_uselocale HAS_USELOCALE /**/
?H:#$d_duplocale HAS_DUPLOCALE /**/
+?H:#$d_querylocale HAS_QUERYLOCALE /**/
?H:#$i_xlocale I_XLOCALE /**/
?H:.
?LINT:set i_xlocale
@@ -59,6 +69,7 @@
?LINT:set d_freelocale
?LINT:set d_uselocale
?LINT:set d_duplocale
+?LINT:set d_querylocale
: see if this is an xlocale.h system
set xlocale.h i_xlocale
eval $inhdr
@@ -79,3 +90,7 @@ eval $inlibc
set duplocale d_duplocale
eval $inlibc
+: see if querylocale exists
+set querylocale d_querylocale
+eval $inlibc
+
diff --git a/U/perl/d_strerror_l.U b/U/perl/d_strerror_l.U
new file mode 100644
index 0000000..effb5ba
--- /dev/null
+++ b/U/perl/d_strerror_l.U
@@ -0,0 +1,23 @@
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:d_strerror_l: Inlibc
+?MAKE: -pick add $@ %<
+?S:d_strerror_l:
+?S: This variable conditionally defines the HAS_STRERROR_L symbol, which
+?S: indicates to the C program that the strerror_l() routine is available
+?S: to return the error message for a given errno value in a particular
+?S: locale (identified by a locale_t object).
+?S:.
+?C:HAS_STRERROR_L:
+?C: This symbol, if defined, indicates that the strerror_l routine is
+?C: available to return the error message for a given errno value in
+?C: a particular locale (identified by a locale_t object).
+?C:.
+?H:#$d_strerror_l HAS_STRERROR_L /**/
+?H:.
+?LINT:set d_strerror_l
+: see if strerror_l exists
+set strerror_l d_strerror_l
+eval $inlibc
+
--
perl5 metaconfig repository
