diff options
author | Tom Tromey <tromey@redhat.com> | 2012-03-01 19:26:13 +0000 |
---|---|---|
committer | Tom Tromey <tromey@redhat.com> | 2012-03-01 19:26:13 +0000 |
commit | d3eab38a48ec521922e7d07595fd693df7ff3510 (patch) | |
tree | 91ec380f79ea2c3d97f8830928e6b3dcb64ed0b9 /gdb/f-valprint.c | |
parent | 35c0084bfcd4d275c63061212eae5757e34d74ef (diff) | |
download | gdb-d3eab38a48ec521922e7d07595fd693df7ff3510.zip gdb-d3eab38a48ec521922e7d07595fd693df7ff3510.tar.gz gdb-d3eab38a48ec521922e7d07595fd693df7ff3510.tar.bz2 |
* valprint.c (val_print): Update.
* p-valprint (pascal_val_print): Return void.
* p-lang.h (pascal_val_print): Return void.
* m2-valprint.c (m2_val_print): Return void.
* m2-lang.h (m2_val_print): Return void.
* language.h (struct language_defn) <la_val_print>: Return void.
* language.c (unk_lang_val_print): Return void.
* jv-valprint.c (java_val_print): Return void.
* jv-lang.h (java_val_print): Return void.
* f-valprint.c (f_val_print): Return void.
* f-lang.h (f_val_print): Return void.
* d-valprint.c (d_val_print): Return void.
(dynamic_array_type): Update.
* d-lang.h (d_val_print): Return void.
* c-valprint.c (c_val_print): Return void.
* c-lang.h (c_val_print): Return void.
* ada-valprint.c (ada_vada_val_print, ada_val_print_1): Return
void.
* ada-lang.h (ada_val_print): Return void.
Diffstat (limited to 'gdb/f-valprint.c')
-rw-r--r-- | gdb/f-valprint.c | 15 |
1 files changed, 4 insertions, 11 deletions
diff --git a/gdb/f-valprint.c b/gdb/f-valprint.c index 17f747f..2738ceb 100644 --- a/gdb/f-valprint.c +++ b/gdb/f-valprint.c @@ -243,10 +243,9 @@ Type node corrupt! F77 arrays cannot have %d subscripts (%d Max)"), /* See val_print for a description of the various parameters of this - function; they are identical. The semantics of the return value is - also identical to val_print. */ + function; they are identical. */ -int +void f_val_print (struct type *type, const gdb_byte *valaddr, int embedded_offset, CORE_ADDR address, struct ui_file *stream, int recurse, const struct value *original_value, @@ -306,8 +305,7 @@ f_val_print (struct type *type, const gdb_byte *valaddr, int embedded_offset, { /* Try to print what function it points to. */ print_address_demangle (gdbarch, addr, stream, demangle); - /* Return value is irrelevant except for string pointers. */ - return 0; + return; } if (options->addressprint && options->format != 's') @@ -321,11 +319,7 @@ f_val_print (struct type *type, const gdb_byte *valaddr, int embedded_offset, && addr != 0) i = val_print_string (TYPE_TARGET_TYPE (type), NULL, addr, -1, stream, options); - - /* Return number of characters printed, including the terminating - '\0' if we reached the end. val_print_string takes care including - the terminating '\0' if necessary. */ - return i; + return; } break; @@ -514,7 +508,6 @@ f_val_print (struct type *type, const gdb_byte *valaddr, int embedded_offset, error (_("Invalid F77 type code %d in symbol table."), TYPE_CODE (type)); } gdb_flush (stream); - return 0; } static void |