In perl.git, the branch blead has been updated <https://perl5.git.perl.org/perl.git/commitdiff/859b78b1a8287681e524286f4e989b01816433ba?hp=c5103e52cf3d883b273759a4c3405580aa7b69fe>
- Log ----------------------------------------------------------------- commit 859b78b1a8287681e524286f4e989b01816433ba Author: Dagfinn Ilmari Mannsåker <[email protected]> Date: Thu Oct 17 13:48:00 2019 +0200 Remove indentation of no-longer #ifdef-guarded #defines Commit 0f9a6232f0af0895807ddd0afae2d5512aa91bf9 removed the #ifdef PERL_OP_PARENT, but left the #define directives indented. ----------------------------------------------------------------------- Summary of changes: op.h | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/op.h b/op.h index 80b1d9c59c..e1ade4fc92 100644 --- a/op.h +++ b/op.h @@ -1031,13 +1031,13 @@ C<sib> is non-null. For a higher-level interface, see C<L</op_sibling_splice>>. /* should match anything that uses ck_ftst in regen/opcodes */ #define OP_IS_STAT(op) (OP_IS_FILETEST(op) || (op) == OP_LSTAT || (op) == OP_STAT) -# define OpHAS_SIBLING(o) (cBOOL((o)->op_moresib)) -# define OpSIBLING(o) (0 + (o)->op_moresib ? (o)->op_sibparent : NULL) -# define OpMORESIB_set(o, sib) ((o)->op_moresib = 1, (o)->op_sibparent = (sib)) -# define OpLASTSIB_set(o, parent) \ - ((o)->op_moresib = 0, (o)->op_sibparent = (parent)) -# define OpMAYBESIB_set(o, sib, parent) \ - ((o)->op_sibparent = ((o)->op_moresib = cBOOL(sib)) ? (sib) : (parent)) +#define OpHAS_SIBLING(o) (cBOOL((o)->op_moresib)) +#define OpSIBLING(o) (0 + (o)->op_moresib ? (o)->op_sibparent : NULL) +#define OpMORESIB_set(o, sib) ((o)->op_moresib = 1, (o)->op_sibparent = (sib)) +#define OpLASTSIB_set(o, parent) \ + ((o)->op_moresib = 0, (o)->op_sibparent = (parent)) +#define OpMAYBESIB_set(o, sib, parent) \ + ((o)->op_sibparent = ((o)->op_moresib = cBOOL(sib)) ? (sib) : (parent)) #if !defined(PERL_CORE) && !defined(PERL_EXT) /* for backwards compatibility only */ -- Perl5 Master Repository
