From: Steve Hay <SteveHay@planit.com>
Date: Wed, 4 Jan 2006 11:10:36 +0000 (+0000)
Subject: Make Borland and MinGW happy with change 26379
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=777c9af2106eb77e4a681db698068dc0e4785155;p=p5sagit%2Fp5-mst-13.2.git

Make Borland and MinGW happy with change 26379

(They both complain "invalid conversion from `void*' to `HWND__*'"
otherwise)

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

diff --git a/win32/perlhost.h b/win32/perlhost.h
index e2227e3..ff90ca9 100644
--- a/win32/perlhost.h
+++ b/win32/perlhost.h
@@ -1837,7 +1837,7 @@ PerlProcFork(struct IPerlProc* piPerl)
         w32_message_hwnd = win32_create_message_window();
     new_perl->Isys_intern.message_hwnd = w32_message_hwnd;
     w32_pseudo_child_message_hwnds[w32_num_pseudo_children] =
-        (w32_message_hwnd == NULL) ? NULL : INVALID_HANDLE_VALUE;
+        (w32_message_hwnd == NULL) ? (HWND)NULL : (HWND)INVALID_HANDLE_VALUE;
 #    ifdef USE_RTL_THREAD_API
     handle = (HANDLE)_beginthreadex((void*)NULL, 0, win32_start_child,
 				    (void*)new_perl, 0, (unsigned*)&id);