Better place for nop IN_LOCALE_NUMERIC, pointed out
Jarkko Hietaniemi [Tue, 26 Jun 2001 20:27:19 +0000 (20:27 +0000)]
by Olaf Flebbe.

p4raw-id: //depot/perl@10972

perl.h

diff --git a/perl.h b/perl.h
index f2f0eda..705df97 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3524,13 +3524,10 @@ typedef struct am_table_short AMTS;
 #define RESTORE_NUMERIC_LOCAL()                /**/
 #define RESTORE_NUMERIC_STANDARD()     /**/
 #define Atof                           Perl_atof
+#define IN_LOCALE_RUNTIME              0
 
 #endif /* !USE_LOCALE_NUMERIC */
 
-#ifdef PERL_MICRO
-#   define IN_LOCALE_RUNTIME 0
-#endif
-
 #if !defined(Strtol) && defined(USE_64_BIT_INT) && defined(IV_IS_QUAD) && QUADKIND == QUAD_IS_LONG_LONG
 #    ifdef __hpux
 #        define strtoll __strtoll      /* secret handshake */