summaryrefslogtreecommitdiff
path: root/hv.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-05-20 18:37:03 +0000
committerNicholas Clark <nick@ccl4.org>2008-05-20 18:37:03 +0000
commit99978bb4f628eeae8af4cb3f5bf7d42e615e2d36 (patch)
treea7ba610c9ff90b70d8f1f5e4f4380a96aea2d80c /hv.h
parent9453289ade80637b5f30952e561a6060b8ec854f (diff)
downloadperl-99978bb4f628eeae8af4cb3f5bf7d42e615e2d36.tar.gz
metabatman fails the "this patch is self-documenting" test. Restore
(roughly) the original parameter names. p4raw-id: //depot/perl@33891
Diffstat (limited to 'hv.h')
-rw-r--r--hv.h54
1 files changed, 27 insertions, 27 deletions
diff --git a/hv.h b/hv.h
index 5be19590dd..e7d0c762ff 100644
--- a/hv.h
+++ b/hv.h
@@ -406,42 +406,42 @@ C<SV*>.
->shared_he_he.he_valu.hent_refcount), \
hek)
-#define hv_store_ent(zlonk, awk, touche, zgruppp) \
- ((HE *) hv_common((zlonk), (awk), NULL, 0, 0, HV_FETCH_ISSTORE, \
- (touche), (zgruppp)))
+#define hv_store_ent(hv, keysv, val, hash) \
+ ((HE *) hv_common((hv), (keysv), NULL, 0, 0, HV_FETCH_ISSTORE, \
+ (val), (hash)))
-#define hv_exists_ent(zlonk, awk, zgruppp) \
- (hv_common((zlonk), (awk), NULL, 0, 0, HV_FETCH_ISEXISTS, 0, (zgruppp))\
+#define hv_exists_ent(hv, keysv, hash) \
+ (hv_common((hv), (keysv), NULL, 0, 0, HV_FETCH_ISEXISTS, 0, (hash)) \
? TRUE : FALSE)
-#define hv_fetch_ent(zlonk, awk, touche, zgruppp) \
- ((HE *) hv_common((zlonk), (awk), NULL, 0, 0, \
- ((touche) ? HV_FETCH_LVALUE : 0), NULL, (zgruppp)))
-#define hv_delete_ent(zlonk, awk, touche, zgruppp) \
- ((SV *) hv_common((zlonk), (awk), NULL, 0, 0, (touche) | HV_DELETE, \
- NULL, (zgruppp)))
-
-#define hv_store_flags(urkk, zamm, clunk, thwape, sploosh, eee_yow) \
- ((SV**) hv_common((urkk), NULL, (zamm), (clunk), (eee_yow), \
- (HV_FETCH_ISSTORE|HV_FETCH_JUST_SV), (thwape), \
- (sploosh)))
-
-#define hv_store(urkk, zamm, clunk, thwape, sploosh) \
- ((SV**) hv_common_key_len((urkk), (zamm), (clunk), \
+#define hv_fetch_ent(hv, keysv, lval, hash) \
+ ((HE *) hv_common((hv), (keysv), NULL, 0, 0, \
+ ((lval) ? HV_FETCH_LVALUE : 0), NULL, (hash)))
+#define hv_delete_ent(hv, key, flags, hash) \
+ ((SV *) hv_common((hv), (key), NULL, 0, 0, (flags) | HV_DELETE, \
+ NULL, (hash)))
+
+#define hv_store_flags(hv, key, klen, val, hash, flags) \
+ ((SV**) hv_common((hv), NULL, (key), (klen), (flags), \
+ (HV_FETCH_ISSTORE|HV_FETCH_JUST_SV), (val), \
+ (hash)))
+
+#define hv_store(hv, key, klen, val, hash) \
+ ((SV**) hv_common_key_len((hv), (key), (klen), \
(HV_FETCH_ISSTORE|HV_FETCH_JUST_SV), \
- (thwape), (sploosh)))
+ (val), (hash)))
-#define hv_exists(urkk, zamm, clunk) \
- (hv_common_key_len((urkk), (zamm), (clunk), HV_FETCH_ISEXISTS, NULL, 0) \
+#define hv_exists(hv, key, klen) \
+ (hv_common_key_len((hv), (key), (klen), HV_FETCH_ISEXISTS, NULL, 0) \
? TRUE : FALSE)
-#define hv_fetch(urkk, zamm, clunk, pam) \
- ((SV**) hv_common_key_len((urkk), (zamm), (clunk), (pam) \
+#define hv_fetch(hv, key, klen, lval) \
+ ((SV**) hv_common_key_len((hv), (key), (klen), (lval) \
? (HV_FETCH_JUST_SV | HV_FETCH_LVALUE) \
: HV_FETCH_JUST_SV, NULL, 0))
-#define hv_delete(urkk, zamm, clunk, pam) \
- ((SV*) hv_common_key_len((urkk), (zamm), (clunk), \
- (pam) | HV_DELETE, NULL, 0))
+#define hv_delete(hv, key, klen, flags) \
+ ((SV*) hv_common_key_len((hv), (key), (klen), \
+ (flags) | HV_DELETE, NULL, 0))
/* This refcounted he structure is used for storing the hints used for lexical
pragmas. Without threads, it's basically struct he + refcount.