summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2020-02-12 17:46:49 -0700
committerKarl Williamson <khw@cpan.org>2020-02-13 08:38:20 -0700
commit7373c61897c38d6fb9a69976fd6509bb3a0a2d9c (patch)
tree9eb8059629e1728d150219a29cf58e3bb043ab50
parent0491999d668c71dc1fd30a2af7991225c7ab3b7c (diff)
downloadperl-7373c61897c38d6fb9a69976fd6509bb3a0a2d9c.tar.gz
regcomp.c: Move comment
This comment had gotten moved away from where it is applicable.
-rw-r--r--regcomp.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/regcomp.c b/regcomp.c
index cd7484babb..d56848b95e 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -24066,6 +24066,7 @@ Perl_parse_uniprop_string(pTHX_
* but not yet used. */
save_item(PL_subname);
+ /* G_SCALAR guarantees a single return value */
(void) call_sv(user_sub_sv, G_EVAL|G_SCALAR);
SPAGAIN;
@@ -24093,7 +24094,7 @@ Perl_parse_uniprop_string(pTHX_
(void) POPs;
prop_definition = NULL;
}
- else { /* G_SCALAR guarantees a single return value */
+ else {
SV * contents = POPs;
/* The contents is supposed to be the expansion of the property