aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran
diff options
context:
space:
mode:
authorBrooks Moses <brooks.moses@codesourcery.com>2006-11-05 00:28:08 +0000
committerBrooks Moses <brooks@gcc.gnu.org>2006-11-04 16:28:08 -0800
commitcb60c134e23d6c8c013ad89a4c1cb6e28cac94b6 (patch)
tree1f1e4086161fd949b74b1ce6d0ee23f9e1a5b41b /gcc/fortran
parent487288827473946bc53390c4a64ef61ab558577c (diff)
downloadgcc-cb60c134e23d6c8c013ad89a4c1cb6e28cac94b6.zip
gcc-cb60c134e23d6c8c013ad89a4c1cb6e28cac94b6.tar.gz
gcc-cb60c134e23d6c8c013ad89a4c1cb6e28cac94b6.tar.bz2
error.c (show_locus): Add trailing colon in error messages.
* fortran/error.c (show_locus): Add trailing colon in error messages. (error_print): Avoid leading space in error lines. * testsuite/lib/gfortran-dg.exp (gfortran-dg-test): Adjust pattern for matching error messages. From-SVN: r118491
Diffstat (limited to 'gcc/fortran')
-rw-r--r--gcc/fortran/ChangeLog5
-rw-r--r--gcc/fortran/error.c5
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;