summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorSimon Glover <scog@roe.ac.uk>2002-02-26 17:56:42 +0000
committerAbhijit Menon-Sen <ams@wiw.org>2002-02-26 23:51:52 +0000
commited9aa3b75c508a7baf4c55afe519cd2c35782757 (patch)
tree815457357767df3e73113972fae24246f2ba7477 /doop.c
parent3ca925874f58afe830847e3aaacb8dbda2bdcc03 (diff)
downloadperl-ed9aa3b75c508a7baf4c55afe519cd2c35782757.tar.gz
Subject: Missing diagnostics
Date: Tue, 26 Feb 2002 17:56:42 +0000 (BST) Message-Id: <Pine.GSO.4.10.10202261754170.23317-100000@muinntiarach.roe.ac.uk> Subject: [PATCH] Better wording for the lvalue vec diagnostic From: Simon Glover <scog@roe.ac.uk> Date: Tue, 26 Feb 2002 18:08:04 +0000 (BST) Message-Id: <Pine.GSO.4.10.10202261756560.23317-100000@muinntiarach.roe.ac.uk> p4raw-id: //depot/perl@14887
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 d59dba6a28..7a8f883d78 100644
--- a/doop.c
+++ b/doop.c
@@ -872,7 +872,7 @@ Perl_do_vecset(pTHX_ SV *sv)
lval = SvUV(sv);
offset = LvTARGOFF(sv);
if (offset < 0)
- Perl_croak(aTHX_ "Assigning to negative offset in vec");
+ Perl_croak(aTHX_ "Negative offset to vec in lvalue context");
size = LvTARGLEN(sv);
if (size < 1 || (size & (size-1))) /* size < 1 or not a power of two */
Perl_croak(aTHX_ "Illegal number of bits in vec");