From: aldot <aldot@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Sat, 14 Apr 2007 18:43:20 +0000 (+0000)
Subject: +2007-04-14  Bernhard Fischer
X-Git-Tag: upstream/4.9.2~49202
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=e558af2945cb5bbc3890a0dd9e1d825328d13eec;p=platform%2Fupstream%2Flinaro-gcc.git

+2007-04-14  Bernhard Fischer

	* primary.c: Commentary typo fix; Add question about redundant (?)
	set.
	* ChangeLog: Fix formatting of previous ChangeLog entry which did not
	obey "'name"  <name@there.tdl>' convention.


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

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index cd70c92..3ec7430 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,4 +1,9 @@
-2007-04-14 Paul Thomas <pault@gcc.gnu.org>
+2007-04-14  Bernhard Fischer  <aldot@gcc.gnu.org>
+
+	* primary.c: Commentary typo fix; Add question about redundant (?)
+	set.
+
+2007-04-14  Paul Thomas  <pault@gcc.gnu.org>
 
 	PR fortran/29507
 	PR fortran/31404
diff --git a/gcc/fortran/primary.c b/gcc/fortran/primary.c
index e31e1c5..9e27edc 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;