diff options
author | Ralf Wildenhues <Ralf.Wildenhues@gmx.de> | 2008-07-21 19:17:08 +0000 |
---|---|---|
committer | Ralf Wildenhues <rwild@gcc.gnu.org> | 2008-07-21 19:17:08 +0000 |
commit | df2fba9e343385222745d9e99cbaae29026a263d (patch) | |
tree | b4aa45858530c5447d03da6b7e211c2d414973d2 /gcc/fortran/symbol.c | |
parent | 2e7628842865d7de2eeb170af79f0fc38c057d9c (diff) | |
download | gcc-df2fba9e343385222745d9e99cbaae29026a263d.zip gcc-df2fba9e343385222745d9e99cbaae29026a263d.tar.gz gcc-df2fba9e343385222745d9e99cbaae29026a263d.tar.bz2 |
fmt_g0_3.f08: Fix typo in expected error message.
gcc/testsuite/
* gfortran.dg/fmt_g0_3.f08: Fix typo in expected error message.
gcc/fortran/
* expr.c (gfc_check_pointer_assign): Fix typo in string.
* io.c (check_format): Fix typo in string. Fix comment typos.
* parse.c (gfc_global_used): Likewise.
* resolve.c (resolve_allocate_expr): Likewise.
* symbol.c (gfc_set_default_type): Likewise.
* arith.c: Fix typos in comments.
* array.c: Likewise.
* data.c: Likewise.
* decl.c: Likewise.
* dependency.c: Likewise.
* f95-lang.c: Likewise.
* gfortran.h: Likewise.
* matchexp.c: Likewise.
* module.c: Likewise.
* primary.c: Likewise.
* scanner.c: Likewise.
* trans-array.c: Likewise.
* trans-common.c: Likewise.
* trans-decl.c: Likewise.
* trans-expr.c: Likewise.
* trans-intrinsic.c: Likewise.
* trans-types.c: Likewise.
* trans.c: Likewise.
* trans.h: Likewise.
From-SVN: r138040
Diffstat (limited to 'gcc/fortran/symbol.c')
-rw-r--r-- | gcc/fortran/symbol.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/symbol.c b/gcc/fortran/symbol.c index ca1237e..121f62e 100644 --- a/gcc/fortran/symbol.c +++ b/gcc/fortran/symbol.c @@ -272,7 +272,7 @@ gfc_set_default_type (gfc_symbol *sym, int error_flag, gfc_namespace *ns) { /* Dummy args to a BIND(C) routine may not be interoperable if they are implicitly typed. */ - gfc_warning_now ("Implicity declared variable '%s' at %L may not " + gfc_warning_now ("Implicitly declared variable '%s' at %L may not " "be C interoperable but it is a dummy argument to " "the BIND(C) procedure '%s' at %L", sym->name, &(sym->declared_at), sym->ns->proc_name->name, |