Skip to content

R
riscv-gcc-1
Commit e8f35d4d by Steve Ellcey Committed by Steve Ellcey
Options

* trans-types.c (MAX_REAL_KINDS): Increase from 4 to 5. 

From-SVN: r102034
parent 704b6cb5
Showing with 5 additions and 1 deletions
gcc/fortran/ChangeLog
2005-07-14 Steve Ellcey <sje@cup.hp.com>
* trans-types.c (MAX_REAL_KINDS): Increase from 4 to 5.
2005-07-14 Jakub Jelinek <jakub@redhat.com> 2005-07-14 Jakub Jelinek <jakub@redhat.com>
* gfortran.h (MAX_ERROR_MESSAGE): Remove. * gfortran.h (MAX_ERROR_MESSAGE): Remove.
......
gcc/fortran/trans-types.c
...@@ -70,7 +70,7 @@ gfc_logical_info gfc_logical_kinds[MAX_INT_KINDS + 1]; ...@@ -70,7 +70,7 @@ gfc_logical_info gfc_logical_kinds[MAX_INT_KINDS + 1];
static GTY(()) tree gfc_integer_types[MAX_INT_KINDS + 1]; static GTY(()) tree gfc_integer_types[MAX_INT_KINDS + 1];
static GTY(()) tree gfc_logical_types[MAX_INT_KINDS + 1]; static GTY(()) tree gfc_logical_types[MAX_INT_KINDS + 1];
#define MAX_REAL_KINDS 4 #define MAX_REAL_KINDS 5
gfc_real_info gfc_real_kinds[MAX_REAL_KINDS + 1]; gfc_real_info gfc_real_kinds[MAX_REAL_KINDS + 1];
static GTY(()) tree gfc_real_types[MAX_REAL_KINDS + 1]; static GTY(()) tree gfc_real_types[MAX_REAL_KINDS + 1];
static GTY(()) tree gfc_complex_types[MAX_REAL_KINDS + 1]; static GTY(()) tree gfc_complex_types[MAX_REAL_KINDS + 1];
......
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