diff options
author | Steve Hay <SteveHay@planit.com> | 2007-09-21 08:25:47 +0000 |
---|---|---|
committer | Steve Hay <SteveHay@planit.com> | 2007-09-21 08:25:47 +0000 |
commit | 26488bcfd275389416b4ce41d2bbea51ab55b2ef (patch) | |
tree | 0a43728daae3c9032ceecac1eb2eace904e5c4a3 /hv.c | |
parent | 04fe65b0c880322a5ab5677fef6303b6149b8676 (diff) | |
download | perl-26488bcfd275389416b4ce41d2bbea51ab55b2ef.tar.gz |
Fix Win32 breakage caused by #31926
p4raw-id: //depot/perl@31937
Diffstat (limited to 'hv.c')
-rw-r--r-- | hv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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. */ |