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:
7c3342d
)
[win32] make sv_setsv() treat freed SVs like SVt_NULL
author
Gurusamy Sarathy
<gsar@cpan.org>
Sat, 6 Jun 1998 16:47:32 +0000
(16:47 +0000)
committer
Gurusamy Sarathy
<gsar@cpan.org>
Sat, 6 Jun 1998 16:47:32 +0000
(16:47 +0000)
p4raw-id: //depot/win32/perl@1077
sv.c
patch
|
blob
|
history
diff --git
a/sv.c
b/sv.c
index
f5a979a
..
f75df56
100644
(file)
--- a/
sv.c
+++ b/
sv.c
@@
-1913,6
+1913,7
@@
sv_setsv(SV *dstr, register SV *sstr)
/* There's a lot of redundancy below but we're going for speed here */
switch (stype) {
+ case SVTYPEMASK: /* forget, forgive, forgo, free radical */
case SVt_NULL:
if (dtype != SVt_PVGV) {
(void)SvOK_off(dstr);