expr.c (gfc_get_corank): Return 0 if input expression is not a coarray.
authorMikael Morin <mikael.morin@sfr.fr>
Fri, 7 Oct 2011 19:14:07 +0000 (21:14 +0200)
committerMikael Morin <mikael@gcc.gnu.org>
Fri, 7 Oct 2011 19:14:07 +0000 (19:14 +0000)
commit89010691e4bf2461727c91d7cfc306feed998577
tree75aee0770bc00825b7415fe469796ebed7dbc3bd
parentbb033c9adcbca5fb3dc60566e879e85d5190d696
expr.c (gfc_get_corank): Return 0 if input expression is not a coarray.

* expr.c (gfc_get_corank): Return 0 if input expression is not a
coarray.

From-SVN: r179675
gcc/fortran/ChangeLog
gcc/fortran/expr.c