summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-11-18 16:33:58 -0800
committerFather Chrysostomos <sprout@cpan.org>2011-11-18 17:46:22 -0800
commit107c452c64d52e8f29626debd8bdd4c5bc9a0e47 (patch)
tree55f8026e309d1bf96c772ca4c0b3d3b4717c3f93 /util.c
parentfce59cd44e0183e8fdb037f8c269f9a15e6cf2f7 (diff)
downloadperl-107c452c64d52e8f29626debd8bdd4c5bc9a0e47.tar.gz
util.c:get_db_sub: correct comment
This comment was copied from pp_goto by commit 005a8a35, but was not adjusted to make sense in its new surroundings.
Diffstat (limited to 'util.c')
-rw-r--r--util.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/util.c b/util.c
index 1e3eea1193..aa2ae55709 100644
--- a/util.c
+++ b/util.c
@@ -6543,7 +6543,8 @@ Perl_get_db_sub(pTHX_ SV **svp, CV *cv)
SV * const dbsv = GvSVn(PL_DBsub);
const bool save_taint = PL_tainted;
- /* We do not care about using sv to call CV;
+ /* When we are called from pp_goto (svp is null),
+ * we do not care about using dbsv to call CV;
* it's for informational purposes only.
*/