summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2020-07-25 08:43:12 -0600
committerKarl Williamson <khw@cpan.org>2020-08-01 11:49:16 -0600
commitad9dfdb7a438018fb4b5978c20714c0e11bb3def (patch)
treeaa2ac4fb2a5b765701f71da9d32ba0259fffcb9b /util.c
parent81065b6d2469601eda1aea8ff74afa1ebe944a67 (diff)
downloadperl-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.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/util.c b/util.c
index d0c639a01e..5cc53575eb 100644
--- a/util.c
+++ b/util.c
@@ -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);
}
/*