OSDN Git Service

2010-04-20 Paul Thomas <pault@gcc.gnu.org>
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 20 Apr 2010 19:07:14 +0000 (19:07 +0000)
committerMasaki Muranaka <monaka@monami-software.com>
Sun, 23 May 2010 05:34:26 +0000 (14:34 +0900)
PR fortran/43227
* resolve.c (resolve_fl_derived): If a component character
length has not been resolved, do so now.
(resolve_symbol): The same as above for a symbol character
length.
* trans-decl.c (gfc_create_module_variable): A 'length' decl is
not needed for a character valued, procedure pointer.

PR fortran/43266
* resolve.c (ensure_not_abstract_walker): If 'overriding' is
not found, return FAILURE rather than ICEing.

2010-04-20  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/43227
* gfortran.dg/proc_decl_23.f90: New test.

PR fortran/43266
* gfortran.dg/abstract_type_6.f03: New test.

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

gcc/fortran/ChangeLog
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/proc_decl_23.f90

index b9a4ebb..6663603 100644 (file)
@@ -1,3 +1,17 @@
+2010-04-20  Paul Thomas  <pault@gcc.gnu.org>
+
+       PR fortran/43227
+       * resolve.c (resolve_fl_derived): If a component character
+       length has not been resolved, do so now.
+       (resolve_symbol): The same as above for a symbol character
+       length.
+       * trans-decl.c (gfc_create_module_variable): A 'length' decl is
+       not needed for a character valued, procedure pointer.
+
+       PR fortran/43266
+       * resolve.c (ensure_not_abstract_walker): If 'overriding' is
+       not found, return FAILURE rather than ICEing.
+
 2010-04-19  Jakub Jelinek  <jakub@redhat.com>
 
        PR fortran/43339
index 01c2d92..f1396df 100644 (file)
@@ -1,3 +1,11 @@
+2010-04-20  Paul Thomas  <pault@gcc.gnu.org>
+
+       PR fortran/43227
+       * gfortran.dg/proc_decl_23.f90: New test.
+
+       PR fortran/43266
+       * gfortran.dg/abstract_type_6.f03: New test.
+
 2010-04-20  Xinliang David Li  <davidxl@google.com>
 
        * g++.dg/tree-ssa/fold-compare.C: New.
index 66cf5ff..fa50dc1 100644 (file)
@@ -41,4 +41,3 @@ end module m_string
   print *, char1 (["j","k","l"])
 end
 ! { dg-final { cleanup-tree-dump "m_string" } }
-! { dg-final { cleanup-modules "m_string" } }