This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
SAVEt_CLEARSV: reindent after previous commit
authorDavid Mitchell <davem@iabyn.com>
Fri, 28 Feb 2014 17:45:37 +0000 (17:45 +0000)
committerDavid Mitchell <davem@iabyn.com>
Fri, 28 Feb 2014 19:38:28 +0000 (19:38 +0000)
whitespace-only changes

scope.c

diff --git a/scope.c b/scope.c
index 10c6590..4361455 100644 (file)
--- a/scope.c
+++ b/scope.c
@@ -1051,23 +1051,22 @@ Perl_leave_scope(pTHX_ I32 base)
                           | (SVs_GMG|SVs_SMG|SVs_RMG) /* SvMAGICAL() */
                           | SVf_THINKFIRST)))
                     {
-                    /*
-                     * if a my variable that was made readonly is going out of
-                     * scope, we want to remove the readonlyness so that it can
-                     * go out of scope quietly
-                     */
-                    if (SvPADMY(sv) && !SvFAKE(sv))
-                        SvREADONLY_off(sv);
-
-                    if (SvMAGICAL(sv))
-                    {
-                      sv_unmagic(sv, PERL_MAGIC_backref);
-                      if (SvTYPE(sv) != SVt_PVCV)
-                        mg_free(sv);
-                    }
-                    if (SvTHINKFIRST(sv))
-                        sv_force_normal_flags(sv, SV_IMMEDIATE_UNREF
-                                                 |SV_COW_DROP_PV);
+                        /* if a my variable that was made readonly is
+                         * going out of scope, we want to remove the
+                         * readonlyness so that it can go out of scope
+                         * quietly
+                         */
+                        if (SvPADMY(sv) && !SvFAKE(sv))
+                            SvREADONLY_off(sv);
+
+                        if (SvMAGICAL(sv)) {
+                            sv_unmagic(sv, PERL_MAGIC_backref);
+                            if (SvTYPE(sv) != SVt_PVCV)
+                                mg_free(sv);
+                        }
+                        if (SvTHINKFIRST(sv))
+                            sv_force_normal_flags(sv, SV_IMMEDIATE_UNREF
+                                                     |SV_COW_DROP_PV);
 
                     }
                     switch (SvTYPE(sv)) {