Commit dff01034 by Kaveh R. Ghazi Committed by Kaveh Ghazi

c-aux-info.c (data_type, [...]): Qualify a char* with the `const' keyword.

        * c-aux-info.c (data_type, affix_data_type, gen_decl,
        gen_formal_list_for_type, gen_formal_list_for_func_def, gen_type):
        Qualify a char* with the `const' keyword.
        * c-common.c (declare_hidden_char_array, add_attribute, if_elt,
        declare_function_name, decl_attributes, format_char_info,
        check_format_info, binary_op_error): Likewise.
        * cexp.y (yyerror, error, pedwarn, warning, token): Likewise.
        * gcse.c (dump_hash_table): Likewise.
        * integrate.c (function_cannot_inline_p): Likewise
        * optabs.c: Include insn-config.h earlier.
        (init_libfuncs, init_integral_libfuncs, init_floating_libfuncs):
        Qualify a char* with the `const' keyword.
        * real.c (asctoe24, asctoe53, asctoe64, asctoe113, asctoe,
        asctoeg, mtherr, ereal_atof): Likewise.
        * real.h (ereal_atof): Likewise.
        * sbitmap.c (dump_sbitmap_vector): Likewise.
        * sbitmap.h (dump_sbitmap_vector): Likewise.
        * stmt.c (nesting, n_occurrences, expand_start_case): Likewise.
        * toplev.c (rest_of_compilation): Likewise.
        * tree.h (function_cannot_inline_p, expand_start_case): Likewise.

From-SVN: r25614
parent 3c2a0097
Sat Mar 6 07:49:23 1999 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* c-aux-info.c (data_type, affix_data_type, gen_decl,
gen_formal_list_for_type, gen_formal_list_for_func_def, gen_type):
Qualify a char* with the `const' keyword.
* c-common.c (declare_hidden_char_array, add_attribute, if_elt,
declare_function_name, decl_attributes, format_char_info,
check_format_info, binary_op_error): Likewise.
* cexp.y (yyerror, error, pedwarn, warning, token): Likewise.
* gcse.c (dump_hash_table): Likewise.
* integrate.c (function_cannot_inline_p): Likewise
* optabs.c: Include insn-config.h earlier.
(init_libfuncs, init_integral_libfuncs, init_floating_libfuncs):
Qualify a char* with the `const' keyword.
* real.c (asctoe24, asctoe53, asctoe64, asctoe113, asctoe,
asctoeg, mtherr, ereal_atof): Likewise.
* real.h (ereal_atof): Likewise.
* sbitmap.c (dump_sbitmap_vector): Likewise.
* sbitmap.h (dump_sbitmap_vector): Likewise.
* stmt.c (nesting, n_occurrences, expand_start_case): Likewise.
* toplev.c (rest_of_compilation): Likewise.
* tree.h (function_cannot_inline_p, expand_start_case): Likewise.
Fri Mar 5 23:16:42 1999 David Edelsohn <edelsohn@mhpcc.edu> Fri Mar 5 23:16:42 1999 David Edelsohn <edelsohn@mhpcc.edu>
* rs6000.h (ASM_OUTPUT_REG_{PUSH,POP}): Add 64-bit support and do * rs6000.h (ASM_OUTPUT_REG_{PUSH,POP}): Add 64-bit support and do
......
/* Generate information regarding function declarations and definitions based /* Generate information regarding function declarations and definitions based
on information stored in GCC's tree structure. This code implements the on information stored in GCC's tree structure. This code implements the
-aux-info option. -aux-info option.
Copyright (C) 1989, 91, 94, 95, 97, 1998 Free Software Foundation, Inc. Copyright (C) 1989, 91, 94, 95, 97-98, 1999 Free Software Foundation, Inc.
Contributed by Ron Guilmette (rfg@segfault.us.com). Contributed by Ron Guilmette (rfg@segfault.us.com).
This file is part of GNU CC. This file is part of GNU CC.
...@@ -35,14 +35,14 @@ enum formals_style_enum { ...@@ -35,14 +35,14 @@ enum formals_style_enum {
typedef enum formals_style_enum formals_style; typedef enum formals_style_enum formals_style;
static char *data_type; static const char *data_type;
static char *affix_data_type PROTO((char *)); static char *affix_data_type PROTO((const char *));
static char *gen_formal_list_for_type PROTO((tree, formals_style)); static const char *gen_formal_list_for_type PROTO((tree, formals_style));
static int deserves_ellipsis PROTO((tree)); static int deserves_ellipsis PROTO((tree));
static char *gen_formal_list_for_func_def PROTO((tree, formals_style)); static const char *gen_formal_list_for_func_def PROTO((tree, formals_style));
static char *gen_type PROTO((char *, tree, formals_style)); static const char *gen_type PROTO((const char *, tree, formals_style));
static char *gen_decl PROTO((tree, int, formals_style)); static const char *gen_decl PROTO((tree, int, formals_style));
/* Concatenate a sequence of strings, returning the result. /* Concatenate a sequence of strings, returning the result.
...@@ -120,13 +120,16 @@ concat VPROTO((const char *first, ...)) ...@@ -120,13 +120,16 @@ concat VPROTO((const char *first, ...))
that look as expected. */ that look as expected. */
static char * static char *
affix_data_type (type_or_decl) affix_data_type (param)
char *type_or_decl; const char *param;
{ {
char *type_or_decl = (char *) alloca (strlen (param) + 1);
char *p = type_or_decl; char *p = type_or_decl;
char *qualifiers_then_data_type; char *qualifiers_then_data_type;
char saved; char saved;
strcpy (type_or_decl, param);
/* Skip as many leading const's or volatile's as there are. */ /* Skip as many leading const's or volatile's as there are. */
for (;;) for (;;)
...@@ -164,12 +167,12 @@ affix_data_type (type_or_decl) ...@@ -164,12 +167,12 @@ affix_data_type (type_or_decl)
we are currently aiming for is non-ansi, then we just return a pair we are currently aiming for is non-ansi, then we just return a pair
of empty parens here. */ of empty parens here. */
static char * static const char *
gen_formal_list_for_type (fntype, style) gen_formal_list_for_type (fntype, style)
tree fntype; tree fntype;
formals_style style; formals_style style;
{ {
char *formal_list = ""; const char *formal_list = "";
tree formal_type; tree formal_type;
if (style != ansi) if (style != ansi)
...@@ -178,7 +181,7 @@ gen_formal_list_for_type (fntype, style) ...@@ -178,7 +181,7 @@ gen_formal_list_for_type (fntype, style)
formal_type = TYPE_ARG_TYPES (fntype); formal_type = TYPE_ARG_TYPES (fntype);
while (formal_type && TREE_VALUE (formal_type) != void_type_node) while (formal_type && TREE_VALUE (formal_type) != void_type_node)
{ {
char *this_type; const char *this_type;
if (*formal_list) if (*formal_list)
formal_list = concat (formal_list, ", ", NULL_PTR); formal_list = concat (formal_list, ", ", NULL_PTR);
...@@ -284,18 +287,18 @@ deserves_ellipsis (fntype) ...@@ -284,18 +287,18 @@ deserves_ellipsis (fntype)
This routine returns a string which is the source form for the entire This routine returns a string which is the source form for the entire
function formal parameter list. */ function formal parameter list. */
static char * static const char *
gen_formal_list_for_func_def (fndecl, style) gen_formal_list_for_func_def (fndecl, style)
tree fndecl; tree fndecl;
formals_style style; formals_style style;
{ {
char *formal_list = ""; const char *formal_list = "";
tree formal_decl; tree formal_decl;
formal_decl = DECL_ARGUMENTS (fndecl); formal_decl = DECL_ARGUMENTS (fndecl);
while (formal_decl) while (formal_decl)
{ {
char *this_formal; const char *this_formal;
if (*formal_list && ((style == ansi) || (style == k_and_r_names))) if (*formal_list && ((style == ansi) || (style == k_and_r_names)))
formal_list = concat (formal_list, ", ", NULL_PTR); formal_list = concat (formal_list, ", ", NULL_PTR);
...@@ -359,9 +362,9 @@ gen_formal_list_for_func_def (fndecl, style) ...@@ -359,9 +362,9 @@ gen_formal_list_for_func_def (fndecl, style)
to do at this point is for the initial caller to prepend the "data_type" to do at this point is for the initial caller to prepend the "data_type"
string onto the returned "seed". */ string onto the returned "seed". */
static char * static const char *
gen_type (ret_val, t, style) gen_type (ret_val, t, style)
char *ret_val; const char *ret_val;
tree t; tree t;
formals_style style; formals_style style;
{ {
...@@ -533,13 +536,13 @@ gen_type (ret_val, t, style) ...@@ -533,13 +536,13 @@ gen_type (ret_val, t, style)
associated with a function definition. In this case, we can assume that associated with a function definition. In this case, we can assume that
an attached list of DECL nodes for function formal arguments is present. */ an attached list of DECL nodes for function formal arguments is present. */
static char * static const char *
gen_decl (decl, is_func_definition, style) gen_decl (decl, is_func_definition, style)
tree decl; tree decl;
int is_func_definition; int is_func_definition;
formals_style style; formals_style style;
{ {
char *ret_val; const char *ret_val;
if (DECL_NAME (decl)) if (DECL_NAME (decl))
ret_val = IDENTIFIER_POINTER (DECL_NAME (decl)); ret_val = IDENTIFIER_POINTER (DECL_NAME (decl));
......
...@@ -60,8 +60,8 @@ enum attrs {A_PACKED, A_NOCOMMON, A_COMMON, A_NORETURN, A_CONST, A_T_UNION, ...@@ -60,8 +60,8 @@ enum attrs {A_PACKED, A_NOCOMMON, A_COMMON, A_NORETURN, A_CONST, A_T_UNION,
enum format_type { printf_format_type, scanf_format_type, enum format_type { printf_format_type, scanf_format_type,
strftime_format_type }; strftime_format_type };
static void declare_hidden_char_array PROTO((char *, char *)); static void declare_hidden_char_array PROTO((const char *, const char *));
static void add_attribute PROTO((enum attrs, char *, static void add_attribute PROTO((enum attrs, const char *,
int, int, int)); int, int, int));
static void init_attributes PROTO((void)); static void init_attributes PROTO((void));
static void record_function_format PROTO((tree, tree, enum format_type, static void record_function_format PROTO((tree, tree, enum format_type,
...@@ -78,7 +78,7 @@ typedef struct ...@@ -78,7 +78,7 @@ typedef struct
{ {
int compstmt_count; int compstmt_count;
int line; int line;
char *file; const char *file;
int needs_warning; int needs_warning;
} if_elt; } if_elt;
static void tfaff PROTO((void)); static void tfaff PROTO((void));
...@@ -170,7 +170,7 @@ c_expand_start_else () ...@@ -170,7 +170,7 @@ c_expand_start_else ()
void void
declare_function_name () declare_function_name ()
{ {
char *name, *printable_name; const char *name, *printable_name;
if (current_function_decl == NULL) if (current_function_decl == NULL)
{ {
...@@ -196,7 +196,7 @@ declare_function_name () ...@@ -196,7 +196,7 @@ declare_function_name ()
static void static void
declare_hidden_char_array (name, value) declare_hidden_char_array (name, value)
char *name, *value; const char *name, *value;
{ {
tree decl, type, init; tree decl, type, init;
int vlen; int vlen;
...@@ -355,7 +355,7 @@ static int attrtab_idx = 0; ...@@ -355,7 +355,7 @@ static int attrtab_idx = 0;
static void static void
add_attribute (id, string, min_len, max_len, decl_req) add_attribute (id, string, min_len, max_len, decl_req)
enum attrs id; enum attrs id;
char *string; const char *string;
int min_len, max_len; int min_len, max_len;
int decl_req; int decl_req;
{ {
...@@ -587,7 +587,7 @@ decl_attributes (node, attributes, prefix_attributes) ...@@ -587,7 +587,7 @@ decl_attributes (node, attributes, prefix_attributes)
else else
{ {
int j; int j;
char *p = IDENTIFIER_POINTER (TREE_VALUE (args)); const char *p = IDENTIFIER_POINTER (TREE_VALUE (args));
int len = strlen (p); int len = strlen (p);
enum machine_mode mode = VOIDmode; enum machine_mode mode = VOIDmode;
tree typefm; tree typefm;
...@@ -719,7 +719,7 @@ decl_attributes (node, attributes, prefix_attributes) ...@@ -719,7 +719,7 @@ decl_attributes (node, attributes, prefix_attributes)
} }
else else
{ {
char *p = IDENTIFIER_POINTER (format_type_id); const char *p = IDENTIFIER_POINTER (format_type_id);
if (!strcmp (p, "printf") || !strcmp (p, "__printf__")) if (!strcmp (p, "printf") || !strcmp (p, "__printf__"))
format_type = printf_format_type; format_type = printf_format_type;
...@@ -1099,7 +1099,7 @@ strip_attrs (specs_attrs) ...@@ -1099,7 +1099,7 @@ strip_attrs (specs_attrs)
#define T_ST &sizetype #define T_ST &sizetype
typedef struct { typedef struct {
char *format_chars; const char *format_chars;
int pointer_count; int pointer_count;
/* Type of argument if no length modifier is used. */ /* Type of argument if no length modifier is used. */
tree *nolen; tree *nolen;
...@@ -1122,7 +1122,7 @@ typedef struct { ...@@ -1122,7 +1122,7 @@ typedef struct {
If NULL, then this modifier is not allowed. */ If NULL, then this modifier is not allowed. */
tree *zlen; tree *zlen;
/* List of other modifier characters allowed with these options. */ /* List of other modifier characters allowed with these options. */
char *flag_chars; const char *flag_chars;
} format_char_info; } format_char_info;
static format_char_info print_char_table[] = { static format_char_info print_char_table[] = {
...@@ -1376,7 +1376,7 @@ check_format_info (info, params) ...@@ -1376,7 +1376,7 @@ check_format_info (info, params)
tree cur_type; tree cur_type;
tree wanted_type; tree wanted_type;
tree first_fillin_param; tree first_fillin_param;
char *format_chars; const char *format_chars;
format_char_info *fci = NULL; format_char_info *fci = NULL;
char flag_chars[8]; char flag_chars[8];
int has_operand_number = 0; int has_operand_number = 0;
...@@ -1540,7 +1540,7 @@ check_format_info (info, params) ...@@ -1540,7 +1540,7 @@ check_format_info (info, params)
it is an operand number, so set PARAMS to that operand. */ it is an operand number, so set PARAMS to that operand. */
if (*format_chars >= '0' && *format_chars <= '9') if (*format_chars >= '0' && *format_chars <= '9')
{ {
char *p = format_chars; const char *p = format_chars;
while (*p >= '0' && *p++ <= '9') while (*p >= '0' && *p++ <= '9')
; ;
...@@ -1899,8 +1899,8 @@ check_format_info (info, params) ...@@ -1899,8 +1899,8 @@ check_format_info (info, params)
&& (TYPE_MAIN_VARIANT (cur_type) == signed_char_type_node && (TYPE_MAIN_VARIANT (cur_type) == signed_char_type_node
|| TYPE_MAIN_VARIANT (cur_type) == unsigned_char_type_node))) || TYPE_MAIN_VARIANT (cur_type) == unsigned_char_type_node)))
{ {
register char *this; register const char *this;
register char *that; register const char *that;
this = IDENTIFIER_POINTER (DECL_NAME (TYPE_NAME (wanted_type))); this = IDENTIFIER_POINTER (DECL_NAME (TYPE_NAME (wanted_type)));
that = 0; that = 0;
...@@ -2230,7 +2230,7 @@ void ...@@ -2230,7 +2230,7 @@ void
binary_op_error (code) binary_op_error (code)
enum tree_code code; enum tree_code code;
{ {
register char *opname; register const char *opname;
switch (code) switch (code)
{ {
......
/* Parse C expressions for CCCP. /* Parse C expressions for CCCP.
Copyright (C) 1987, 92, 94, 95, 96, 97, 1998 Free Software Foundation. Copyright (C) 1987, 92, 94-98, 1999 Free Software Foundation.
This program is free software; you can redistribute it and/or modify it This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the under the terms of the GNU General Public License as published by the
...@@ -50,7 +50,8 @@ struct arglist { ...@@ -50,7 +50,8 @@ struct arglist {
HOST_WIDEST_INT parse_c_expression PROTO((char *, int)); HOST_WIDEST_INT parse_c_expression PROTO((char *, int));
static int yylex PROTO((void)); static int yylex PROTO((void));
static void yyerror PVPROTO((char *, ...)) ATTRIBUTE_PRINTF_1 ATTRIBUTE_NORETURN; static void yyerror PVPROTO((const char *, ...))
ATTRIBUTE_PRINTF_1 ATTRIBUTE_NORETURN;
static HOST_WIDEST_INT expression_value; static HOST_WIDEST_INT expression_value;
#ifdef TEST_EXP_READER #ifdef TEST_EXP_READER
static int expression_signedp; static int expression_signedp;
...@@ -135,9 +136,9 @@ struct constant; ...@@ -135,9 +136,9 @@ struct constant;
HOST_WIDEST_INT parse_escape PROTO((char **, HOST_WIDEST_INT)); HOST_WIDEST_INT parse_escape PROTO((char **, HOST_WIDEST_INT));
int check_assertion PROTO((U_CHAR *, int, int, struct arglist *)); int check_assertion PROTO((U_CHAR *, int, int, struct arglist *));
struct hashnode *lookup PROTO((U_CHAR *, int, int)); struct hashnode *lookup PROTO((U_CHAR *, int, int));
void error PVPROTO((char *, ...)) ATTRIBUTE_PRINTF_1; void error PVPROTO((const char *, ...)) ATTRIBUTE_PRINTF_1;
void pedwarn PVPROTO((char *, ...)) ATTRIBUTE_PRINTF_1; void pedwarn PVPROTO((const char *, ...)) ATTRIBUTE_PRINTF_1;
void warning PVPROTO((char *, ...)) ATTRIBUTE_PRINTF_1; void warning PVPROTO((const char *, ...)) ATTRIBUTE_PRINTF_1;
static int parse_number PROTO((int)); static int parse_number PROTO((int));
static HOST_WIDEST_INT left_shift PROTO((struct constant *, unsigned HOST_WIDEST_INT)); static HOST_WIDEST_INT left_shift PROTO((struct constant *, unsigned HOST_WIDEST_INT));
...@@ -494,7 +495,7 @@ parse_number (olen) ...@@ -494,7 +495,7 @@ parse_number (olen)
} }
struct token { struct token {
char *operator; const char *operator;
int token; int token;
}; };
...@@ -1001,17 +1002,17 @@ parse_c_expression (string, warn_undefined) ...@@ -1001,17 +1002,17 @@ parse_c_expression (string, warn_undefined)
} }
static void static void
yyerror VPROTO ((char * msgid, ...)) yyerror VPROTO ((const char * msgid, ...))
{ {
#ifndef ANSI_PROTOTYPES #ifndef ANSI_PROTOTYPES
char * msgid; const char * msgid;
#endif #endif
va_list args; va_list args;
VA_START (args, msgid); VA_START (args, msgid);
#ifndef ANSI_PROTOTYPES #ifndef ANSI_PROTOTYPES
msgid = va_arg (args, char *); msgid = va_arg (args, const char *);
#endif #endif
fprintf (stderr, "error: "); fprintf (stderr, "error: ");
......
...@@ -576,7 +576,7 @@ static void compute_set_hash_table PROTO ((rtx)); ...@@ -576,7 +576,7 @@ static void compute_set_hash_table PROTO ((rtx));
static void alloc_expr_hash_table PROTO ((int)); static void alloc_expr_hash_table PROTO ((int));
static void free_expr_hash_table PROTO ((void)); static void free_expr_hash_table PROTO ((void));
static void compute_expr_hash_table PROTO ((rtx)); static void compute_expr_hash_table PROTO ((rtx));
static void dump_hash_table PROTO ((FILE *, char *, struct expr **, int, int)); static void dump_hash_table PROTO ((FILE *, const char *, struct expr **, int, int));
static struct expr *lookup_expr PROTO ((rtx)); static struct expr *lookup_expr PROTO ((rtx));
static struct expr *lookup_set PROTO ((int, rtx)); static struct expr *lookup_set PROTO ((int, rtx));
static struct expr *next_set PROTO ((int, struct expr *)); static struct expr *next_set PROTO ((int, struct expr *));
...@@ -1910,7 +1910,7 @@ hash_scan_insn (insn, set_p, in_libcall_block) ...@@ -1910,7 +1910,7 @@ hash_scan_insn (insn, set_p, in_libcall_block)
static void static void
dump_hash_table (file, name, table, table_size, total_size) dump_hash_table (file, name, table, table_size, total_size)
FILE *file; FILE *file;
char *name; const char *name;
struct expr **table; struct expr **table;
int table_size, total_size; int table_size, total_size;
{ {
......
...@@ -110,7 +110,7 @@ get_label_from_map (map, i) ...@@ -110,7 +110,7 @@ get_label_from_map (map, i)
Nonzero means value is a warning msgid with a single %s Nonzero means value is a warning msgid with a single %s
for the function's name. */ for the function's name. */
char * const char *
function_cannot_inline_p (fndecl) function_cannot_inline_p (fndecl)
register tree fndecl; register tree fndecl;
{ {
......
...@@ -21,13 +21,16 @@ Boston, MA 02111-1307, USA. */ ...@@ -21,13 +21,16 @@ Boston, MA 02111-1307, USA. */
#include "config.h" #include "config.h"
#include "system.h" #include "system.h"
/* Include insn-config.h before expr.h so that HAVE_conditional_move
is properly defined. */
#include "insn-config.h"
#include "rtl.h" #include "rtl.h"
#include "tree.h" #include "tree.h"
#include "flags.h" #include "flags.h"
#include "insn-flags.h" #include "insn-flags.h"
#include "insn-codes.h" #include "insn-codes.h"
#include "expr.h" #include "expr.h"
#include "insn-config.h"
#include "recog.h" #include "recog.h"
#include "reload.h" #include "reload.h"
...@@ -248,9 +251,9 @@ static enum insn_code can_float_p PROTO((enum machine_mode, enum machine_mode, ...@@ -248,9 +251,9 @@ static enum insn_code can_float_p PROTO((enum machine_mode, enum machine_mode,
int)); int));
static rtx ftruncify PROTO((rtx)); static rtx ftruncify PROTO((rtx));
static optab init_optab PROTO((enum rtx_code)); static optab init_optab PROTO((enum rtx_code));
static void init_libfuncs PROTO((optab, int, int, char *, int)); static void init_libfuncs PROTO((optab, int, int, const char *, int));
static void init_integral_libfuncs PROTO((optab, char *, int)); static void init_integral_libfuncs PROTO((optab, const char *, int));
static void init_floating_libfuncs PROTO((optab, char *, int)); static void init_floating_libfuncs PROTO((optab, const char *, int));
#ifdef HAVE_conditional_trap #ifdef HAVE_conditional_trap
static void init_traps PROTO((void)); static void init_traps PROTO((void));
#endif #endif
...@@ -4085,7 +4088,7 @@ init_libfuncs (optable, first_mode, last_mode, opname, suffix) ...@@ -4085,7 +4088,7 @@ init_libfuncs (optable, first_mode, last_mode, opname, suffix)
register optab optable; register optab optable;
register int first_mode; register int first_mode;
register int last_mode; register int last_mode;
register char *opname; register const char *opname;
register int suffix; register int suffix;
{ {
register int mode; register int mode;
...@@ -4099,7 +4102,7 @@ init_libfuncs (optable, first_mode, last_mode, opname, suffix) ...@@ -4099,7 +4102,7 @@ init_libfuncs (optable, first_mode, last_mode, opname, suffix)
register char *libfunc_name register char *libfunc_name
= (char *) xmalloc (2 + opname_len + mname_len + 1 + 1); = (char *) xmalloc (2 + opname_len + mname_len + 1 + 1);
register char *p; register char *p;
register char *q; register const char *q;
p = libfunc_name; p = libfunc_name;
*p++ = '_'; *p++ = '_';
...@@ -4123,7 +4126,7 @@ init_libfuncs (optable, first_mode, last_mode, opname, suffix) ...@@ -4123,7 +4126,7 @@ init_libfuncs (optable, first_mode, last_mode, opname, suffix)
static void static void
init_integral_libfuncs (optable, opname, suffix) init_integral_libfuncs (optable, opname, suffix)
register optab optable; register optab optable;
register char *opname; register const char *opname;
register int suffix; register int suffix;
{ {
init_libfuncs (optable, SImode, TImode, opname, suffix); init_libfuncs (optable, SImode, TImode, opname, suffix);
...@@ -4137,7 +4140,7 @@ init_integral_libfuncs (optable, opname, suffix) ...@@ -4137,7 +4140,7 @@ init_integral_libfuncs (optable, opname, suffix)
static void static void
init_floating_libfuncs (optable, opname, suffix) init_floating_libfuncs (optable, opname, suffix)
register optab optable; register optab optable;
register char *opname; register const char *opname;
register int suffix; register int suffix;
{ {
init_libfuncs (optable, SFmode, TFmode, opname, suffix); init_libfuncs (optable, SFmode, TFmode, opname, suffix);
......
...@@ -414,12 +414,12 @@ static void e64toasc PROTO((unsigned EMUSHORT *, char *, int)); ...@@ -414,12 +414,12 @@ static void e64toasc PROTO((unsigned EMUSHORT *, char *, int));
static void e113toasc PROTO((unsigned EMUSHORT *, char *, int)); static void e113toasc PROTO((unsigned EMUSHORT *, char *, int));
#endif /* 0 */ #endif /* 0 */
static void etoasc PROTO((unsigned EMUSHORT *, char *, int)); static void etoasc PROTO((unsigned EMUSHORT *, char *, int));
static void asctoe24 PROTO((char *, unsigned EMUSHORT *)); static void asctoe24 PROTO((const char *, unsigned EMUSHORT *));
static void asctoe53 PROTO((char *, unsigned EMUSHORT *)); static void asctoe53 PROTO((const char *, unsigned EMUSHORT *));
static void asctoe64 PROTO((char *, unsigned EMUSHORT *)); static void asctoe64 PROTO((const char *, unsigned EMUSHORT *));
static void asctoe113 PROTO((char *, unsigned EMUSHORT *)); static void asctoe113 PROTO((const char *, unsigned EMUSHORT *));
static void asctoe PROTO((char *, unsigned EMUSHORT *)); static void asctoe PROTO((const char *, unsigned EMUSHORT *));
static void asctoeg PROTO((char *, unsigned EMUSHORT *, int)); static void asctoeg PROTO((const char *, unsigned EMUSHORT *, int));
static void efloor PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *)); static void efloor PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
#if 0 #if 0
static void efrexp PROTO((unsigned EMUSHORT *, int *, static void efrexp PROTO((unsigned EMUSHORT *, int *,
...@@ -431,7 +431,7 @@ static void eremain PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *, ...@@ -431,7 +431,7 @@ static void eremain PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *,
unsigned EMUSHORT *)); unsigned EMUSHORT *));
#endif #endif
static void eiremain PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *)); static void eiremain PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
static void mtherr PROTO((char *, int)); static void mtherr PROTO((const char *, int));
#ifdef DEC #ifdef DEC
static void dectoe PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *)); static void dectoe PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
static void etodec PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *)); static void etodec PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
...@@ -691,7 +691,7 @@ etruncui (x) ...@@ -691,7 +691,7 @@ etruncui (x)
REAL_VALUE_TYPE REAL_VALUE_TYPE
ereal_atof (s, t) ereal_atof (s, t)
char *s; const char *s;
enum machine_mode t; enum machine_mode t;
{ {
unsigned EMUSHORT tem[NE], e[NE]; unsigned EMUSHORT tem[NE], e[NE];
...@@ -5006,7 +5006,7 @@ etoasc (x, string, ndigs) ...@@ -5006,7 +5006,7 @@ etoasc (x, string, ndigs)
static void static void
asctoe24 (s, y) asctoe24 (s, y)
char *s; const char *s;
unsigned EMUSHORT *y; unsigned EMUSHORT *y;
{ {
asctoeg (s, y, 24); asctoeg (s, y, 24);
...@@ -5017,7 +5017,7 @@ asctoe24 (s, y) ...@@ -5017,7 +5017,7 @@ asctoe24 (s, y)
static void static void
asctoe53 (s, y) asctoe53 (s, y)
char *s; const char *s;
unsigned EMUSHORT *y; unsigned EMUSHORT *y;
{ {
#if defined(DEC) || defined(IBM) #if defined(DEC) || defined(IBM)
...@@ -5036,7 +5036,7 @@ asctoe53 (s, y) ...@@ -5036,7 +5036,7 @@ asctoe53 (s, y)
static void static void
asctoe64 (s, y) asctoe64 (s, y)
char *s; const char *s;
unsigned EMUSHORT *y; unsigned EMUSHORT *y;
{ {
asctoeg (s, y, 64); asctoeg (s, y, 64);
...@@ -5046,7 +5046,7 @@ asctoe64 (s, y) ...@@ -5046,7 +5046,7 @@ asctoe64 (s, y)
static void static void
asctoe113 (s, y) asctoe113 (s, y)
char *s; const char *s;
unsigned EMUSHORT *y; unsigned EMUSHORT *y;
{ {
asctoeg (s, y, 113); asctoeg (s, y, 113);
...@@ -5056,7 +5056,7 @@ asctoe113 (s, y) ...@@ -5056,7 +5056,7 @@ asctoe113 (s, y)
static void static void
asctoe (s, y) asctoe (s, y)
char *s; const char *s;
unsigned EMUSHORT *y; unsigned EMUSHORT *y;
{ {
asctoeg (s, y, NBITS); asctoeg (s, y, NBITS);
...@@ -5067,7 +5067,7 @@ asctoe (s, y) ...@@ -5067,7 +5067,7 @@ asctoe (s, y)
static void static void
asctoeg (ss, y, oprec) asctoeg (ss, y, oprec)
char *ss; const char *ss;
unsigned EMUSHORT *y; unsigned EMUSHORT *y;
int oprec; int oprec;
{ {
...@@ -5082,12 +5082,11 @@ asctoeg (ss, y, oprec) ...@@ -5082,12 +5082,11 @@ asctoeg (ss, y, oprec)
/* Copy the input string. */ /* Copy the input string. */
lstr = (char *) alloca (strlen (ss) + 1); lstr = (char *) alloca (strlen (ss) + 1);
s = ss; while (*ss == ' ') /* skip leading spaces */
while (*s == ' ') /* skip leading spaces */ ++ss;
++s;
sp = lstr; sp = lstr;
while ((*sp++ = *s++) != '\0') while ((*sp++ = *ss++) != '\0')
; ;
s = lstr; s = lstr;
...@@ -5664,7 +5663,7 @@ extern int merror; ...@@ -5664,7 +5663,7 @@ extern int merror;
static void static void
mtherr (name, code) mtherr (name, code)
char *name; const char *name;
int code; int code;
{ {
/* The string passed by the calling program is supposed to be the /* The string passed by the calling program is supposed to be the
......
/* Definitions of floating-point access for GNU compiler. /* Definitions of floating-point access for GNU compiler.
Copyright (C) 1989, 91, 94, 96, 97, 1998 Free Software Foundation, Inc. Copyright (C) 1989, 91, 94, 96-98, 1999 Free Software Foundation, Inc.
This file is part of GNU CC. This file is part of GNU CC.
...@@ -132,7 +132,7 @@ extern void earith PROTO((REAL_VALUE_TYPE *, int, ...@@ -132,7 +132,7 @@ extern void earith PROTO((REAL_VALUE_TYPE *, int,
REAL_VALUE_TYPE *, REAL_VALUE_TYPE *)); REAL_VALUE_TYPE *, REAL_VALUE_TYPE *));
extern REAL_VALUE_TYPE etrunci PROTO((REAL_VALUE_TYPE)); extern REAL_VALUE_TYPE etrunci PROTO((REAL_VALUE_TYPE));
extern REAL_VALUE_TYPE etruncui PROTO((REAL_VALUE_TYPE)); extern REAL_VALUE_TYPE etruncui PROTO((REAL_VALUE_TYPE));
extern REAL_VALUE_TYPE ereal_atof PROTO((char *, enum machine_mode)); extern REAL_VALUE_TYPE ereal_atof PROTO((const char *, enum machine_mode));
extern REAL_VALUE_TYPE ereal_negate PROTO((REAL_VALUE_TYPE)); extern REAL_VALUE_TYPE ereal_negate PROTO((REAL_VALUE_TYPE));
extern HOST_WIDE_INT efixi PROTO((REAL_VALUE_TYPE)); extern HOST_WIDE_INT efixi PROTO((REAL_VALUE_TYPE));
extern unsigned HOST_WIDE_INT efixui PROTO((REAL_VALUE_TYPE)); extern unsigned HOST_WIDE_INT efixui PROTO((REAL_VALUE_TYPE));
......
...@@ -454,7 +454,7 @@ dump_sbitmap (file, bmap) ...@@ -454,7 +454,7 @@ dump_sbitmap (file, bmap)
void void
dump_sbitmap_vector (file, title, subtitle, bmaps, n_maps) dump_sbitmap_vector (file, title, subtitle, bmaps, n_maps)
FILE *file; FILE *file;
char *title, *subtitle; const char *title, *subtitle;
sbitmap *bmaps; sbitmap *bmaps;
int n_maps; int n_maps;
{ {
......
...@@ -90,7 +90,7 @@ do { \ ...@@ -90,7 +90,7 @@ do { \
#define sbitmap_vector_free(vec) free(vec) #define sbitmap_vector_free(vec) free(vec)
extern void dump_sbitmap PROTO ((FILE *, sbitmap)); extern void dump_sbitmap PROTO ((FILE *, sbitmap));
extern void dump_sbitmap_vector PROTO ((FILE *, char *, char *, extern void dump_sbitmap_vector PROTO ((FILE *, const char *, const char *,
sbitmap *, int)); sbitmap *, int));
extern sbitmap sbitmap_alloc PROTO ((int)); extern sbitmap sbitmap_alloc PROTO ((int));
......
...@@ -306,7 +306,7 @@ struct nesting ...@@ -306,7 +306,7 @@ struct nesting
/* Number of range exprs in case statement. */ /* Number of range exprs in case statement. */
int num_ranges; int num_ranges;
/* Name of this kind of statement, for warnings. */ /* Name of this kind of statement, for warnings. */
char *printname; const char *printname;
/* Used to save no_line_numbers till we see the first case label. /* Used to save no_line_numbers till we see the first case label.
We set this to -1 when we see the first case label in this We set this to -1 when we see the first case label in this
case statement. */ case statement. */
...@@ -425,7 +425,7 @@ struct label_chain ...@@ -425,7 +425,7 @@ struct label_chain
static int using_eh_for_cleanups_p = 0; static int using_eh_for_cleanups_p = 0;
static int n_occurrences PROTO((int, char *)); static int n_occurrences PROTO((int, const char *));
static void expand_goto_internal PROTO((tree, rtx, rtx)); static void expand_goto_internal PROTO((tree, rtx, rtx));
static int expand_fixup PROTO((tree, rtx, rtx)); static int expand_fixup PROTO((tree, rtx, rtx));
static rtx expand_nl_handler_label PROTO((rtx, rtx)); static rtx expand_nl_handler_label PROTO((rtx, rtx));
...@@ -1120,7 +1120,7 @@ fixup_gotos (thisblock, stack_level, cleanup_list, first_insn, dont_jump_in) ...@@ -1120,7 +1120,7 @@ fixup_gotos (thisblock, stack_level, cleanup_list, first_insn, dont_jump_in)
static int static int
n_occurrences (c, s) n_occurrences (c, s)
int c; int c;
char *s; const char *s;
{ {
int n = 0; int n = 0;
while (*s) while (*s)
...@@ -4172,7 +4172,7 @@ expand_start_case (exit_flag, expr, type, printname) ...@@ -4172,7 +4172,7 @@ expand_start_case (exit_flag, expr, type, printname)
int exit_flag; int exit_flag;
tree expr; tree expr;
tree type; tree type;
char *printname; const char *printname;
{ {
register struct nesting *thiscase = ALLOC_NESTING (); register struct nesting *thiscase = ALLOC_NESTING ();
......
...@@ -3497,7 +3497,7 @@ rest_of_compilation (decl) ...@@ -3497,7 +3497,7 @@ rest_of_compilation (decl)
if (DECL_SAVED_INSNS (decl) == 0) if (DECL_SAVED_INSNS (decl) == 0)
{ {
int inlinable = 0; int inlinable = 0;
char *lose; const char *lose;
/* If requested, consider whether to make this function inline. */ /* If requested, consider whether to make this function inline. */
if (DECL_INLINE (decl) || flag_inline_functions) if (DECL_INLINE (decl) || flag_inline_functions)
......
...@@ -1805,7 +1805,7 @@ extern tree decl_type_context PROTO((tree)); ...@@ -1805,7 +1805,7 @@ extern tree decl_type_context PROTO((tree));
Otherwise return a warning message with a single %s Otherwise return a warning message with a single %s
for the function's name. */ for the function's name. */
extern char *function_cannot_inline_p PROTO((tree)); extern const char *function_cannot_inline_p PROTO((tree));
/* Return 1 if EXPR is the real constant zero. */ /* Return 1 if EXPR is the real constant zero. */
extern int real_zerop PROTO((tree)); extern int real_zerop PROTO((tree));
...@@ -1946,7 +1946,7 @@ extern tree last_cleanup_this_contour PROTO((void)); ...@@ -1946,7 +1946,7 @@ extern tree last_cleanup_this_contour PROTO((void));
extern int expand_dhc_cleanup PROTO((tree)); extern int expand_dhc_cleanup PROTO((tree));
extern int expand_dcc_cleanup PROTO((tree)); extern int expand_dcc_cleanup PROTO((tree));
extern void expand_start_case PROTO((int, tree, tree, extern void expand_start_case PROTO((int, tree, tree,
char *)); const char *));
extern void expand_end_case PROTO((tree)); extern void expand_end_case PROTO((tree));
extern int pushcase PROTO((tree, extern int pushcase PROTO((tree,
tree (*) (tree, tree), tree (*) (tree, tree),
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment