Permalink
Browse files

locale.c: Avoid some work

We've already worked out whether the decimal point is a dot or not.  We
can pass that information to the called routine so it doesn't have to
figure it out again.
  • Loading branch information...
khwilliamson committed Jan 2, 2018
1 parent ceed6c6 commit 9cc5600aeb8b4017256d3ad65c8a8d9777e3de5b
Showing with 1 addition and 1 deletion.
  1. +1 −1 locale.c
View
@@ -562,7 +562,7 @@ Perl_set_numeric_underlying(pTHX)
do_setlocale_c(LC_NUMERIC, PL_numeric_name);
PL_numeric_standard = PL_numeric_underlying_is_standard;
PL_numeric_underlying = TRUE;
set_numeric_radix(1);
set_numeric_radix(! PL_numeric_standard);
# ifdef DEBUGGING

0 comments on commit 9cc5600

Please sign in to comment.