diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-30 11:15:12 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-30 11:15:12 +0000 |
| commit | a453c1697467fe606ef79b5ab7a0eafaa8e78e7a (patch) | |
| tree | 861b2d7ac5de461c3c5bf8f31bd484b3001f083e /intrpvar.h | |
| parent | 6063ba187760a62f10a97ba9dd6ff5a93107bb51 (diff) | |
| download | perl-a453c1697467fe606ef79b5ab7a0eafaa8e78e7a.tar.gz | |
Change PL_numeric_radix to PL_numeric_radix_sv (and leave in
a dummy for PL_numeric_radix); no pressing reason to break
binary compatibility; regen API.
p4raw-id: //depot/perl@9910
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/intrpvar.h b/intrpvar.h index 8ecd10ffed..d2f8e73c2b 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -362,9 +362,9 @@ PERLVARI(Inumeric_standard, bool, TRUE) /* Assume simple numerics */ PERLVARI(Inumeric_local, bool, TRUE) /* Assume local numerics */ -PERLVAR(Inumeric_radix, SV *) - /* The radix separator if not '.' */ +PERLVAR(Inumeric_compat1, char) + /* Used to be numeric_radix */ #endif /* !USE_LOCALE_NUMERIC */ /* utf8 character classes */ @@ -464,9 +464,16 @@ PERLVAR(Ixpvlv_arenaroot,XPVLV*) /* list of allocated xpvlv areas */ PERLVAR(Ixpvbm_arenaroot,XPVBM*) /* list of allocated xpvbm areas */ PERLVAR(Ihe_arenaroot, XPV*) /* list of allocated he areas */ + /* 5.6.0 stopped here */ + PERLVAR(Ipsig_pend, int *) /* per-signal "count" of pending */ PERLVARI(Isig_pending, int,0) /* Number if highest signal pending */ +#ifdef USE_LOCALE_NUMERIC + +PERLVAR(Inumeric_radix_sv, SV *) /* The radix separator if not '.' */ + +#endif /* New variables must be added to the very end for binary compatibility. * XSUB.h provides wrapper functions via perlapi.h that make this |