diff options
author | David Mitchell <davem@iabyn.com> | 2016-03-02 10:23:43 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-03-02 10:23:43 +0000 |
commit | d1ac280ff42df46be47d0e0ef3a0730433a35cfb (patch) | |
tree | 8e5a8423bdfc55d1e306b84a4b99bb8cc520e0d2 /pp_hot.c | |
parent | 9a3e03386d8a1c1a9919f20c82d1d19b1e179525 (diff) | |
download | perl-d1ac280ff42df46be47d0e0ef3a0730433a35cfb.tar.gz |
use cBOOL() in pp_subst()
Now that we have that macro, use it.
Diffstat (limited to 'pp_hot.c')
-rw-r--r-- | pp_hot.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -2911,9 +2911,7 @@ PP(pp_subst) SvGETMAGIC(TARG); /* must come before cow check */ #ifdef PERL_ANY_COW - /* Awooga. Awooga. "bool" types that are actually char are dangerous, - because they make integers such as 256 "false". */ - is_cow = SvIsCOW(TARG) ? TRUE : FALSE; + is_cow = cBOOL(SvIsCOW(TARG)); #endif if (!(rpm->op_pmflags & PMf_NONDESTRUCT)) { #ifndef PERL_ANY_COW |