dTHX works on its own just fine.

p4raw-id: //depot/perl@15861

diff --git a/ext/DynaLoader/dl_aix.xs b/ext/DynaLoader/dl_aix.xs
index 58dde5f..47c2e78 100644 (file)
--- a/ext/DynaLoader/dl_aix.xs
+++ b/ext/DynaLoader/dl_aix.xs
@@ -193,9 +193,7 @@ char *strerrorcat(char *str, int err) {
       strcat(str, msg);
     free(buf);
 #else
-# ifdef USE_ITHREADS
     dTHX;
-# endif
 
     if ((msg = strerror(err)) == 0)
       msg = strerror_failed;
@@ -225,9 +223,7 @@ char *strerrorcpy(char *str, int err) {
       strcpy(str, msg);
     free(buf);
 #else
-# ifdef USE_ITHREADS
     dTHX;
-#endif
 
     if ((msg = strerror(err)) == 0)
       msg = strerror_failed;