dyndebug_init1(seh, "SEH");
dyndebug_init1(misc, "MISC");
dyndebug_init1(pagefaults, "PAGEFAULTS");
+ dyndebug_init1(io, "IO");
+ dyndebug_init1(runtime_link, "RUNTIME_LINK");
int n_output_flags = n;
dyndebug_init1(backtrace_when_lost, "BACKTRACE_WHEN_LOST");
{
#ifdef LISP_FEATURE_WIN32
DWORD lastError = GetLastError();
-#else
- int original_errno = errno;
#endif
+ int original_errno = errno;
QSHOW_BLOCK;
#ifdef LISP_FEATURE_WIN32
SetLastError(lastError);
-#else
- errno = original_errno;
#endif
+ errno = original_errno;
}
/* Translate the rather awkward syntax
#ifdef LISP_FEATURE_GENCGC
#include "gencgc-alloc-region.h" /* genesis/thread.h needs this */
#endif
+#if defined(LISP_FEATURE_WIN32)
+# include "win32-thread-private-events.h" /* genesis/thread.h needs this */
+#endif
#include "genesis/static-symbols.h"
#include "genesis/primitive-objects.h"
#include "genesis/static-symbols.h"