This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [Patch, fortran] PR29389 and PR33850 - uses for expression traversal


Summary of the changes I have applied to the original patch:

[ibook-dhum] gcc/gcc-4.3-work% diff -u ../_gcc_clean/gcc/fortran/match.c gcc/fortran/match.c
--- ../_gcc_clean/gcc/fortran/match.c   2007-11-25 23:34:58.000000000 +0100
+++ gcc/fortran/match.c 2007-11-27 20:08:16.000000000 +0100
...
 static bool
-recursive_stmt_fcn (gfc_expr *e, gfc_symbol *sym)
+check_stmt_fcn (gfc_expr *e, gfc_symbol *sym, int *f ATTRIBUTE_UNUSED)
 {
-  gfc_actual_arglist *arg;
-  gfc_ref *ref;
-  int i;
^^^^^^ removed the three lines
 
   if (e == NULL)
...
-  return false;
+static bool
+recursive_stmt_fcn (gfc_expr *e, gfc_symbol *sym)
+{
+  return gfc_traverse_expr (e, sym, check_stmt_fcn, 0);
   ^^^^^^ added return
 }

[ibook-dhum] gcc/gcc-4.3-work% diff -u ../_gcc_clean/gcc/fortran/resolve.c gcc/fortran/resolve.c
--- ../_gcc_clean/gcc/fortran/resolve.c 2007-11-25 23:34:58.000000000 +0100
+++ gcc/fortran/resolve.c       2007-11-27 17:03:43.000000000 +0100
...
+static bool
+impure_stmt_fcn (gfc_expr *e, gfc_symbol *sym,
+                int *f ATTRIBUTE_UNUSED)
+{
+  const char *name;
   ^^^^^ added const
+
...

with these changes the build went fine and the only
regression was gfortran.dg/assign_10.f90 with -m64.

Dominique


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]