summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-01-01 22:20:25 -0700
committerKarl Williamson <khw@cpan.org>2018-01-30 22:27:25 -0700
commit950cd4eeed2e6f1366eb4ae4e04d24454770c1cd (patch)
tree5336b3665a625047337cab0cf94178f595edc3cc /perl.h
parentec0202b5de92f2f272f9a8965acd31203389ce43 (diff)
downloadperl-950cd4eeed2e6f1366eb4ae4e04d24454770c1cd.tar.gz
perl.h: White-space only
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h10
1 files changed, 5 insertions, 5 deletions
diff --git a/perl.h b/perl.h
index ef5923363d..097a9701b2 100644
--- a/perl.h
+++ b/perl.h
@@ -5767,7 +5767,7 @@ expression, but with an empty argument list, like this:
* contrary be noops, in the dynamic scope by setting PL_numeric_standard to 2.
* */
# define _NOT_IN_NUMERIC_UNDERLYING \
- (! PL_numeric_underlying && PL_numeric_standard < 2)
+ (! PL_numeric_underlying && PL_numeric_standard < 2)
# define DECLARATION_FOR_LC_NUMERIC_MANIPULATION \
void (*_restore_LC_NUMERIC_function)(pTHX) = NULL
@@ -5805,21 +5805,21 @@ expression, but with an empty argument list, like this:
/* The rest of these LC_NUMERIC macros toggle to one or the other state, with
* the RESTORE_foo ones called to switch back, but only if need be */
# define STORE_LC_NUMERIC_UNDERLYING_SET_STANDARD() \
- bool _was_underlying = _NOT_IN_NUMERIC_STANDARD; \
+ bool _was_underlying = _NOT_IN_NUMERIC_STANDARD; \
if (_was_underlying) Perl_set_numeric_standard(aTHX);
/* Doesn't change to underlying locale unless within the scope of some form of
* 'use locale'. This is the usual desired behavior. */
-# define STORE_LC_NUMERIC_STANDARD_SET_UNDERLYING() \
+# define STORE_LC_NUMERIC_STANDARD_SET_UNDERLYING() \
bool _was_standard = _NOT_IN_NUMERIC_UNDERLYING \
&& IN_LC(LC_NUMERIC); \
if (_was_standard) Perl_set_numeric_underlying(aTHX);
/* Rarely, we want to change to the underlying locale even outside of 'use
* locale'. This is principally in the POSIX:: functions */
-# define STORE_LC_NUMERIC_FORCE_TO_UNDERLYING() \
+# define STORE_LC_NUMERIC_FORCE_TO_UNDERLYING() \
if (_NOT_IN_NUMERIC_UNDERLYING) { \
- Perl_set_numeric_underlying(aTHX); \
+ Perl_set_numeric_underlying(aTHX); \
_restore_LC_NUMERIC_function = &Perl_set_numeric_standard; \
}