From 2f603cf0eb135bf67ff0bb570452df725a43c9ce Mon Sep 17 00:00:00 2001
From: burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Thu, 7 Dec 2006 09:15:41 +0000
Subject: [PATCH] 2006-12-06  Tobias Burnus  <burnus@net-b.de>

       PR fortran/29711
       * error.c (error_print): Fix handling of printf-style position specifiers
         of the form "%3$d"



git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@119609 138bc75d-0d04-0410-961f-82ee72b054a4
---
 gcc/fortran/ChangeLog | 6 ++++++
 gcc/fortran/error.c   | 1 +
 2 files changed, 7 insertions(+)

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 34ea1e5e17a5..95ce73f33758 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2006-12-06  Tobias Burnus  <burnus@net-b.de>
+
+	PR fortran/29711
+	* error.c (error_print): Fix handling of printf-style position specifiers
+	  of the form "%3$d"
+
 2006-12-05  Paul Thomas  <pault@gcc.gnu.org>
 
 	PR fortran/30003
diff --git a/gcc/fortran/error.c b/gcc/fortran/error.c
index d92fd82004b1..fd8f0bb3bc06 100644
--- a/gcc/fortran/error.c
+++ b/gcc/fortran/error.c
@@ -549,6 +549,7 @@ error_print (const char *type, const char *format0, va_list argp)
 	{
 	  /* This is a position specifier.  See comment above.  */
 	  while (ISDIGIT(*format))
+	    format++;
 	    
 	  /* Skip over the dollar sign.  */
 	  format++;
-- 
GitLab