re PR ada/52123 (gcc bootstrap with ada fails on mingw target)

2013-02-14  Rainer Emrich  <rainer@emrich-ebersheim.de>

        PR target/52123
        * tracebak.c: Cast from pointer via FARPROC.

From-SVN: r196051

gcc/ada/ChangeLog

+2013-02-14  Rainer Emrich  <rainer@emrich-ebersheim.de>
+
+	PR target/52123
+	* tracebak.c: Cast from pointer via FARPROC.
+
 2013-02-07  Simon Wright  <simon@pushface.org>
 
 	PR target/50678

gcc/ada/tracebak.c

@@ -415,7 +415,7 @@ struct layout
 
 #if defined (__WIN32)
 #include <windows.h>
-#define IS_BAD_PTR(ptr) (IsBadCodePtr((void *)ptr))
+#define IS_BAD_PTR(ptr) (IsBadCodePtr((FARPROC)ptr))
 #elif defined (sun)
 #define IS_BAD_PTR(ptr) ((unsigned long)ptr == -1UL)
 #else