Change 27738: ss_dup of SAVEt_COP_ARYBASE can use the same code as SAVEt_I8.

[Nicholas Clark]

Change 27738 by [EMAIL PROTECTED] on 2006/04/08 12:50:13

        ss_dup of SAVEt_COP_ARYBASE can use the same code as SAVEt_I8.

Affected files ...

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

Differences ...

==== //depot/perl/sv.c#1225 (text) ====
Index: perl/sv.c
--- perl/sv.c#1224~27737~       2006-04-07 14:24:35.000000000 -0700
+++ perl/sv.c   2006-04-08 05:50:13.000000000 -0700
@@ -10428,6 +10428,7 @@
        case SAVEt_I32:                         /* I32 reference */
        case SAVEt_I16:                         /* I16 reference */
        case SAVEt_I8:                          /* I8 reference */
+       case SAVEt_COP_ARYBASE:                 /* call CopARYBASE_set */
            ptr = POPPTR(ss,ix);
            TOPPTR(nss,ix) = any_dup(ptr, proto_perl);
            i = POPINT(ss,ix);
End of Patch.