summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2007-09-21 08:25:47 +0000
committerSteve Hay <SteveHay@planit.com>2007-09-21 08:25:47 +0000
commit26488bcfd275389416b4ce41d2bbea51ab55b2ef (patch)
tree0a43728daae3c9032ceecac1eb2eace904e5c4a3 /hv.c
parent04fe65b0c880322a5ab5677fef6303b6149b8676 (diff)
downloadperl-26488bcfd275389416b4ce41d2bbea51ab55b2ef.tar.gz
Fix Win32 breakage caused by #31926
p4raw-id: //depot/perl@31937
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/hv.c b/hv.c
index a8a5fd15a0..95df7c8fb4 100644
--- a/hv.c
+++ b/hv.c
@@ -445,7 +445,7 @@ Perl_hv_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen,
| return_svp,
NULL /* no value */,
0 /* compute hash */);
- if (!entry && (action & HV_FETCH_LVALUE)) {
+ if (!result && (action & HV_FETCH_LVALUE)) {
/* This call will free key if necessary.
Do it this way to encourage compiler to tail
call optimise. */