diff options
author | Brooks Moses <brooks.moses@codesourcery.com> | 2006-11-16 03:05:28 +0000 |
---|---|---|
committer | Brooks Moses <brooks@gcc.gnu.org> | 2006-11-15 19:05:28 -0800 |
commit | e25a0da328d0e998674c670724d5fb361f81ebae (patch) | |
tree | d6fed4e42fc794f83d5aac91cc3162c7af15dc86 /gcc/fortran/data.c | |
parent | 10612ddf52a0ff87a4d044be62de463dc0730b9a (diff) | |
download | gcc-e25a0da328d0e998674c670724d5fb361f81ebae.zip gcc-e25a0da328d0e998674c670724d5fb361f81ebae.tar.gz gcc-e25a0da328d0e998674c670724d5fb361f81ebae.tar.bz2 |
data.c: Remove trailing periods from error messages.
* data.c: Remove trailing periods from error messages.
* decl.c: Likewise.
* expr.c: Likewise.
* io.c: Likewise.
* match.c: Likewise.
* module.c: Likewise.
* options.c: Likewise.
* resolve.c: Likewise.
* symbol.c: Likewise.
* trans-io.c: Likewise.
From-SVN: r118880
Diffstat (limited to 'gcc/fortran/data.c')
-rw-r--r-- | gcc/fortran/data.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/data.c b/gcc/fortran/data.c index 5af3bd77..a7a04c6 100644 --- a/gcc/fortran/data.c +++ b/gcc/fortran/data.c @@ -61,7 +61,7 @@ get_array_index (gfc_array_ref * ar, mpz_t * offset) if ((gfc_is_constant_expr (ar->as->lower[i]) == 0) || (gfc_is_constant_expr (ar->as->upper[i]) == 0) || (gfc_is_constant_expr (e) == 0)) - gfc_error ("non-constant array in DATA statement %L.", &ar->where); + gfc_error ("non-constant array in DATA statement %L", &ar->where); mpz_set (tmp, e->value.integer); mpz_sub (tmp, tmp, ar->as->lower[i]->value.integer); mpz_mul (tmp, tmp, delta); |