2005-01-28 Andrew Cagney <cagney@gnu.org>
* language.h (struct language_defn): Make la_printstr's buffer parameter a const bfd_byte. * p-lang.h (pascal_printstr): Update function to match. * ada-valprint.c (ada_printstr): Update function to match. * scm-lang.c (scm_printstr): Update function to match. * p-lang.c (pascal_printstr): Update function to match. * ada-lang.h (ada_printstr): Update function to match. * m2-lang.c (m2_printstr): Update function to match. * objc-lang.c (objc_printstr): Update function to match. * c-lang.h (c_printstr): Update function to match. * f-lang.c (f_printstr): Update function to match. * c-lang.c (c_printstr): Update function to match. * language.c (unk_lang_printstr): Update function to match.
This commit is contained in:
parent
1a73b492f8
commit
ce27fb254c
13 changed files with 52 additions and 43 deletions
|
@ -1,5 +1,19 @@
|
||||||
2005-01-28 Andrew Cagney <cagney@gnu.org>
|
2005-01-28 Andrew Cagney <cagney@gnu.org>
|
||||||
|
|
||||||
|
* language.h (struct language_defn): Make la_printstr's buffer
|
||||||
|
parameter a const bfd_byte.
|
||||||
|
* p-lang.h (pascal_printstr): Update function to match.
|
||||||
|
* ada-valprint.c (ada_printstr): Update function to match.
|
||||||
|
* scm-lang.c (scm_printstr): Update function to match.
|
||||||
|
* p-lang.c (pascal_printstr): Update function to match.
|
||||||
|
* ada-lang.h (ada_printstr): Update function to match.
|
||||||
|
* m2-lang.c (m2_printstr): Update function to match.
|
||||||
|
* objc-lang.c (objc_printstr): Update function to match.
|
||||||
|
* c-lang.h (c_printstr): Update function to match.
|
||||||
|
* f-lang.c (f_printstr): Update function to match.
|
||||||
|
* c-lang.c (c_printstr): Update function to match.
|
||||||
|
* language.c (unk_lang_printstr): Update function to match.
|
||||||
|
|
||||||
* valprint.c (val_print_type_code_int): Make buffer a const bfd_byte.
|
* valprint.c (val_print_type_code_int): Make buffer a const bfd_byte.
|
||||||
* valprint.h (val_print_type_code_int): Ditto.
|
* valprint.h (val_print_type_code_int): Ditto.
|
||||||
|
|
||||||
|
|
|
@ -204,7 +204,8 @@ extern void ada_emit_char (int, struct ui_file *, int, int);
|
||||||
|
|
||||||
extern void ada_printchar (int, struct ui_file *);
|
extern void ada_printchar (int, struct ui_file *);
|
||||||
|
|
||||||
extern void ada_printstr (struct ui_file *, char *, unsigned int, int, int);
|
extern void ada_printstr (struct ui_file *, const bfd_byte *,
|
||||||
|
unsigned int, int, int);
|
||||||
|
|
||||||
extern void ada_convert_actuals (struct value *, int, struct value **,
|
extern void ada_convert_actuals (struct value *, int, struct value **,
|
||||||
CORE_ADDR *);
|
CORE_ADDR *);
|
||||||
|
|
|
@ -528,8 +528,8 @@ printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
}
|
}
|
||||||
|
|
||||||
void
|
void
|
||||||
ada_printstr (struct ui_file *stream, char *string, unsigned int length,
|
ada_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
printstr (stream, string, length, force_ellipses, width);
|
printstr (stream, string, length, force_ellipses, width);
|
||||||
}
|
}
|
||||||
|
|
|
@ -1,6 +1,7 @@
|
||||||
/* C language support routines for GDB, the GNU debugger.
|
/* C language support routines for GDB, the GNU debugger.
|
||||||
Copyright 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2002, 2003, 2004
|
|
||||||
Free Software Foundation, Inc.
|
Copyright 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2002,
|
||||||
|
2003, 2004, 2005 Free Software Foundation, Inc.
|
||||||
|
|
||||||
This file is part of GDB.
|
This file is part of GDB.
|
||||||
|
|
||||||
|
@ -85,8 +86,8 @@ c_printchar (int c, struct ui_file *stream)
|
||||||
printing LENGTH characters, or if FORCE_ELLIPSES. */
|
printing LENGTH characters, or if FORCE_ELLIPSES. */
|
||||||
|
|
||||||
void
|
void
|
||||||
c_printstr (struct ui_file *stream, char *string, unsigned int length,
|
c_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
unsigned int i;
|
unsigned int i;
|
||||||
unsigned int things_printed = 0;
|
unsigned int things_printed = 0;
|
||||||
|
|
|
@ -50,7 +50,7 @@ extern int c_value_print (struct value *, struct ui_file *, int,
|
||||||
|
|
||||||
extern void c_printchar (int, struct ui_file *);
|
extern void c_printchar (int, struct ui_file *);
|
||||||
|
|
||||||
extern void c_printstr (struct ui_file * stream, char *string,
|
extern void c_printstr (struct ui_file * stream, const bfd_byte *string,
|
||||||
unsigned int length, int width,
|
unsigned int length, int width,
|
||||||
int force_ellipses);
|
int force_ellipses);
|
||||||
|
|
||||||
|
|
13
gdb/f-lang.c
13
gdb/f-lang.c
|
@ -1,6 +1,8 @@
|
||||||
/* Fortran language support routines for GDB, the GNU debugger.
|
/* Fortran language support routines for GDB, the GNU debugger.
|
||||||
Copyright 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2003, 2004
|
|
||||||
Free Software Foundation, Inc.
|
Copyright 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001, 2002,
|
||||||
|
2003, 2004, 2005 Free Software Foundation, Inc.
|
||||||
|
|
||||||
Contributed by Motorola. Adapted from the C parser by Farooq Butt
|
Contributed by Motorola. Adapted from the C parser by Farooq Butt
|
||||||
(fmbutt@engage.sps.mot.com).
|
(fmbutt@engage.sps.mot.com).
|
||||||
|
|
||||||
|
@ -87,9 +89,6 @@ static void patch_common_entries (SAVED_F77_COMMON_PTR, CORE_ADDR, int);
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
static struct type *f_create_fundamental_type (struct objfile *, int);
|
static struct type *f_create_fundamental_type (struct objfile *, int);
|
||||||
static void f_printstr (struct ui_file * stream, char *string,
|
|
||||||
unsigned int length, int width,
|
|
||||||
int force_ellipses);
|
|
||||||
static void f_printchar (int c, struct ui_file * stream);
|
static void f_printchar (int c, struct ui_file * stream);
|
||||||
static void f_emit_char (int c, struct ui_file * stream, int quoter);
|
static void f_emit_char (int c, struct ui_file * stream, int quoter);
|
||||||
|
|
||||||
|
@ -161,8 +160,8 @@ f_printchar (int c, struct ui_file *stream)
|
||||||
be replaced with a true F77 version. */
|
be replaced with a true F77 version. */
|
||||||
|
|
||||||
static void
|
static void
|
||||||
f_printstr (struct ui_file *stream, char *string, unsigned int length,
|
f_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
unsigned int i;
|
unsigned int i;
|
||||||
unsigned int things_printed = 0;
|
unsigned int things_printed = 0;
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
/* Multiple source language support for GDB.
|
/* Multiple source language support for GDB.
|
||||||
|
|
||||||
Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000,
|
Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000,
|
||||||
2001, 2002, 2003, 2004 Free Software Foundation, Inc.
|
2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
|
||||||
|
|
||||||
Contributed by the Department of Computer Science at the State University
|
Contributed by the Department of Computer Science at the State University
|
||||||
of New York at Buffalo.
|
of New York at Buffalo.
|
||||||
|
@ -86,10 +86,6 @@ static void unk_lang_emit_char (int c, struct ui_file *stream, int quoter);
|
||||||
|
|
||||||
static void unk_lang_printchar (int c, struct ui_file *stream);
|
static void unk_lang_printchar (int c, struct ui_file *stream);
|
||||||
|
|
||||||
static void unk_lang_printstr (struct ui_file * stream, char *string,
|
|
||||||
unsigned int length, int width,
|
|
||||||
int force_ellipses);
|
|
||||||
|
|
||||||
static struct type *unk_lang_create_fundamental_type (struct objfile *, int);
|
static struct type *unk_lang_create_fundamental_type (struct objfile *, int);
|
||||||
|
|
||||||
static void unk_lang_print_type (struct type *, char *, struct ui_file *,
|
static void unk_lang_print_type (struct type *, char *, struct ui_file *,
|
||||||
|
@ -1098,8 +1094,8 @@ unk_lang_printchar (int c, struct ui_file *stream)
|
||||||
}
|
}
|
||||||
|
|
||||||
static void
|
static void
|
||||||
unk_lang_printstr (struct ui_file *stream, char *string, unsigned int length,
|
unk_lang_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
error ("internal error - unimplemented function unk_lang_printstr called.");
|
error ("internal error - unimplemented function unk_lang_printstr called.");
|
||||||
}
|
}
|
||||||
|
|
|
@ -193,7 +193,7 @@ struct language_defn
|
||||||
|
|
||||||
void (*la_printchar) (int ch, struct ui_file * stream);
|
void (*la_printchar) (int ch, struct ui_file * stream);
|
||||||
|
|
||||||
void (*la_printstr) (struct ui_file * stream, char *string,
|
void (*la_printstr) (struct ui_file * stream, const bfd_byte *string,
|
||||||
unsigned int length, int width,
|
unsigned int length, int width,
|
||||||
int force_ellipses);
|
int force_ellipses);
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,7 @@
|
||||||
/* Modula 2 language support routines for GDB, the GNU debugger.
|
/* Modula 2 language support routines for GDB, the GNU debugger.
|
||||||
Copyright 1992, 1993, 1994, 1995, 1996, 1998, 2000, 2002, 2003, 2004
|
|
||||||
Free Software Foundation, Inc.
|
Copyright 1992, 1993, 1994, 1995, 1996, 1998, 2000, 2002, 2003,
|
||||||
|
2004, 2005 Free Software Foundation, Inc.
|
||||||
|
|
||||||
This file is part of GDB.
|
This file is part of GDB.
|
||||||
|
|
||||||
|
@ -31,9 +32,6 @@
|
||||||
|
|
||||||
extern void _initialize_m2_language (void);
|
extern void _initialize_m2_language (void);
|
||||||
static struct type *m2_create_fundamental_type (struct objfile *, int);
|
static struct type *m2_create_fundamental_type (struct objfile *, int);
|
||||||
static void m2_printstr (struct ui_file * stream, char *string,
|
|
||||||
unsigned int length, int width,
|
|
||||||
int force_ellipses);
|
|
||||||
static void m2_printchar (int, struct ui_file *);
|
static void m2_printchar (int, struct ui_file *);
|
||||||
static void m2_emit_char (int, struct ui_file *, int);
|
static void m2_emit_char (int, struct ui_file *, int);
|
||||||
|
|
||||||
|
@ -109,8 +107,8 @@ m2_printchar (int c, struct ui_file *stream)
|
||||||
be replaced with a true Modula version. */
|
be replaced with a true Modula version. */
|
||||||
|
|
||||||
static void
|
static void
|
||||||
m2_printstr (struct ui_file *stream, char *string, unsigned int length,
|
m2_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
unsigned int i;
|
unsigned int i;
|
||||||
unsigned int things_printed = 0;
|
unsigned int things_printed = 0;
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
/* Objective-C language support routines for GDB, the GNU debugger.
|
/* Objective-C language support routines for GDB, the GNU debugger.
|
||||||
|
|
||||||
Copyright 2002, 2003, 2004 Free Software Foundation, Inc.
|
Copyright 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
|
||||||
|
|
||||||
Contributed by Apple Computer, Inc.
|
Contributed by Apple Computer, Inc.
|
||||||
Written by Michael Snyder.
|
Written by Michael Snyder.
|
||||||
|
@ -335,7 +335,7 @@ objc_printchar (int c, struct ui_file *stream)
|
||||||
FORCE_ELLIPSES. */
|
FORCE_ELLIPSES. */
|
||||||
|
|
||||||
static void
|
static void
|
||||||
objc_printstr (struct ui_file *stream, char *string,
|
objc_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
unsigned int length, int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
unsigned int i;
|
unsigned int i;
|
||||||
|
|
|
@ -1,5 +1,7 @@
|
||||||
/* Pascal language support routines for GDB, the GNU debugger.
|
/* Pascal language support routines for GDB, the GNU debugger.
|
||||||
Copyright 2000, 2002, 2003, 2004 Free Software Foundation, Inc.
|
|
||||||
|
Copyright 2000, 2002, 2003, 2004, 2005 Free Software Foundation,
|
||||||
|
Inc.
|
||||||
|
|
||||||
This file is part of GDB.
|
This file is part of GDB.
|
||||||
|
|
||||||
|
@ -155,8 +157,8 @@ pascal_printchar (int c, struct ui_file *stream)
|
||||||
had to stop before printing LENGTH characters, or if FORCE_ELLIPSES. */
|
had to stop before printing LENGTH characters, or if FORCE_ELLIPSES. */
|
||||||
|
|
||||||
void
|
void
|
||||||
pascal_printstr (struct ui_file *stream, char *string, unsigned int length,
|
pascal_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
unsigned int i;
|
unsigned int i;
|
||||||
unsigned int things_printed = 0;
|
unsigned int things_printed = 0;
|
||||||
|
|
|
@ -43,7 +43,8 @@ extern int
|
||||||
|
|
||||||
extern void pascal_printchar (int, struct ui_file *);
|
extern void pascal_printchar (int, struct ui_file *);
|
||||||
|
|
||||||
extern void pascal_printstr (struct ui_file *, char *, unsigned int, int, int);
|
extern void pascal_printstr (struct ui_file *, const bfd_byte *,
|
||||||
|
unsigned int, int, int);
|
||||||
|
|
||||||
extern struct type *pascal_create_fundamental_type (struct objfile *, int);
|
extern struct type *pascal_create_fundamental_type (struct objfile *, int);
|
||||||
|
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
/* Scheme/Guile language support routines for GDB, the GNU debugger.
|
/* Scheme/Guile language support routines for GDB, the GNU debugger.
|
||||||
|
|
||||||
Copyright 1995, 1996, 1998, 2000, 2001, 2002, 2003, 2004 Free Software
|
Copyright 1995, 1996, 1998, 2000, 2001, 2002, 2003, 2004, 2005 Free
|
||||||
Foundation, Inc.
|
Software Foundation, Inc.
|
||||||
|
|
||||||
This file is part of GDB.
|
This file is part of GDB.
|
||||||
|
|
||||||
|
@ -40,9 +40,6 @@ static struct value *evaluate_subexp_scm (struct type *, struct expression *,
|
||||||
int *, enum noside);
|
int *, enum noside);
|
||||||
static struct value *scm_lookup_name (char *);
|
static struct value *scm_lookup_name (char *);
|
||||||
static int in_eval_c (void);
|
static int in_eval_c (void);
|
||||||
static void scm_printstr (struct ui_file * stream, char *string,
|
|
||||||
unsigned int length, int width,
|
|
||||||
int force_ellipses);
|
|
||||||
|
|
||||||
struct type *builtin_type_scm;
|
struct type *builtin_type_scm;
|
||||||
|
|
||||||
|
@ -53,8 +50,8 @@ scm_printchar (int c, struct ui_file *stream)
|
||||||
}
|
}
|
||||||
|
|
||||||
static void
|
static void
|
||||||
scm_printstr (struct ui_file *stream, char *string, unsigned int length,
|
scm_printstr (struct ui_file *stream, const bfd_byte *string,
|
||||||
int width, int force_ellipses)
|
unsigned int length, int width, int force_ellipses)
|
||||||
{
|
{
|
||||||
fprintf_filtered (stream, "\"%s\"", string);
|
fprintf_filtered (stream, "\"%s\"", string);
|
||||||
}
|
}
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue