aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/fortran/ChangeLog6
-rw-r--r--gcc/fortran/trans-io.c4
2 files changed, 8 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 1a17c51..79571fd 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2007-07-27 Janne Blomqvist <jb@gcc.gnu.org>
+
+ * trans-io.c (gfc_build_io_library_fndecls): Change to use
+ gfc_array_index_type for array descriptor triplets instead of
+ gfc_int4_type_node.
+
2007-07-26 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/32899
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);
}