Commit 4c97f95a by Paul Brook Committed by Paul Brook

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

From-SVN: r86976
parent 9f09b415
2004-08-31 Paul Brook <paul@codesourcery.com>
* trans-types.c (gfc_type_for_mode): Return NULL for unknown modes.
2004-09-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> 2004-09-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
PR fortran/15327 PR fortran/15327
......
...@@ -1625,7 +1625,7 @@ gfc_type_for_mode (enum machine_mode mode, int unsignedp) ...@@ -1625,7 +1625,7 @@ gfc_type_for_mode (enum machine_mode mode, int unsignedp)
return NULL_TREE; return NULL_TREE;
} }
else else
abort (); return NULL;
for (i = 0; i <= MAX_REAL_KINDS; ++i) for (i = 0; i <= MAX_REAL_KINDS; ++i)
{ {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment