diff options
author | Karl Williamson <khw@cpan.org> | 2020-07-25 08:43:12 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-08-01 11:49:16 -0600 |
commit | ad9dfdb7a438018fb4b5978c20714c0e11bb3def (patch) | |
tree | aa2ac4fb2a5b765701f71da9d32ba0259fffcb9b /util.c | |
parent | 81065b6d2469601eda1aea8ff74afa1ebe944a67 (diff) | |
download | perl-ad9dfdb7a438018fb4b5978c20714c0e11bb3def.tar.gz |
util.c: Reorder two functions
This will make some future commits a little less noisy
Diffstat (limited to 'util.c')
-rw-r--r-- | util.c | 14 |
1 files changed, 7 insertions, 7 deletions
@@ -572,20 +572,20 @@ S_delimcpy_intern(char *to, const char *toend, const char *from, } char * -Perl_delimcpy(char *to, const char *toend, const char *from, const char *fromend, int delim, I32 *retlen) +Perl_delimcpy_no_escape(char *to, const char *toend, const char *from, + const char *fromend, int delim, I32 *retlen) { - PERL_ARGS_ASSERT_DELIMCPY; + PERL_ARGS_ASSERT_DELIMCPY_NO_ESCAPE; - return S_delimcpy_intern(to, toend, from, fromend, delim, retlen, 1); + return S_delimcpy_intern(to, toend, from, fromend, delim, retlen, 0); } char * -Perl_delimcpy_no_escape(char *to, const char *toend, const char *from, - const char *fromend, int delim, I32 *retlen) +Perl_delimcpy(char *to, const char *toend, const char *from, const char *fromend, int delim, I32 *retlen) { - PERL_ARGS_ASSERT_DELIMCPY_NO_ESCAPE; + PERL_ARGS_ASSERT_DELIMCPY; - return S_delimcpy_intern(to, toend, from, fromend, delim, retlen, 0); + return S_delimcpy_intern(to, toend, from, fromend, delim, retlen, 1); } /* |