diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-07-16 18:42:59 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-07-16 18:42:59 -0700 |
commit | aebc0cbee0c83e7c1648507658f739153cf1176a (patch) | |
tree | c2fec976e677d375d3a3c48673b50124a93b8b39 /cop.h | |
parent | 8375c93eec5677d8587491a0541d33bc206a445a (diff) | |
download | perl-aebc0cbee0c83e7c1648507658f739153cf1176a.tar.gz |
Rename store/fetch_cop_label as cop_*
This makes them consistent with other functions that put the basic
datum type first (like hv_*, sv_*, cophh_*).
Since fetch_cop_label is marked as experimental (M), this change
should be OK.
Diffstat (limited to 'cop.h')
-rw-r--r-- | cop.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -542,7 +542,7 @@ be zero. #define cop_hints_2hv(cop, flags) \ cophh_2hv(CopHINTHASH_get(cop), flags) -#define CopLABEL(c) Perl_fetch_cop_label(aTHX_ (c), NULL, NULL) +#define CopLABEL(c) Perl_cop_fetch_label(aTHX_ (c), NULL, NULL) #define CopLABEL_alloc(pv) ((pv)?savepv(pv):NULL) #define CopSTASH_ne(c,hv) (!CopSTASH_eq(c,hv)) |