Restore unthreaded build following r1682366
git-svn-id: https://svn.apache.org/repos/asf/perl/modperl/trunk@1683472 13f79535-47bb-0310-9956-ffa450edef68
diff --git a/src/modules/perl/modperl_error.h b/src/modules/perl/modperl_error.h
index e131090..0a4d82c 100644
--- a/src/modules/perl/modperl_error.h
+++ b/src/modules/perl/modperl_error.h
@@ -37,6 +37,7 @@
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 @@
modperl_interp_unselect(interp); \
} \
} STMT_END
+#else
+#define MP_PUTBACK_IF_USED() NOOP
+#endif
#define MP_CROAK_PUTBACK(rc, func) STMT_START \
{ \