Permit array assignment to steal temps and copy shared hash key scalars.

Scalar assignment to array elements already does this. (As does all other
scalar assignment, and list assignment to hashes.) Prior to 4c8f17b905f2
(change 7867) list assignment to arrays did steal temps.

1 files changed, 2 insertions, 1 deletions

diff --git a/pp_hot.c b/pp_hot.c
index 95a682270c..ea949b828e 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1037,7 +1037,8 @@ PP(pp_aassign)
 	    while (relem <= lastrelem) {	/* gobble up all the rest */
 		SV **didstore;
 		assert(*relem);
-		sv = newSVsv(*relem);
+		sv = newSV(0);
+		sv_setsv(sv, *relem);
 		*(relem++) = sv;
 		didstore = av_store(ary,i++,sv);
 		if (magic) {