projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
1ccabee
)
Fix bug in change 27321 - Perl_ss_dup should also have been updated.
author
Nicholas Clark
<nick@ccl4.org>
Sun, 22 Oct 2006 22:35:42 +0000
(22:35 +0000)
committer
Nicholas Clark
<nick@ccl4.org>
Sun, 22 Oct 2006 22:35:42 +0000
(22:35 +0000)
p4raw-id: //depot/perl@29085
sv.c
patch
|
blob
|
history
diff --git
a/sv.c
b/sv.c
index
0f33280
..
77047ef
100644
(file)
--- a/
sv.c
+++ b/
sv.c
@@
-10491,12
+10491,6
@@
Perl_ss_dup(pTHX_ PerlInterpreter *proto_perl, CLONE_PARAMS* param)
(void)GpREFCNT_inc(gp);
gv = (GV*)POPPTR(ss,ix);
TOPPTR(nss,ix) = gv_dup_inc(gv, param);
- c = (char*)POPPTR(ss,ix);
- TOPPTR(nss,ix) = pv_dup(c);
- iv = POPIV(ss,ix);
- TOPIV(nss,ix) = iv;
- iv = POPIV(ss,ix);
- TOPIV(nss,ix) = iv;
break;
case SAVEt_FREEOP:
ptr = POPPTR(ss,ix);