perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From go...@apache.org
Subject svn commit: r1638259 - /perl/modperl/trunk/src/modules/perl/modperl_interp.h
Date Tue, 11 Nov 2014 18:58:12 GMT
Author: gozer
Date: Tue Nov 11 18:58:12 2014
New Revision: 1638259

URL: http://svn.apache.org/r1638259
Log:
Silence 2 warnings when using -Wall -Werrror for edge cases where we'd fail
to allocate an interpreter. At that point, we are pretty much dead anyways.


Modified:
    perl/modperl/trunk/src/modules/perl/modperl_interp.h

Modified: perl/modperl/trunk/src/modules/perl/modperl_interp.h
URL: http://svn.apache.org/viewvc/perl/modperl/trunk/src/modules/perl/modperl_interp.h?rev=1638259&r1=1638258&r2=1638259&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/modperl_interp.h (original)
+++ perl/modperl/trunk/src/modules/perl/modperl_interp.h Tue Nov 11 18:58:12 2014
@@ -63,6 +63,7 @@ modperl_interp_t *modperl_interp_select(
         aTHX = interp->perl;                                            \
     }                                                                   \
     else {                                                              \
+        aTHX = NULL;                                                    \
         MP_TRACE_i(MP_FUNC, "  --> failed");                            \
     }                                                                   \
     NOOP
@@ -80,6 +81,7 @@ modperl_interp_t *modperl_interp_select(
         aTHX = interp->perl;                                            \
     }                                                                   \
     else {                                                              \
+        aTHX = NULL;                                                    \
         MP_TRACE_i(MP_FUNC, "  --> failed");                            \
     }                                                                   \
     NOOP



Mime
View raw message