diff options
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/error.c | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 64d3baf..6cc6b20 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2006-11-04 Brooks Moses <brooks.moses@codesourcery.com> + + * error.c (show_locus): Add trailing colon in error messages. + (error_print): Avoid leading space in error lines. + 2006-11-04 Francois-Xavier Coudert <coudert@clipper.ens.fr> PR fortran/29713 diff --git a/gcc/fortran/error.c b/gcc/fortran/error.c index c4ef9d6..e532830 100644 --- a/gcc/fortran/error.c +++ b/gcc/fortran/error.c @@ -134,7 +134,7 @@ show_locus (int offset, locus * loc) lb = loc->lb; f = lb->file; - error_printf ("%s:%d\n", f->filename, + error_printf ("%s:%d:\n", f->filename, #ifdef USE_MAPPED_LOCATION LOCATION_LINE (lb->location) #else @@ -380,7 +380,8 @@ error_print (const char *type, const char *format0, va_list argp) if (have_l1) show_loci (l1, l2); error_string (type); - error_char (' '); + if (*type) + error_char (' '); have_l1 = 0; format = format0; |
