diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index cd70c921c14f..3ec7430d6ac1 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,4 +1,9 @@ -2007-04-14 Paul Thomas +2007-04-14 Bernhard Fischer + + * primary.c: Commentary typo fix; Add question about redundant (?) + set. + +2007-04-14 Paul Thomas PR fortran/29507 PR fortran/31404 diff --git a/gcc/fortran/primary.c b/gcc/fortran/primary.c index e31e1c5dbfd3..9e27edc2f395 100644 --- a/gcc/fortran/primary.c +++ b/gcc/fortran/primary.c @@ -1516,7 +1516,7 @@ cleanup: the opening parenthesis to the closing parenthesis. The argument list is assumed to allow keyword arguments because we don't know if the symbol associated with the procedure has an implicit interface - or not. We make sure keywords are unique. If SUB_FLAG is set, + or not. We make sure keywords are unique. If sub_flag is set, we're matching the argument list of a subroutine. */ match @@ -2233,6 +2233,7 @@ gfc_match_rvalue (gfc_expr **result) break; } + /*FIXME:??? match_varspec does set this for us: */ e->ts = sym->ts; m = match_varspec (e, 0); break;