summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorPaul Green <Paul.Green@stratus.com>2004-01-15 11:00:15 -0500
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2004-01-17 22:00:48 +0000
commit8f8d40ab34e002001c7e6f500a987fa1dfb3bd78 (patch)
treeb2032d9a55fde4bc9cf483320b1848bbf6f3005e /hv.c
parentbac662eeb2cdce47175319fe613f5779e780f517 (diff)
downloadperl-8f8d40ab34e002001c7e6f500a987fa1dfb3bd78.tar.gz
Refactor VOS patches for bleadperl and perl-5.8.x
From: "Green, Paul" <Paul.Green@stratus.com> Message-ID: <A2A34F15EE916148BC4C4748223E67A4069FBB15@exna4.stratus.com> p4raw-id: //depot/perl@22171
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/hv.c b/hv.c
index 158b0b652b..b7415ecdbe 100644
--- a/hv.c
+++ b/hv.c
@@ -369,7 +369,7 @@ Perl_hv_fetch_ent(pTHX_ HV *hv, SV *keysv, I32 lval, register U32 hash)
(lval ? HV_FETCH_LVALUE : 0), Nullsv, hash);
}
-HE *
+STATIC HE *
S_hv_fetch_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen,
int flags, int action, SV *val, register U32 hash)
{
@@ -866,7 +866,7 @@ Perl_hv_delete_ent(pTHX_ HV *hv, SV *keysv, I32 flags, U32 hash)
return hv_delete_common(hv, keysv, NULL, 0, 0, flags, hash);
}
-SV *
+STATIC SV *
S_hv_delete_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen,
int k_flags, I32 d_flags, U32 hash)
{