aboutsummaryrefslogtreecommitdiff
path: root/gcc/f
diff options
context:
space:
mode:
authorKaveh R. Ghazi <ghazi@caip.rutgers.edu>2002-01-02 23:18:59 +0000
committerKaveh Ghazi <ghazi@gcc.gnu.org>2002-01-02 23:18:59 +0000
commit5e65297bbb0b49c238b9543a6e730ef54c54196d (patch)
tree1b3ba80e154ddb807e8dfcaefbbd0018b015a992 /gcc/f
parent0c5d8c8236e9bbbbede3c7f45396d4f9eeaceddd (diff)
downloadgcc-5e65297bbb0b49c238b9543a6e730ef54c54196d.zip
gcc-5e65297bbb0b49c238b9543a6e730ef54c54196d.tar.gz
gcc-5e65297bbb0b49c238b9543a6e730ef54c54196d.tar.bz2
gcc.c (default_compilers): Const-ify.
* gcc.c (default_compilers): Const-ify. * mips-tdump.c (stab_names): Likewise. * mips-tfile.c (map_coff_types, map_coff_storage, map_coff_sym_type, map_coff_derived_type, stabs_symbol, pseudo_ops_t, pseudo_ops): Likewise. * protoize.c (default_include): Likewise f: * com.c (clear_binding_level): Const-ify. (ffecom_arglist_expr_): Likewise. * info.c (ffeinfo_types_): Don't needlessly zero init. * lex.c (ffelex_hash_kludge): Const-ify. java: * parse.y (src_parse_roots): Don't needlessly zero init. libiberty: * cp-demangle.c (long_options): Const-ify. * cplus-dem.c (long_options): Likewise. From-SVN: r48485
Diffstat (limited to 'gcc/f')
-rw-r--r--gcc/f/ChangeLog7
-rw-r--r--gcc/f/com.c4
-rw-r--r--gcc/f/info.c3
-rw-r--r--gcc/f/lex.c4
4 files changed, 12 insertions, 6 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index dce4853..54d0728 100644
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,3 +1,10 @@
+Wed Jan 2 18:13:11 2002 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
+
+ * com.c (clear_binding_level): Const-ify.
+ (ffecom_arglist_expr_): Likewise.
+ * info.c (ffeinfo_types_): Don't needlessly zero init.
+ * lex.c (ffelex_hash_kludge): Const-ify.
+
Sun Dec 23 10:45:09 2001 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* com.c (ffecom_gfrt_volatile_, ffecom_gfrt_complex_,
diff --git a/gcc/f/com.c b/gcc/f/com.c
index 823f18d..9abab69 100644
--- a/gcc/f/com.c
+++ b/gcc/f/com.c
@@ -563,7 +563,7 @@ static struct binding_level *global_binding_level;
/* Binding level structures are initialized by copying this one. */
-static struct binding_level clear_binding_level
+static const struct binding_level clear_binding_level
=
{NULL, NULL, NULL, NULL_BINDING_LEVEL, 0};
@@ -1283,7 +1283,7 @@ ffecom_arglist_expr_ (const char *c, ffebld expr)
tree item;
bool ptr = FALSE;
tree wanted = NULL_TREE;
- static char zed[] = "0";
+ static const char zed[] = "0";
if (c == NULL)
c = &zed[0];
diff --git a/gcc/f/info.c b/gcc/f/info.c
index b3ceef1..b632f41 100644
--- a/gcc/f/info.c
+++ b/gcc/f/info.c
@@ -98,8 +98,7 @@ static const char *const ffeinfo_where_string_[]
#include "info-w.def"
#undef FFEINFO_WHERE
};
-static ffetype ffeinfo_types_[FFEINFO_basictype][FFEINFO_kindtype]
- = { { NULL } };
+static ffetype ffeinfo_types_[FFEINFO_basictype][FFEINFO_kindtype];
/* Static functions (internal). */
diff --git a/gcc/f/lex.c b/gcc/f/lex.c
index 6169656..acbb4d3 100644
--- a/gcc/f/lex.c
+++ b/gcc/f/lex.c
@@ -3898,10 +3898,10 @@ ffelex_hash_kludge (FILE *finput)
/* If you change this constant string, you have to change whatever
code might thus be affected by it in terms of having to use
ffelex_getc_() instead of getc() in the lexers and _hash_. */
- static char match[] = "# 1 \"";
+ static const char match[] = "# 1 \"";
static int kludge[ARRAY_SIZE (match) + 1];
int c;
- char *p;
+ const char *p;
int *q;
/* Read chars as long as they match the target string.