From: Steve Hay <SteveHay@planit.com>
Date: Fri, 8 Jun 2007 08:36:05 +0000 (+0000)
Subject: Move win32_create_message_window() out of #ifdef HAVE_INTERP_INTERN
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a33ef3f0a6d2ef2c922989e71af9ce07d6f2d25d;p=p5sagit%2Fp5-mst-13.2.git

Move win32_create_message_window() out of #ifdef HAVE_INTERP_INTERN
section, where it didn't belong. (That section should (currently)
only contain sys_intern_init(), sys_intern_clear() and
sys_intern_dup() and related functionality such as
win32_csighandler().)

p4raw-id: //depot/perl@31354
---

diff --git a/win32/win32.c b/win32/win32.c
index 1c6c17e..a1c0d46 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -4844,19 +4844,6 @@ win32_signal(int sig, Sighandler_t subcode)
     }
 }
 
-
-#ifdef HAVE_INTERP_INTERN
-
-static void
-win32_csighandler(int sig)
-{
-#if 0
-    dTHXa(PERL_GET_SIG_CONTEXT);
-    Perl_warn(aTHX_ "Got signal %d",sig);
-#endif
-    /* Does nothing */
-}
-
 HWND
 win32_create_message_window()
 {
@@ -4874,6 +4861,18 @@ win32_create_message_window()
     return CreateWindow("Static", "", 0, 0, 0, 0, 0, HWND_MESSAGE, 0, 0, NULL);
 }
 
+#ifdef HAVE_INTERP_INTERN
+
+static void
+win32_csighandler(int sig)
+{
+#if 0
+    dTHXa(PERL_GET_SIG_CONTEXT);
+    Perl_warn(aTHX_ "Got signal %d",sig);
+#endif
+    /* Does nothing */
+}
+
 #if defined(__MINGW32__) && defined(__cplusplus)
 #define CAST_HWND__(x) (HWND__*)(x)
 #else