diff options
author | Karl Williamson <khw@cpan.org> | 2019-04-03 14:11:27 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-05-24 17:09:29 -0600 |
commit | 6aba5c5eec25a6294e01899eb55a31bf5b889900 (patch) | |
tree | d8359e69a631a55828026dbe6426a2f604ac3ad4 | |
parent | 72299e00ea670f308805c0327b3a5d0cfc2d4a62 (diff) | |
download | perl-6aba5c5eec25a6294e01899eb55a31bf5b889900.tar.gz |
locale.c: Add some comments
-rw-r--r-- | locale.c | 11 |
1 files changed, 7 insertions, 4 deletions
@@ -739,7 +739,7 @@ S_emulate_setlocale(const int category, # endif - } + } /* End of this being setlocale(LC_foo, NULL) */ /* Here, we are switching locales. */ @@ -855,7 +855,7 @@ S_emulate_setlocale(const int category, } } } - } + } /* End of this being setlocale(LC_foo, "") */ else if (strchr(locale, ';')) { /* LC_ALL may actually incude a conglomeration of various categories. @@ -952,7 +952,8 @@ S_emulate_setlocale(const int category, assert(category == LC_ALL); return do_setlocale_c(LC_ALL, NULL); - } + } /* End of this being setlocale(LC_ALL, + "LC_CTYPE=foo;LC_NUMERIC=bar;...") */ ready_to_set: ; @@ -1006,7 +1007,9 @@ S_emulate_setlocale(const int category, # endif - /* If we are switching to the LC_ALL C locale, it already exists. Use + /* If this call is to switch to the LC_ALL C locale, it already exists, and + * in fact, we already have switched to it (in preparation for what + * normally is to come). But since we're already there, continue to use * it instead of trying to create a new locale */ if (mask == LC_ALL_MASK && isNAME_C_OR_POSIX(locale)) { |