diff options
| author | Daniel Carrera <dcarrera@gmail.com> | 2011-07-15 22:39:03 +0000 |
|---|---|---|
| committer | Daniel Carrera <dcarrera@gcc.gnu.org> | 2011-07-15 22:39:03 +0000 |
| commit | c0f1579204b7e7eed3fff3bfa174c53032f420a4 (patch) | |
| tree | 6fd0bd9b87437438ceb135d7ab9f7d998cf2e706 | |
| parent | aeb4926a2d295bbe089f74a7881d13d3afae2671 (diff) | |
| download | gcc-c0f1579204b7e7eed3fff3bfa174c53032f420a4.zip gcc-c0f1579204b7e7eed3fff3bfa174c53032f420a4.tar.gz gcc-c0f1579204b7e7eed3fff3bfa174c53032f420a4.tar.bz2 | |
mpi.c (caf_runtime_error): Change fprintf to vfprintf.
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.
From-SVN: r176340
| -rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
| -rw-r--r-- | libgfortran/caf/mpi.c | 2 | ||||
| -rw-r--r-- | libgfortran/caf/single.c | 2 |
3 files changed, 7 insertions, 2 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 689d8a7..4db1e20 100644 --- 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 --- 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 --- 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"); |