style: Detabify indentation of the C code maintained by the core.

This just detabifies to get rid of the mixed tab/space indentation.

Applying consistent indentation and dealing with other tabs are another issue.

Done with `expand -i`.

* vutil.* left alone, it's part of version.
* Left regen managed files alone for now.

1 files changed, 98 insertions, 98 deletions

diff --git a/op.h b/op.h
index 9750717562..189299ec64 100644
--- a/op.h
+++ b/op.h
@@ -65,7 +65,7 @@ typedef PERL_BITFIELD16 Optype;
 
 /* for efficiency, requires OPf_WANT_VOID == G_VOID etc */
 #define OP_GIMME(op,dfl) \
-	(((op)->op_flags & OPf_WANT) ? ((op)->op_flags & OPf_WANT) : dfl)
+        (((op)->op_flags & OPf_WANT) ? ((op)->op_flags & OPf_WANT) : dfl)
 
 #define OP_GIMME_REVERSE(flags)	((flags) & G_WANT)
 
@@ -95,9 +95,9 @@ Deprecated.  Use C<GIMME_V> instead.
 #define  OPf_WANT_LIST	 3	/*   Want list of any length */
 #define OPf_KIDS	4	/* There is a firstborn child. */
 #define OPf_PARENS	8	/* This operator was parenthesized. */
-				/*  (Or block needs explicit scope entry.) */
+                                /*  (Or block needs explicit scope entry.) */
 #define OPf_REF		16	/* Certified reference. */
-				/*  (Return container, not containee). */
+                                /*  (Return container, not containee). */
 #define OPf_MOD		32	/* Will modify (lvalue). */
 
 #define OPf_STACKED	64	/* Some arg is arriving on the stack. */
@@ -106,43 +106,43 @@ Deprecated.  Use C<GIMME_V> instead.
                                  */
 
 #define OPf_SPECIAL	128	/* Do something weird for this op: */
-				/*  On local LVAL, don't init local value. */
-				/*  On OP_SORT, subroutine is inlined. */
-				/*  On OP_NOT, inversion was implicit. */
-				/*  On OP_LEAVE, don't restore curpm, e.g.
+                                /*  On local LVAL, don't init local value. */
+                                /*  On OP_SORT, subroutine is inlined. */
+                                /*  On OP_NOT, inversion was implicit. */
+                                /*  On OP_LEAVE, don't restore curpm, e.g.
                                  *      /(...)/ while ...>;  */
-				/*  On truncate, we truncate filehandle */
-				/*  On control verbs, we saw no label */
-				/*  On flipflop, we saw ... instead of .. */
-				/*  On UNOPs, saw bare parens, e.g. eof(). */
-				/*  On OP_CHDIR, handle (or bare parens) */
-				/*  On OP_NULL, saw a "do". */
-				/*  On OP_EXISTS, treat av as av, not avhv.  */
-				/*  On OP_(ENTER|LEAVE)EVAL, don't clear $@ */
-				/*  On regcomp, "use re 'eval'" was in scope */
-				/*  On RV2[ACGHS]V, don't create GV--in
-				    defined()*/
-				/*  On OP_DBSTATE, indicates breakpoint
-				 *    (runtime property) */
-				/*  On OP_REQUIRE, was seen as CORE::require */
-				/*  On OP_(ENTER|LEAVE)WHEN, there's
-				    no condition */
-				/*  On OP_SMARTMATCH, an implicit smartmatch */
-				/*  On OP_ANONHASH and OP_ANONLIST, create a
-				    reference to the new anon hash or array */
-				/*  On OP_HELEM, OP_MULTIDEREF and OP_HSLICE,
+                                /*  On truncate, we truncate filehandle */
+                                /*  On control verbs, we saw no label */
+                                /*  On flipflop, we saw ... instead of .. */
+                                /*  On UNOPs, saw bare parens, e.g. eof(). */
+                                /*  On OP_CHDIR, handle (or bare parens) */
+                                /*  On OP_NULL, saw a "do". */
+                                /*  On OP_EXISTS, treat av as av, not avhv.  */
+                                /*  On OP_(ENTER|LEAVE)EVAL, don't clear $@ */
+                                /*  On regcomp, "use re 'eval'" was in scope */
+                                /*  On RV2[ACGHS]V, don't create GV--in
+                                    defined()*/
+                                /*  On OP_DBSTATE, indicates breakpoint
+                                 *    (runtime property) */
+                                /*  On OP_REQUIRE, was seen as CORE::require */
+                                /*  On OP_(ENTER|LEAVE)WHEN, there's
+                                    no condition */
+                                /*  On OP_SMARTMATCH, an implicit smartmatch */
+                                /*  On OP_ANONHASH and OP_ANONLIST, create a
+                                    reference to the new anon hash or array */
+                                /*  On OP_HELEM, OP_MULTIDEREF and OP_HSLICE,
                                     localization will be followed by assignment,
                                     so do not wipe the target if it is special
                                     (e.g. a glob or a magic SV) */
-				/*  On OP_MATCH, OP_SUBST & OP_TRANS, the
-				    operand of a logical or conditional
-				    that was optimised away, so it should
-				    not be bound via =~ */
-				/*  On OP_CONST, from a constant CV */
-				/*  On OP_GLOB, two meanings:
-				    - Before ck_glob, called as CORE::glob
-				    - After ck_glob, use Perl glob function
-			         */
+                                /*  On OP_MATCH, OP_SUBST & OP_TRANS, the
+                                    operand of a logical or conditional
+                                    that was optimised away, so it should
+                                    not be bound via =~ */
+                                /*  On OP_CONST, from a constant CV */
+                                /*  On OP_GLOB, two meanings:
+                                    - Before ck_glob, called as CORE::glob
+                                    - After ck_glob, use Perl glob function
+                                 */
                                 /*  On OP_PADRANGE, push @_ */
                                 /*  On OP_DUMP, has no label */
                                 /*  On OP_UNSTACK, in a C-style for loop */
@@ -158,11 +158,11 @@ Deprecated.  Use C<GIMME_V> instead.
 
 #if !defined(PERL_CORE) && !defined(PERL_EXT)
 #  define GIMME \
-	  (PL_op->op_flags & OPf_WANT					\
-	   ? ((PL_op->op_flags & OPf_WANT) == OPf_WANT_LIST		\
-	      ? G_ARRAY							\
-	      : G_SCALAR)						\
-	   : dowantarray())
+          (PL_op->op_flags & OPf_WANT					\
+           ? ((PL_op->op_flags & OPf_WANT) == OPf_WANT_LIST		\
+              ? G_ARRAY							\
+              : G_SCALAR)						\
+           : dowantarray())
 #endif
 
 
@@ -259,16 +259,16 @@ struct pmop {
 #endif
     U32         op_pmflags;
     union {
-	OP *	op_pmreplroot;		/* For OP_SUBST */
-	PADOFFSET op_pmtargetoff;	/* For OP_SPLIT lex ary or thr GV */
-	GV *	op_pmtargetgv;	        /* For OP_SPLIT non-threaded GV */
+        OP *	op_pmreplroot;		/* For OP_SUBST */
+        PADOFFSET op_pmtargetoff;	/* For OP_SPLIT lex ary or thr GV */
+        GV *	op_pmtargetgv;	        /* For OP_SPLIT non-threaded GV */
     }	op_pmreplrootu;
     union {
-	OP *	op_pmreplstart;	/* Only used in OP_SUBST */
+        OP *	op_pmreplstart;	/* Only used in OP_SUBST */
 #ifdef USE_ITHREADS
-	PADOFFSET op_pmstashoff; /* Only used in OP_MATCH, with PMf_ONCE set */
+        PADOFFSET op_pmstashoff; /* Only used in OP_MATCH, with PMf_ONCE set */
 #else
-	HV *	op_pmstash;
+        HV *	op_pmstash;
 #endif
     }		op_pmstashstartu;
     OP *	op_code_list;	/* list of (?{}) code blocks */
@@ -276,7 +276,7 @@ struct pmop {
 
 #ifdef USE_ITHREADS
 #define PM_GETRE(o)	(SvTYPE(PL_regex_pad[(o)->op_pmoffset]) == SVt_REGEXP \
-		 	 ? (REGEXP*)(PL_regex_pad[(o)->op_pmoffset]) : NULL)
+                         ? (REGEXP*)(PL_regex_pad[(o)->op_pmoffset]) : NULL)
 /* The assignment is just to enforce type safety (or at least get a warning).
  */
 /* With first class regexps not via a reference one needs to assign
@@ -288,7 +288,7 @@ struct pmop {
 #define PM_SETRE(o,r)	STMT_START {					\
                             REGEXP *const _pm_setre = (r);		\
                             assert(_pm_setre);				\
-			    PL_regex_pad[(o)->op_pmoffset] = MUTABLE_SV(_pm_setre); \
+                            PL_regex_pad[(o)->op_pmoffset] = MUTABLE_SV(_pm_setre); \
                         } STMT_END
 #else
 #define PM_GETRE(o)     ((o)->op_pmregexp)
@@ -390,16 +390,16 @@ struct pmop {
                                 ? PL_stashpad[(o)->op_pmstashstartu.op_pmstashoff]   \
                                 : NULL)
 #  define PmopSTASH_set(o,hv)	\
-	(assert_((o)->op_pmflags & PMf_ONCE)				\
-	 (o)->op_pmstashstartu.op_pmstashoff =				\
-	    (hv) ? alloccopstash(hv) : 0)
+        (assert_((o)->op_pmflags & PMf_ONCE)				\
+         (o)->op_pmstashstartu.op_pmstashoff =				\
+            (hv) ? alloccopstash(hv) : 0)
 #else
 #  define PmopSTASH(o)							\
     (((o)->op_pmflags & PMf_ONCE) ? (o)->op_pmstashstartu.op_pmstash : NULL)
 #  if defined (DEBUGGING) && defined(PERL_USE_GCC_BRACE_GROUPS)
 #    define PmopSTASH_set(o,hv)		({				\
-	assert((o)->op_pmflags & PMf_ONCE);				\
-	((o)->op_pmstashstartu.op_pmstash = (hv));			\
+        assert((o)->op_pmflags & PMf_ONCE);				\
+        ((o)->op_pmstashstartu.op_pmstash = (hv));			\
     })
 #  else
 #    define PmopSTASH_set(o,hv)	((o)->op_pmstashstartu.op_pmstash = (hv))
@@ -506,12 +506,12 @@ typedef enum {
 #  ifndef PERL_CORE
 #    define	IS_PADGV(v)	(v && isGV(v))
 #    define	IS_PADCONST(v) \
-	(v && (SvREADONLY(v) || (SvIsCOW(v) && !SvLEN(v))))
+        (v && (SvREADONLY(v) || (SvIsCOW(v) && !SvLEN(v))))
 #  endif
 #  define	cSVOPx_sv(v)	(cSVOPx(v)->op_sv \
-				 ? cSVOPx(v)->op_sv : PAD_SVl((v)->op_targ))
+                                 ? cSVOPx(v)->op_sv : PAD_SVl((v)->op_targ))
 #  define	cSVOPx_svp(v)	(cSVOPx(v)->op_sv \
-				 ? &cSVOPx(v)->op_sv : &PAD_SVl((v)->op_targ))
+                                 ? &cSVOPx(v)->op_sv : &PAD_SVl((v)->op_targ))
 #  define	cMETHOPx_rclass(v) PAD_SVl(cMETHOPx(v)->op_rclass_targ)
 #else
 #  define	cGVOPx_gv(o)	((GV*)cSVOPx(o)->op_sv)
@@ -621,9 +621,9 @@ typedef enum {
 #define PERL_LOADMOD_DENY		0x1	/* no Module */
 #define PERL_LOADMOD_NOIMPORT		0x2	/* use Module () */
 #define PERL_LOADMOD_IMPORT_OPS		0x4	/* import arguments
-						   are passed as a sin-
-						   gle op tree, not a
-						   list of SVs */
+                                                   are passed as a sin-
+                                                   gle op tree, not a
+                                                   list of SVs */
 
 #if defined(PERL_IN_PERLY_C) || defined(PERL_IN_OP_C) || defined(PERL_IN_TOKE_C)
 #define ref(o, type) doref(o, type, TRUE)
@@ -668,9 +668,9 @@ least an C<UNOP>.
 #endif
 
 #define NewOp(m,var,c,type)	\
-	(var = (type *) Perl_Slab_Alloc(aTHX_ c*sizeof(type)))
+        (var = (type *) Perl_Slab_Alloc(aTHX_ c*sizeof(type)))
 #define NewOpSz(m,var,size)	\
-	(var = (OP *) Perl_Slab_Alloc(aTHX_ size))
+        (var = (OP *) Perl_Slab_Alloc(aTHX_ size))
 #define FreeOp(p) Perl_Slab_Free(aTHX_ p)
 
 /*
@@ -719,7 +719,7 @@ struct opslab {
 
 # define OPSLOT_HEADER		STRUCT_OFFSET(OPSLOT, opslot_op)
 # define OpSLOT(o)		(assert_(o->op_slabbed) \
-				 (OPSLOT *)(((char *)o)-OPSLOT_HEADER))
+                                 (OPSLOT *)(((char *)o)-OPSLOT_HEADER))
 
 /* the slab that owns this op */
 # define OpMySLAB(o) \
@@ -732,14 +732,14 @@ struct opslab {
     ((OPSLOT*)(((I32 **)&(slab)->opslab_slots)+(offset)))
 
 # define OpslabREFCNT_dec(slab)      \
-	(((slab)->opslab_refcnt == 1) \
-	 ? opslab_free_nopad(slab)     \
-	 : (void)--(slab)->opslab_refcnt)
+        (((slab)->opslab_refcnt == 1) \
+         ? opslab_free_nopad(slab)     \
+         : (void)--(slab)->opslab_refcnt)
   /* Variant that does not null out the pads */
 # define OpslabREFCNT_dec_padok(slab) \
-	(((slab)->opslab_refcnt == 1)  \
-	 ? opslab_free(slab)		\
-	 : (void)--(slab)->opslab_refcnt)
+        (((slab)->opslab_refcnt == 1)  \
+         ? opslab_free(slab)		\
+         : (void)--(slab)->opslab_refcnt)
 #endif
 
 struct block_hooks {
@@ -797,39 +797,39 @@ preprocessing token; the type of C<arg> depends on C<which>.
 
 #define BhkENABLE(hk, which) \
     STMT_START { \
-	BhkFLAGS(hk) |= BHKf_ ## which; \
-	assert(BhkENTRY(hk, which)); \
+        BhkFLAGS(hk) |= BHKf_ ## which; \
+        assert(BhkENTRY(hk, which)); \
     } STMT_END
 
 #define BhkDISABLE(hk, which) \
     STMT_START { \
-	BhkFLAGS(hk) &= ~(BHKf_ ## which); \
+        BhkFLAGS(hk) &= ~(BHKf_ ## which); \
     } STMT_END
 
 #define BhkENTRY_set(hk, which, ptr) \
     STMT_START { \
-	(hk)->which = ptr; \
-	BhkENABLE(hk, which); \
+        (hk)->which = ptr; \
+        BhkENABLE(hk, which); \
     } STMT_END
 
 #define CALL_BLOCK_HOOKS(which, arg) \
     STMT_START { \
-	if (PL_blockhooks) { \
-	    SSize_t i; \
-	    for (i = av_top_index(PL_blockhooks); i >= 0; i--) { \
-		SV *sv = AvARRAY(PL_blockhooks)[i]; \
-		BHK *hk; \
-		\
-		assert(SvIOK(sv)); \
-		if (SvUOK(sv)) \
-		    hk = INT2PTR(BHK *, SvUVX(sv)); \
-		else \
-		    hk = INT2PTR(BHK *, SvIVX(sv)); \
-		\
-		if (BhkENTRY(hk, which)) \
-		    BhkENTRY(hk, which)(aTHX_ arg); \
-	    } \
-	} \
+        if (PL_blockhooks) { \
+            SSize_t i; \
+            for (i = av_top_index(PL_blockhooks); i >= 0; i--) { \
+                SV *sv = AvARRAY(PL_blockhooks)[i]; \
+                BHK *hk; \
+                \
+                assert(SvIOK(sv)); \
+                if (SvUOK(sv)) \
+                    hk = INT2PTR(BHK *, SvUVX(sv)); \
+                else \
+                    hk = INT2PTR(BHK *, SvIVX(sv)); \
+                \
+                if (BhkENTRY(hk, which)) \
+                    BhkENTRY(hk, which)(aTHX_ arg); \
+            } \
+        } \
     } STMT_END
 
 /* flags for rv2cv_op_cv */
@@ -924,8 +924,8 @@ typedef enum {
 
 #define XopENTRY_set(xop, which, to) \
     STMT_START { \
-	(xop)->which = (to); \
-	(xop)->xop_flags |= XOPf_ ## which; \
+        (xop)->which = (to); \
+        (xop)->xop_flags |= XOPf_ ## which; \
     } STMT_END
 
 #define XopENTRY(xop, which) \
@@ -937,8 +937,8 @@ typedef enum {
 #define XopDISABLE(xop, which) ((xop)->xop_flags &= ~XOPf_ ## which)
 #define XopENABLE(xop, which) \
     STMT_START { \
-	(xop)->xop_flags |= XOPf_ ## which; \
-	assert(XopENTRY(xop, which)); \
+        (xop)->xop_flags |= XOPf_ ## which; \
+        assert(XopENTRY(xop, which)); \
     } STMT_END
 
 #define Perl_custom_op_xop(x) \
@@ -1009,13 +1009,13 @@ C<sib> is non-null. For a higher-level interface, see C<L</op_sibling_splice>>.
 
 #define OP_NAME(o) ((o)->op_type == OP_CUSTOM \
                     ? XopENTRYCUSTOM(o, xop_name) \
-		    : PL_op_name[(o)->op_type])
+                    : PL_op_name[(o)->op_type])
 #define OP_DESC(o) ((o)->op_type == OP_CUSTOM \
                     ? XopENTRYCUSTOM(o, xop_desc) \
-		    : PL_op_desc[(o)->op_type])
+                    : PL_op_desc[(o)->op_type])
 #define OP_CLASS(o) ((o)->op_type == OP_CUSTOM \
-		     ? XopENTRYCUSTOM(o, xop_class) \
-		     : (PL_opargs[(o)->op_type] & OA_CLASS_MASK))
+                     ? XopENTRYCUSTOM(o, xop_class) \
+                     : (PL_opargs[(o)->op_type] & OA_CLASS_MASK))
 
 #define OP_TYPE_IS(o, type) ((o) && (o)->op_type == (type))
 #define OP_TYPE_IS_NN(o, type) ((o)->op_type == (type))