adaint.c [...]: Remove system-specific sections of non-supported Interix target.

    gcc/ada/
	* adaint.c init.c initialize.c link.c: Remove system-specific
	sections of non-supported Interix target.

	* s-osinte-interix.ads: Removed.

From-SVN: r130175

gcc/ada/ChangeLog

+2007-11-14  Samuel Tardieu  <sam@rfc1149.net>
+
+	* adaint.c init.c initialize.c link.c: Remove system-specific
+	sections of non-supported Interix target.
+
+	* s-osinte-interix.ads: Removed.
+
 2007-11-13  Samuel Tardieu  <sam@rfc1149.net>
 
 	* a-tasatt.adb: Add a comment at the beginning of the package

gcc/ada/adaint.c

@@ -404,8 +404,7 @@ __gnat_readlink (char *path ATTRIBUTE_UNUSED,
 		 size_t bufsiz ATTRIBUTE_UNUSED)
 {
 #if defined (MSDOS) || defined (_WIN32) || defined (__EMX__) \
-  || defined (__INTERIX) || defined (VMS) \
-  || defined(__vxworks) || defined (__nucleus__)
+  || defined (VMS) || defined(__vxworks) || defined (__nucleus__)
   return -1;
 #else
   return readlink (path, buf, bufsiz);
@@ -421,8 +420,7 @@ __gnat_symlink (char *oldpath ATTRIBUTE_UNUSED,
 		char *newpath ATTRIBUTE_UNUSED)
 {
 #if defined (MSDOS) || defined (_WIN32) || defined (__EMX__) \
-  || defined (__INTERIX) || defined (VMS) \
-  || defined(__vxworks) || defined (__nucleus__)
+  || defined (VMS) || defined(__vxworks) || defined (__nucleus__)
   return -1;
 #else
   return symlink (oldpath, newpath);

gcc/ada/init.c

@@ -737,73 +737,6 @@ __gnat_install_handler (void)
   __gnat_handler_installed = 1;
 }
 
-/*******************/
-/* Interix Section */
-/*******************/
-
-#elif defined (__INTERIX)
-
-#include <signal.h>
-
-static void __gnat_error_handler (int);
-
-static void
-__gnat_error_handler (int sig)
-{
-  struct Exception_Data *exception;
-  const char *msg;
-
-  switch (sig)
-    {
-    case SIGSEGV:
-      exception = &storage_error;
-      msg = "stack overflow or erroneous memory access";
-      break;
-
-    case SIGBUS:
-      exception = &constraint_error;
-      msg = "SIGBUS";
-      break;
-
-    case SIGFPE:
-      exception = &constraint_error;
-      msg = "SIGFPE";
-      break;
-
-    default:
-      exception = &program_error;
-      msg = "unhandled signal";
-    }
-
-  Raise_From_Signal_Handler (exception, msg);
-}
-
-void
-__gnat_install_handler (void)
-{
-  struct sigaction act;
-
-  /* Set up signal handler to map synchronous signals to appropriate
-     exceptions.  Make sure that the handler isn't interrupted by another
-     signal that might cause a scheduling event! */
-
-  act.sa_handler = __gnat_error_handler;
-  act.sa_flags = 0;
-  sigemptyset (&act.sa_mask);
-
-  /* Handlers for signals besides SIGSEGV cause c974013 to hang */
-/*  sigaction (SIGILL,  &act, NULL); */
-/*  sigaction (SIGABRT, &act, NULL); */
-/*  sigaction (SIGFPE,  &act, NULL); */
-/*  sigaction (SIGBUS,  &act, NULL); */
-
-  /* Do not install handlers if interrupt state is "System" */
-  if (__gnat_get_interrupt_state (SIGSEGV) != 's')
-    sigaction (SIGSEGV, &act, NULL);
-
-  __gnat_handler_installed = 1;
-}
-
 /****************/
 /* IRIX Section */
 /****************/

gcc/ada/initialize.c

@@ -91,8 +91,7 @@ __gnat_initialize (void *eh)
 /* __gnat_initialize (init_float version) */
 /******************************************/
 
-#elif defined (__INTERIX) || defined (__Lynx__) || \
-      defined (__FreeBSD__) || defined(__NetBSD__)
+#elif defined (__Lynx__) || defined (__FreeBSD__) || defined(__NetBSD__)
 
 extern void __gnat_init_float (void);
 

gcc/ada/link.c

@@ -108,15 +108,6 @@ char __gnat_shared_libgnat_default = STATIC;
 unsigned char __gnat_using_gnu_linker = 1;
 const char *__gnat_object_library_extension = ".a";
 
-#elif defined (__INTERIX)
-const char *__gnat_object_file_option = "";
-const char *__gnat_run_path_option = "";
-int __gnat_link_max = 5000;
-unsigned char __gnat_objlist_file_supported = 1;
-char __gnat_shared_libgnat_default = STATIC;
-unsigned char __gnat_using_gnu_linker = 1;
-const char *__gnat_object_library_extension = ".a";
-
 #elif defined (__hpux__)
 const char *__gnat_object_file_option = "-Wl,-c,";
 const char *__gnat_run_path_option = "-Wl,+b,";