1 files changed, 0 insertions, 3 deletions
diff --git a/gcc/fortran/io.c b/gcc/fortran/io.c
index d6b64c4..9b0ee8d 100644
--- a/gcc/fortran/io.c
+++ b/gcc/fortran/io.c
@@ -4060,7 +4060,6 @@ gfc_match_wait (void)
 {
   gfc_wait *wait;
   match m;
-  locus loc;
 
   m = gfc_match_char ('(');
   if (m == MATCH_NO)
@@ -4068,8 +4067,6 @@ gfc_match_wait (void)
 
   wait = XCNEW (gfc_wait);
 
-  loc = gfc_current_locus;
-
   m = match_wait_element (wait);
   if (m == MATCH_ERROR)
     goto cleanup;