mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-08-03 04:01:22 +08:00
* value.c (value_fn_field): Constify.
* symtab.c (gdb_mangle_name): Constify. * stabsread.c (update_method_name_from_physname): Make 'physname' argument const. * p-typeprint.c (pascal_type_print_method_args): Make arguments const. Use explicit fputc_filtered loop. (pascal_type_print_base): Constify. * p-lang.h (pascal_type_print_method_args): Update. * linespec.c (add_matching_methods): Constify. (add_constructors): Likewise. * jv-typeprint.c (java_type_print_base): Constify. * gdbtypes.h (struct cplus_struct_type) <fn_fieldlist.fn_field.physname>: Now const. * dwarf2read.c (compute_delayed_physnames): Constify. (dwarf2_add_member_fn): Likewise. * c-typeprint.c (c_type_print_base): Constify. Use cleanups.
This commit is contained in:
@ -153,7 +153,7 @@ pascal_type_print_derivation_info (struct ui_file *stream, struct type *type)
|
||||
/* Print the Pascal method arguments ARGS to the file STREAM. */
|
||||
|
||||
void
|
||||
pascal_type_print_method_args (char *physname, char *methodname,
|
||||
pascal_type_print_method_args (const char *physname, const char *methodname,
|
||||
struct ui_file *stream)
|
||||
{
|
||||
int is_constructor = (strncmp (physname, "__ct__", 6) == 0);
|
||||
@ -173,8 +173,7 @@ pascal_type_print_method_args (char *physname, char *methodname,
|
||||
while (isdigit (physname[0]))
|
||||
{
|
||||
int len = 0;
|
||||
int i;
|
||||
char storec;
|
||||
int i, j;
|
||||
char *argname;
|
||||
|
||||
while (isdigit (physname[len]))
|
||||
@ -183,10 +182,11 @@ pascal_type_print_method_args (char *physname, char *methodname,
|
||||
}
|
||||
i = strtol (physname, &argname, 0);
|
||||
physname += len;
|
||||
storec = physname[i];
|
||||
physname[i] = 0;
|
||||
|
||||
for (j = 0; j < i; ++j)
|
||||
fputc_filtered (physname[i], stream);
|
||||
fputs_filtered (physname, stream);
|
||||
physname[i] = storec;
|
||||
|
||||
physname += i;
|
||||
if (physname[0] != 0)
|
||||
{
|
||||
@ -638,7 +638,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
|
||||
It might work for GNU pascal. */
|
||||
for (j = 0; j < len2; j++)
|
||||
{
|
||||
char *physname = TYPE_FN_FIELD_PHYSNAME (f, j);
|
||||
const char *physname = TYPE_FN_FIELD_PHYSNAME (f, j);
|
||||
|
||||
int is_constructor = (strncmp (physname, "__ct__", 6) == 0);
|
||||
int is_destructor = (strncmp (physname, "__dt__", 6) == 0);
|
||||
|
Reference in New Issue
Block a user