2011-07-15 Daniel Carrera <dcarrera@gmail.com>

	* caf/mpi.c (caf_runtime_error): Change fprintf to vfprintf.
	* caf/single.c (caf_runtime_error): Ditto.

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

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 689d8a7..4db1e20 100644 (file)
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,8 @@
+2011-07-15  Daniel Carrera  <dcarrera@gmail.com>
+
+       * caf/mpi.c (caf_runtime_error): Change fprintf to vfprintf.
+       * caf/single.c (caf_runtime_error): Ditto.
+
 2011-07-14  Daniel Carrera  <dcarrera@gmail.com>
 
        * caf/single.c:  Include stdarg.h header.

diff --git a/libgfortran/caf/mpi.c b/libgfortran/caf/mpi.c
index 4bfcbb5..ea4c0f0 100644 (file)
--- a/libgfortran/caf/mpi.c
+++ b/libgfortran/caf/mpi.c
@@ -54,7 +54,7 @@ caf_runtime_error (const char *message, ...)
   va_list ap;
   fprintf (stderr, "Fortran runtime error on image %d: ", caf_this_image);
   va_start (ap, message);
-  fprintf (stderr, message, ap);
+  vfprintf (stderr, message, ap);
   va_end (ap);
   fprintf (stderr, "\n");
 

diff --git a/libgfortran/caf/single.c b/libgfortran/caf/single.c
index 2258f2f..09cc62f 100644 (file)
--- a/libgfortran/caf/single.c
+++ b/libgfortran/caf/single.c
@@ -48,7 +48,7 @@ caf_runtime_error (const char *message, ...)
   va_list ap;
   fprintf (stderr, "Fortran runtime error: ");
   va_start (ap, message);
-  fprintf (stderr, message, ap);
+  vfprintf (stderr, message, ap);
   va_end (ap);
   fprintf (stderr, "\n");