From 6af0990300148f72170e6b92ad9dacdaabc00eaa Mon Sep 17 00:00:00 2001 From: jvdelisle Date: Tue, 2 Sep 2008 01:14:04 +0000 Subject: [PATCH] 2008-09-01 Jerry DeLisle * runtime/error.c: Fix cast for printf. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@139880 138bc75d-0d04-0410-961f-82ee72b054a4 --- libgfortran/ChangeLog | 4 ++++ libgfortran/runtime/error.c | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index f8083c8dbbd..8670d461c67 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,7 @@ +2008-09-01 Jerry DeLisle + + * runtime/error.c: Fix cast for printf. + 2008-08-30 Jerry DeLisle PR libfortran/36895 diff --git a/libgfortran/runtime/error.c b/libgfortran/runtime/error.c index 0b9c16705eb..d75eaf23832 100644 --- a/libgfortran/runtime/error.c +++ b/libgfortran/runtime/error.c @@ -199,13 +199,13 @@ show_locus (st_parameter_common *cmp) if (filename != NULL) { st_printf ("At line %d of file %s (unit = %d, file = '%s')\n", - (int) cmp->line, cmp->filename, cmp->unit, filename); + (int) cmp->line, cmp->filename, (int) cmp->unit, filename); free_mem (filename); } else { st_printf ("At line %d of file %s (unit = %d)\n", - (int) cmp->line, cmp->filename, cmp->unit); + (int) cmp->line, cmp->filename, (int) cmp->unit); } return; } -- 2.11.0