aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/seh_init.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-04-10 15:20:52 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-10 15:20:52 +0200
commit550f4135fd793241e55fb66d8e267b7c2f7478b6 (patch)
tree309d701a8f02c317380ed09fb46ab8e38d5c2cba /gcc/ada/seh_init.c
parentb8063c9899922632bb7f29508bfd0e532b48f7b9 (diff)
downloadgcc-550f4135fd793241e55fb66d8e267b7c2f7478b6.zip
gcc-550f4135fd793241e55fb66d8e267b7c2f7478b6.tar.gz
gcc-550f4135fd793241e55fb66d8e267b7c2f7478b6.tar.bz2
[multiple changes]
2009-04-10 Thomas Quinot <quinot@adacore.com> * xsnamest.adb: Use XUtil to have uniform line endings (UNIX style) in generated files on all platforms. 2009-04-10 Robert Dewar <dewar@adacore.com> * sem_aux.adb: Minor reformatting 2009-04-10 Ed Schonberg <schonberg@adacore.com> * sem_ch3.adb (Access_Definition): Handle properly the case of a protected function with formals that returns an anonymous access type. 2009-04-10 Thomas Quinot <quinot@adacore.com> * sem_disp.adb: Minor reformatting 2009-04-10 Vasiliy Fofanov <fofanov@adacore.com> * seh_init.c: Do not use the 32-bit specific implementation of __gnat_install_SEH_handler on 64-bit Windows target (64-bit specific version TBD). 2009-04-10 Jose Ruiz <ruiz@adacore.com> * mlib-tgt-specific-xi.adb (Get_Target_Prefix): Target_Name may contain a '/' at the end so we better use the complete target name to determine whether it is a PowerPC 55xx target. From-SVN: r145898
Diffstat (limited to 'gcc/ada/seh_init.c')
-rw-r--r--gcc/ada/seh_init.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/seh_init.c b/gcc/ada/seh_init.c
index def5af9..2bc3d23 100644
--- a/gcc/ada/seh_init.c
+++ b/gcc/ada/seh_init.c
@@ -59,7 +59,7 @@ extern struct Exception_Data _abort_signal;
extern void Raise_From_Signal_Handler (struct Exception_Data *, const char *);
-#ifdef _WIN32
+#if defined (_WIN32) && !defined (_WIN64)
#include <windows.h>
#include <excpt.h>
@@ -224,7 +224,7 @@ __gnat_install_SEH_handler (void *ER)
asm ("mov %ecx,%fs:(0)");
}
-#else /* _WIN32 */
+#else /* defined (_WIN32) && !defined (_WIN64) */
/* For all non Windows targets we provide a dummy SEH install handler. */
void __gnat_install_SEH_handler (void *eh ATTRIBUTE_UNUSED)
{