Change 33807: Fix [perl #52740] crash when localizing a symtab entry

[Rafael Garcia-Suarez]

Change 33807 by [EMAIL PROTECTED] on 2008/05/10 15:58:32

        Fix [perl #52740] crash when localizing a symtab entry

Affected files ...

... //depot/perl/sv.c#1539 edit

Differences ...

==== //depot/perl/sv.c#1539 (text) ====
Index: perl/sv.c
--- perl/sv.c#1538~33788~       2008-05-04 15:25:44.000000000 -0700
+++ perl/sv.c   2008-05-10 08:58:32.000000000 -0700
@@ -3718,8 +3718,10 @@
                GvMULTI_on(dstr);
                return;
            }
-           glob_assign_glob(dstr, sstr, dtype);
-           return;
+           if (isGV_with_GP(sstr)) {
+               glob_assign_glob(dstr, sstr, dtype);
+               return;
+           }
        }
 
        if (dtype >= SVt_PV) {
End of Patch.