This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Assume <stdlib.h> exists when probing for setlocale()
authorAaron Crane <arc@cpan.org>
Thu, 25 Apr 2019 11:18:52 +0000 (12:18 +0100)
committerAaron Crane <arc@cpan.org>
Thu, 25 Apr 2019 11:32:01 +0000 (12:32 +0100)
We're on C89, after all :-)

U/perl/d_setlocale.U

index f312482..99f6f96 100644 (file)
@@ -7,7 +7,7 @@
 ?RCS: that same Artistic Licence; a copy of which may be found at the root
 ?RCS: of the source tree for dist 4.0.
 ?RCS:
-?MAKE:d_setlocale d_setlocale_accepts_any_locale_name d_has_C_UTF8: cat Compile run rm_try i_stdlib i_locale i_wctype d_towupper
+?MAKE:d_setlocale d_setlocale_accepts_any_locale_name d_has_C_UTF8: cat Compile run rm_try i_locale i_wctype d_towupper
 ?MAKE: -pick add $@ %<
 ?S:d_has_C_UTF8:
 ?S:    This variable is set to either "true" or "false" depending on
@@ -40,10 +40,7 @@ $cat <<EOM
 Checking to see if you have setlocale() and its behavior
 EOM
 $cat >try.c <<EOCP
-#$i_stdlib I_STDLIB
-#ifdef I_STDLIB
-#  include <stdlib.h>
-#endif
+#include <stdlib.h>
 #include <string.h>
 #$i_locale I_LOCALE
 #ifdef I_LOCALE