[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apreq-cvs
Subject:    svn commit: r744280 -
From:       joes () apache ! org
Date:       2009-02-13 23:25:23
Message-ID: 20090213232524.6222A23889BB () eris ! apache ! org
[Download RAW message or body]

Author: joes
Date: Fri Feb 13 23:25:23 2009
New Revision: 744280

URL: http://svn.apache.org/viewvc?rev=744280&view=rev
Log:
these shouldn't be mortal

Modified:
    httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h

Modified: httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h?rev=744280&r1=744279&r2=744280&view=diff
 ==============================================================================
--- httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h (original)
+++ httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h Fri Feb 13 23:25:23 \
2009 @@ -250,13 +250,13 @@
     }
 
     if (obj != Nullsv)
-        sv_setsv(*hv_fetch(data, "_r",   2, 1), sv_2mortal(newRV_inc(obj)));
+        sv_setsv(*hv_fetch(data, "_r",   2, 1), newRV_inc(obj));
     sv_setiv(*hv_fetch(data, "rc",   2, 1), rc);
     sv_setpv(*hv_fetch(data, "file", 4, 1), CopFILE(PL_curcop));
     sv_setiv(*hv_fetch(data, "line", 4, 1), CopLINE(PL_curcop));
     sv_setpv(*hv_fetch(data, "func", 4, 1), func);
 
-    sv_setsv(ERRSV, sv_2mortal(sv_bless(newRV_noinc((SV*)data), stash)));
+    sv_setsv(ERRSV, sv_bless(newRV_noinc((SV*)data), stash));
     Perl_croak(aTHX_ Nullch);
 }
 


[prev in list] [next in list] [prev in thread] [next in thread] 

Configure | About | News | Add a list | Sponsored by KoreLogic