OSDN Git Service

* trans-types.c (gfc_type_for_size): Return wider type
authorjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 27 Sep 2011 19:17:31 +0000 (19:17 +0000)
committerjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 27 Sep 2011 19:17:31 +0000 (19:17 +0000)
commitb04941de6611e7cade52181c61455272415beadf
tree8fe351ceea5fb4aa1c1e79248400f0b0802c3b84
parentbd931e3af88cac2fa6979c997a2a521aeac7fcae
* trans-types.c (gfc_type_for_size): Return wider type
if no suitable narrower type has been found.
(gfc_type_for_mode): Return NULL_TREE if gfc_type_for_size
returned type doesn't have expected TYPE_MODE.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@179290 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-types.c