aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/f95-lang.c
diff options
context:
space:
mode:
authorJoseph Myers <joseph@codesourcery.com>2004-11-25 11:13:38 +0000
committerJoseph Myers <jsm28@gcc.gnu.org>2004-11-25 11:13:38 +0000
commit597cdf4f4354fce6b418f8d628a8a0f5ea778e34 (patch)
tree67160e01dfbb1e6dc24efedebabe3742b5e5cbe4 /gcc/fortran/f95-lang.c
parentcc175e7c89539b0b55ef73c0ba9c7a6e062cc0d4 (diff)
downloadgcc-597cdf4f4354fce6b418f8d628a8a0f5ea778e34.zip
gcc-597cdf4f4354fce6b418f8d628a8a0f5ea778e34.tar.gz
gcc-597cdf4f4354fce6b418f8d628a8a0f5ea778e34.tar.bz2
darwin.h (SUBTARGET_OVERRIDE_OPTIONS): Use %qs instead of `%s' in diagnostic.
* config/rs6000/darwin.h (SUBTARGET_OVERRIDE_OPTIONS): Use %qs instead of `%s' in diagnostic. cp: * g++spec.c, lex.c: Avoid ` as left quote in diagnostics. fortran: * f95-lang.c, gfortranspec.c, trans-decl.c: Avoid ` as left quote in diagnostics. java: * gjavah.c, jcf-dump.c, jv-scan.c, jvspec.c: Avoid ` as left quote in diagnostics. From-SVN: r91282
Diffstat (limited to 'gcc/fortran/f95-lang.c')
-rw-r--r--gcc/fortran/f95-lang.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c
index 2ccca09..f32b786 100644
--- a/gcc/fortran/f95-lang.c
+++ b/gcc/fortran/f95-lang.c
@@ -620,18 +620,18 @@ gfc_mark_addressable (tree exp)
if (TREE_PUBLIC (x))
{
error
- ("global register variable `%s' used in nested function",
+ ("global register variable %qs used in nested function",
IDENTIFIER_POINTER (DECL_NAME (x)));
return false;
}
- pedwarn ("register variable `%s' used in nested function",
+ pedwarn ("register variable %qs used in nested function",
IDENTIFIER_POINTER (DECL_NAME (x)));
}
else if (DECL_REGISTER (x) && !TREE_ADDRESSABLE (x))
{
if (TREE_PUBLIC (x))
{
- error ("address of global register variable `%s' requested",
+ error ("address of global register variable %qs requested",
IDENTIFIER_POINTER (DECL_NAME (x)));
return true;
}
@@ -649,7 +649,7 @@ gfc_mark_addressable (tree exp)
}
#endif
- pedwarn ("address of register variable `%s' requested",
+ pedwarn ("address of register variable %qs requested",
IDENTIFIER_POINTER (DECL_NAME (x)));
}