[gcc] GCC 4.5.0=>4.5.1

gcc/gcc/fortran/matchexp.c

Index: gcc/gcc/fortran/matchexp.c
diff --git a/gcc/gcc/fortran/matchexp.c b/gcc/gcc/fortran/matchexp.c
index f7573655316d50aa7f7514336a4ba25aed4b56c7..f66623f82d0bfd15676bb3165f725447e5c4e1f1 100644
--- a/gcc/gcc/fortran/matchexp.c
+++ b/gcc/gcc/fortran/matchexp.c
@@ -1,5 +1,5 @@
 /* Expression parser.
-   Copyright (C) 2000, 2001, 2002, 2004, 2005, 2006, 2007, 2008
+   Copyright (C) 2000, 2001, 2002, 2004, 2005, 2006, 2007, 2008, 2009
    Free Software Foundation, Inc.
    Contributed by Andy Vaught
 
@@ -149,7 +149,6 @@ match_primary (gfc_expr **result)
 {
   match m;
   gfc_expr *e;
-  locus where;
 
   m = gfc_match_literal_constant (result, 0);
   if (m != MATCH_NO)
@@ -164,8 +163,6 @@ match_primary (gfc_expr **result)
     return m;
 
   /* Match an expression in parentheses.  */
-  where = gfc_current_locus;
-
   if (gfc_match_char ('(') != MATCH_YES)
     return MATCH_NO;