summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2007-05-24 08:25:43 -0500
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-05-25 07:46:08 +0000
commit61f9802b72e0698621aaf73d88595b3d5d85df0a (patch)
tree56699be942b4fd1f511550b68595c2eb94e2d5ce /doop.c
parent4440d13a03087bebaa0394cf532fe7ebcda34a06 (diff)
downloadperl-61f9802b72e0698621aaf73d88595b3d5d85df0a.tar.gz
Consting dump.c
Message-Id: <B46A083E-A133-4D38-9BE8-BE1EB0AAA326@petdance.com> p4raw-id: //depot/perl@31270
Diffstat (limited to 'doop.c')
-rw-r--r--doop.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/doop.c b/doop.c
index dc525d356f..6ae9239f6b 100644
--- a/doop.c
+++ b/doop.c
@@ -746,7 +746,7 @@ Perl_do_vecget(pTHX_ SV *sv, I32 offset, I32 size)
UV retnum = 0;
if (offset < 0)
- return retnum;
+ return 0;
if (size < 1 || (size & (size-1))) /* size < 1 or not a power of two */
Perl_croak(aTHX_ "Illegal number of bits in vec");