2010-04-22 Richard Guenther <rguenther@suse.de>

	PR fortran/43829
	* resolve.c (gfc_resolve_index): Wrap around ...
	(gfc_resolve_index_1): ... this.  Add parameter to allow
	any integer kind index type.
	(resolve_array_ref): Allow any integer kind for the start
	index of an array ref.

	* gfortran.dg/vector_subscript_6.f90: New testcase.
	* gfortran.dg/assign_10.f90: Adjust.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@158632 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 27dab6d..1c77717 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,12 @@
+2010-04-22  Richard Guenther  <rguenther@suse.de>
+
+       PR fortran/43829
+       * resolve.c (gfc_resolve_index): Wrap around ...
+       (gfc_resolve_index_1): ... this.  Add parameter to allow
+       any integer kind index type.
+       (resolve_array_ref): Allow any integer kind for the start
+       index of an array ref.
+

 2010-04-21  Jakub Jelinek  <jakub@redhat.com>
 
        PR fortran/43836
 2010-04-21  Jakub Jelinek  <jakub@redhat.com>
 
        PR fortran/43836

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index ce4e05c..cc55d0b 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2010-04-22  Richard Guenther  <rguenther@suse.de>
+
+       PR fortran/43829
+       * gfortran.dg/vector_subscript_6.f90: New testcase.
+       * gfortran.dg/assign_10.f90: Adjust.
+

 2010-04-21  Jakub Jelinek  <jakub@redhat.com>
 
        PR fortran/43836
 2010-04-21  Jakub Jelinek  <jakub@redhat.com>
 
        PR fortran/43836