diff options
| author | Uros Bizjak <uros@gcc.gnu.org> | 2011-07-09 19:35:44 +0200 |
|---|---|---|
| committer | Uros Bizjak <uros@gcc.gnu.org> | 2011-07-09 19:35:44 +0200 |
| commit | 4dc694b226b1d9372fc5e224495a5c303809387c (patch) | |
| tree | f1fef9e6e62c7949b4096c1d2cbda936f72d7f58 /gcc/fortran/expr.c | |
| parent | 20888def1b70428012f4163348d294cdb94ca5f8 (diff) | |
| download | gcc-4dc694b226b1d9372fc5e224495a5c303809387c.zip gcc-4dc694b226b1d9372fc5e224495a5c303809387c.tar.gz gcc-4dc694b226b1d9372fc5e224495a5c303809387c.tar.bz2 | |
re PR fortran/48926 (gfortran.dg/coarray/image_index_1.f90 -fcoarray=single -O2 (test for excess errors))
PR fortran/48926
* expr.c (gfc_get_corank): Change return value to int.
* gfortran.h (gfc_get_corank): Update function prototype.
From-SVN: r176088
Diffstat (limited to 'gcc/fortran/expr.c')
| -rw-r--r-- | gcc/fortran/expr.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/expr.c b/gcc/fortran/expr.c index 6dcfda1..6db0836 100644 --- a/gcc/fortran/expr.c +++ b/gcc/fortran/expr.c @@ -4143,7 +4143,7 @@ gfc_is_coindexed (gfc_expr *e) } -bool +int gfc_get_corank (gfc_expr *e) { int corank; |