diff options
Diffstat (limited to 'gcc/fortran/trans-io.c')
| -rw-r--r-- | gcc/fortran/trans-io.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/trans-io.c b/gcc/fortran/trans-io.c index 4b70871..adc7bc1 100644 --- a/gcc/fortran/trans-io.c +++ b/gcc/fortran/trans-io.c @@ -417,8 +417,8 @@ gfc_build_io_library_fndecls (void) iocall[IOCALL_SET_NML_VAL_DIM] = gfc_build_library_function_decl (get_identifier (PREFIX("st_set_nml_var_dim")), void_type_node, 5, dt_parm_type, - gfc_int4_type_node, gfc_int4_type_node, - gfc_int4_type_node, gfc_int4_type_node); + gfc_int4_type_node, gfc_array_index_type, + gfc_array_index_type, gfc_array_index_type); } |