Restore DEBUGGING build with USE_ITHREADS on Win32, broken in 9399a70c62

diff --git a/win32/win32.c b/win32/win32.c
index f9e8d97..4112db8 100644 (file)
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -2858,6 +2858,7 @@ win32_tmpfd(void)
            if (fh != INVALID_HANDLE_VALUE) {
                int fd = win32_open_osfhandle((intptr_t)fh, 0);
                if (fd >= 0) {
+                   PERL_DEB(dTHX);
                    DEBUG_p(PerlIO_printf(Perl_debug_log,
                                          "Created tmpfile=%s\n",filename));
                    return fd;
@@ -3349,6 +3350,7 @@ win32_chmod(const char *path, int mode)
 static char *
 create_command_line(char *cname, STRLEN clen, const char * const *args)
 {
+    PERL_DEB(dTHX);
     int index, argc;
     char *cmd, *ptr;
     const char *arg;