Author: stevehay
Date: Thu Jun  4 07:21:28 2015
New Revision: 1683472

URL: http://svn.apache.org/r1683472
Log:
Restore unthreaded build following r1682366

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

Modified: perl/modperl/trunk/src/modules/perl/modperl_error.h
URL: 
http://svn.apache.org/viewvc/perl/modperl/trunk/src/modules/perl/modperl_error.h?rev=1683472&r1=1683471&r2=1683472&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/modperl_error.h (original)
+++ perl/modperl/trunk/src/modules/perl/modperl_error.h Thu Jun  4 07:21:28 2015
@@ -37,6 +37,7 @@ char *modperl_error_strerror(pTHX_ apr_s
 
 void modperl_croak(pTHX_ apr_status_t rc, const char* func);
 
+#ifdef USE_ITHREADS
 #define MP_PUTBACK_IF_USED() STMT_START                                 \
     {                                                                   \
         modperl_interp_t *interp = modperl_thx_interp_get(aTHX);        \
@@ -44,6 +45,9 @@ void modperl_croak(pTHX_ apr_status_t rc
             modperl_interp_unselect(interp);                            \
         }                                                               \
     } STMT_END
+#else
+#define MP_PUTBACK_IF_USED() NOOP
+#endif
 
 #define MP_CROAK_PUTBACK(rc, func) STMT_START                           \
     {                                                                   \


Reply via email to