diff options
| author | Tony Cook <tony@develop-help.com> | 2022-06-22 14:27:11 +1000 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2022-07-18 11:22:08 +1000 |
| commit | a8b89476b094f419cd7760635158726263e84631 (patch) | |
| tree | 154bf515c5fabbdbb886b7a353e3d57cf028a4b9 /cop.h | |
| parent | bda3b19c10a9003a3e7c8c91f6674d892bcc2100 (diff) | |
| download | perl-a8b89476b094f419cd7760635158726263e84631.tar.gz | |
replace (0+(pointer)) with casts to the pointer type
Old versions (3.3.6) of gcc allowed assignment to such casts, but
this is no longer an issue.
Diffstat (limited to 'cop.h')
| -rw-r--r-- | cop.h | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -813,9 +813,9 @@ struct block_loop { ? &GvSV((c)->blk_loop.itervar_u.gv) \ : (SV **)&(c)->blk_loop.itervar_u.gv) -#define CxLABEL(c) (0 + CopLABEL((c)->blk_oldcop)) -#define CxLABEL_len(c,len) (0 + CopLABEL_len((c)->blk_oldcop, len)) -#define CxLABEL_len_flags(c,len,flags) (0 + CopLABEL_len_flags((c)->blk_oldcop, len, flags)) +#define CxLABEL(c) (CopLABEL((c)->blk_oldcop)) +#define CxLABEL_len(c,len) (CopLABEL_len((c)->blk_oldcop, len)) +#define CxLABEL_len_flags(c,len,flags) ((const char *)CopLABEL_len_flags((c)->blk_oldcop, len, flags)) #define CxHASARGS(c) (((c)->cx_type & CXp_HASARGS) == CXp_HASARGS) /* CxLVAL(): the lval flags of the call site: the relevant flag bits from |