OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* trans-types.c (gfc_is_nodesc_array): Remove redundant check.

Browse Source 
From-SVN: r99621
This commit is contained in:
Tobias Schlüter 2005-05-12 20:19:37 +02:00 committed by Tobias Schlüter
parent c42a19d5e3
commit 4588b60480
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/fortran/ChangeLog
View File

@ -1,3 +1,7 @@
2005-05-12 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
* trans-types.c (gfc_is_nodesc_array): Remove redundant check.
2005-05-11 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
PR fortran/21260

3
gcc/fortran/trans-types.c
View File

@ -785,9 +785,6 @@ gfc_is_nodesc_array (gfc_symbol * sym)
if (sym->attr.result || sym->attr.function)
return 0;
if (sym->attr.pointer || sym->attr.allocatable)
return 0;
gcc_assert (sym->as->type == AS_EXPLICIT);
return 1;