summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-11-04 21:03:58 +0000
committerNicholas Clark <nick@ccl4.org>2005-11-04 21:03:58 +0000
commit0a2d26d92481df1892a243c1a740dcd2effde1fa (patch)
tree0b64fbdd2cb48e7e2c7279a08214f942193649d3 /sv.c
parent86c11942206ec09dd2a486bb22552aa2f170e322 (diff)
downloadperl-0a2d26d92481df1892a243c1a740dcd2effde1fa.tar.gz
You can't there from here. (Dead code in sv_2pv_flags)
p4raw-id: //depot/perl@26002
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index 19cb7b34e5..74092134b2 100644
--- a/sv.c
+++ b/sv.c
@@ -3252,7 +3252,9 @@ Perl_sv_2pv_flags(pTHX_ register SV *sv, STRLEN *lp, I32 flags)
STRLEN len;
const char *t;
+ assert (!tsv);
if (tsv) {
+ /* There is no code path that can get you here. */
sv_2mortal(tsv);
t = SvPVX_const(tsv);
len = SvCUR(tsv);