summaryrefslogtreecommitdiff
path: root/scope.h
diff options
context:
space:
mode:
authorZefram <zefram@fysh.org>2010-10-28 22:01:11 +0100
committerFather Chrysostomos <sprout@cpan.org>2010-10-28 17:51:44 -0700
commit3987a177937fb7957caa003cdf4c6dee1bb97f71 (patch)
treead6d7e97944a83eb44ed9b79043c206c3dd1c585 /scope.h
parent691135482762ce9dc9654f3848979dfe881cceb5 (diff)
downloadperl-3987a177937fb7957caa003cdf4c6dee1bb97f71.tar.gz
add SAVEFREECOPHH()
Add the facility for the save stack to free (decrement the refcount of) a COPHH*.
Diffstat (limited to 'scope.h')
-rw-r--r--scope.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/scope.h b/scope.h
index 6cef09162e..7ebd52a387 100644
--- a/scope.h
+++ b/scope.h
@@ -58,6 +58,7 @@
#define SAVEt_I32_SMALL 47
#define SAVEt_INT_SMALL 48
#define SAVEt_GVSV 49
+#define SAVEt_FREECOPHH 50
#define SAVEf_SETMAGIC 1
#define SAVEf_KEEPOLDELEM 2
@@ -184,6 +185,7 @@ scope has the given name. Name must be a literal string.
#define SAVEGENERICPV(s) save_generic_pvref((char**)&(s))
#define SAVESHAREDPV(s) save_shared_pvref((char**)&(s))
#define SAVESETSVFLAGS(sv,mask,val) save_set_svflags(sv,mask,val)
+#define SAVEFREECOPHH(h) save_pushptr((void *)(h), SAVEt_FREECOPHH)
#define SAVEDELETE(h,k,l) \
save_delete(MUTABLE_HV(h), (char*)(k), (I32)(l))
#define SAVEHDELETE(h,s) \