diff options
| author | Andrew Cagney <cagney@redhat.com> | 2005-01-29 00:11:12 +0000 |
|---|---|---|
| committer | Andrew Cagney <cagney@redhat.com> | 2005-01-29 00:11:12 +0000 |
| commit | ce27fb254cf9f800fb7f1a953eb8fa47522b9788 (patch) | |
| tree | 12520f0b7edd8c6ab5c28f23c88c6fd7ccb0554a /gdb/f-lang.c | |
| parent | 1a73b492f8dd36d2b0b3917acaf49d07de6fa581 (diff) | |
| download | gdb-ce27fb254cf9f800fb7f1a953eb8fa47522b9788.zip gdb-ce27fb254cf9f800fb7f1a953eb8fa47522b9788.tar.gz gdb-ce27fb254cf9f800fb7f1a953eb8fa47522b9788.tar.bz2 | |
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.
Diffstat (limited to 'gdb/f-lang.c')
| -rw-r--r-- | gdb/f-lang.c | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/gdb/f-lang.c b/gdb/f-lang.c index e058dd4..811ac54 100644 --- a/gdb/f-lang.c +++ b/gdb/f-lang.c @@ -1,6 +1,8 @@ /* 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 (fmbutt@engage.sps.mot.com). @@ -87,9 +89,6 @@ static void patch_common_entries (SAVED_F77_COMMON_PTR, CORE_ADDR, int); #endif 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_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. */ static void -f_printstr (struct ui_file *stream, char *string, unsigned int length, - int width, int force_ellipses) +f_printstr (struct ui_file *stream, const bfd_byte *string, + unsigned int length, int width, int force_ellipses) { unsigned int i; unsigned int things_printed = 0; |