* trans-types.c (gfc_type_for_mode): Return NULL for unknown modes.

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

diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c
index 7159c50..610449f 100644 (file)
--- a/gcc/fortran/trans-types.c
+++ b/gcc/fortran/trans-types.c
@@ -1625,7 +1625,7 @@ gfc_type_for_mode (enum machine_mode mode, int unsignedp)
       return NULL_TREE;
     }
   else
-    return NULL;
+    return NULL_TREE;
 
   for (i = 0; i <= MAX_REAL_KINDS; ++i)
     {