diff options
author | Karl Williamson <public@khwilliamson.com> | 2013-12-11 16:54:49 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2014-01-04 13:33:03 -0700 |
commit | 87755cd9fa6144875541cb560b7f0487e52c8626 (patch) | |
tree | dfabc10c695005f549fa404c824364c68601853d /perl.h | |
parent | 3eab96cadf1e1423d9c6e7051d14906c9d419edb (diff) | |
download | perl-87755cd9fa6144875541cb560b7f0487e52c8626.tar.gz |
perl.h: Move some macro definitions
This places related definitions together in the file.
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -5212,12 +5212,6 @@ typedef struct am_table_short AMTS; #ifdef USE_LOCALE_NUMERIC -#define SET_NUMERIC_STANDARD() \ - set_numeric_standard(); - -#define SET_NUMERIC_LOCAL() \ - set_numeric_local(); - /* Returns non-zero If the plain locale pragma without a parameter is in effect */ #define IN_LOCALE_RUNTIME (CopHINTS_get(PL_curcop) & HINT_LOCALE) @@ -5236,6 +5230,12 @@ typedef struct am_table_short AMTS; (IN_PERL_COMPILETIME ? IN_SOME_LOCALE_FORM_COMPILETIME \ : IN_SOME_LOCALE_FORM_RUNTIME) +#define SET_NUMERIC_STANDARD() \ + set_numeric_standard(); + +#define SET_NUMERIC_LOCAL() \ + set_numeric_local(); + #define STORE_NUMERIC_LOCAL_SET_STANDARD() \ bool was_local = PL_numeric_local && IN_LOCALE; \ if (was_local) SET_NUMERIC_STANDARD(); |