[Ada] Minor consistency fix for Windows SEH

gcc/ada/

	* raise-gcc.c (__gnat_personality_seh0): Use PERSONALITY_FUNCTION.

diff --git a/gcc/ada/raise-gcc.c b/gcc/ada/raise-gcc.c
index 5c3adbdb30210d8d126b8cb002d960aa581b199f..5fdd76fdccb105190ff3c23a7d8fe8e0568814ca 100644 (file)
--- a/gcc/ada/raise-gcc.c
+++ b/gcc/ada/raise-gcc.c
@@ -1604,7 +1604,7 @@ __gnat_personality_seh0 (PEXCEPTION_RECORD ms_exc, void *this_frame,
 
   return
     _GCC_specific_handler (ms_exc, this_frame, ms_orig_context, ms_disp,
-                          __gnat_personality_imp);
+                          PERSONALITY_FUNCTION);
 }
 
 /* Define __gnat_personality_v0 for convenience */