2005-02-13 Andrew Pinski <pinskia@physics.uc.edu>

        PR ada/19942
        * utils.c (gnat_type_for_mode): Return null instead of ICE because we asked
        for an unknown mode.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@94989 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index eb7fd06..a1bab75 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,9 @@
+2005-02-13  Andrew Pinski  <pinskia@physics.uc.edu>
+
+       PR ada/19942
+       * utils.c (gnat_type_for_mode): Return null instead of ICE because we asked
+       for an unknown mode.
+
 2005-02-12  Richard Henderson  <rth@redhat.com>
 
        * utils.c (gnat_type_for_mode): Return NULL for COMPLEX modes;

diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c
index 0ba7381..6b44189 100644 (file)
--- a/gcc/ada/utils.c
+++ b/gcc/ada/utils.c
@@ -1835,7 +1835,7 @@ gnat_type_for_mode (enum machine_mode mode, int unsignedp)
   else if (SCALAR_INT_MODE_P (mode))
     return gnat_type_for_size (GET_MODE_BITSIZE (mode), unsignedp);
   else
-    gcc_unreachable ();
+    return NULL_TREE;
 }
 
 /* Return the unsigned version of a TYPE_NODE, a scalar type.  */