diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-07-18 13:35:33 +0200 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-07-18 13:39:59 +0200 |
| commit | f8115845454eee301b4615a45e01bf1bc6b816d4 (patch) | |
| tree | a7c32283cfe926bc1d0fb0513e525ce3d1ef56c5 | |
| parent | 9168ed13c3995a6f331c932c952ea164026411f0 (diff) | |
| download | perl-f8115845454eee301b4615a45e01bf1bc6b816d4.tar.gz | |
In intrpvar.h, move all the USE_LOCALE_NUMERIC variables together.
a453c1697467fe60 added PL_numeric_radix_sv at the end of the interpreter struct
to avoid breaking binary compatibility. However, as we now explicitly no longer
guarantee compatibility across major releases, there's no reason not to move it
next to the other variables related to it.
| -rw-r--r-- | intrpvar.h | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/intrpvar.h b/intrpvar.h index b2d4d5c222..4a6122faa1 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -565,6 +565,8 @@ PERLVARI(Inumeric_standard, bool, TRUE) PERLVARI(Inumeric_local, bool, TRUE) /* Assume local numerics */ PERLVAR(Inumeric_name, char *) /* Name of current numeric locale */ +PERLVAR(Inumeric_radix_sv, SV *) /* The radix separator if not '.' */ + #endif /* !USE_LOCALE_NUMERIC */ /* utf8 character classes */ @@ -641,12 +643,6 @@ PERLVARI(Ibeginav_save, AV*, NULL) /* save BEGIN{}s when compiling */ PERLVAR(Ibody_arenas, void*) /* pointer to list of body-arenas */ -#ifdef USE_LOCALE_NUMERIC - -PERLVAR(Inumeric_radix_sv, SV *) /* The radix separator if not '.' */ - -#endif - #if defined(USE_ITHREADS) PERLVAR(Iregex_pad, SV**) /* Shortcut into the array of regex_padav */ |