diff options
author | David Lecomber <david@lecomber.net> | 2003-10-06 15:49:43 +0000 |
---|---|---|
committer | David Lecomber <david@lecomber.net> | 2003-10-06 15:49:43 +0000 |
commit | 7b0090c39da256b3db883cec049ace7207bc7f8a (patch) | |
tree | ad7b8ba1cb58b05ca80759929486e5336f0bd22d | |
parent | 854770991f736fdad0fe6dca6c0cc6e280f8a6ce (diff) | |
download | gdb-7b0090c39da256b3db883cec049ace7207bc7f8a.zip gdb-7b0090c39da256b3db883cec049ace7207bc7f8a.tar.gz gdb-7b0090c39da256b3db883cec049ace7207bc7f8a.tar.bz2 |
2003-10-06 David Lecomber <dsl@sources.redhat.com>
* f-valprint.c: Reformatting
-rw-r--r-- | gdb/f-valprint.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gdb/f-valprint.c b/gdb/f-valprint.c index cc337e9..7fdcabd 100644 --- a/gdb/f-valprint.c +++ b/gdb/f-valprint.c @@ -276,6 +276,7 @@ f77_create_arrayprint_offset_tbl (struct type *type, struct ui_file *stream) /* Actual function which prints out F77 arrays, Valaddr == address in the superior. Address == the address in the inferior. */ + static void f77_print_array_1 (int nss, int ndimensions, struct type *type, char *valaddr, CORE_ADDR address, struct ui_file *stream, int format, @@ -295,13 +296,13 @@ f77_print_array_1 (int nss, int ndimensions, struct type *type, char *valaddr, stream, format, deref_ref, recurse, pretty, elts); fprintf_filtered (stream, ") "); } - if (*elts >= print_max && i < F77_DIM_SIZE (nss)) { + if (*elts >= print_max && i < F77_DIM_SIZE (nss)) fprintf_filtered (stream, "..."); - } } else { - for (i = 0; (i < F77_DIM_SIZE (nss) && (*elts) < print_max); i++, (*elts)++) + for (i = 0; i < F77_DIM_SIZE (nss) && (*elts) < print_max; + i++, (*elts)++) { val_print (TYPE_TARGET_TYPE (type), valaddr + i * F77_DIM_OFFSET (ndimensions), @@ -312,7 +313,7 @@ f77_print_array_1 (int nss, int ndimensions, struct type *type, char *valaddr, if (i != (F77_DIM_SIZE (nss) - 1)) fprintf_filtered (stream, ", "); - if ((( *elts) == print_max - 1) && (i != (F77_DIM_SIZE (nss) - 1))) + if ((*elts == print_max - 1) && (i != (F77_DIM_SIZE (nss) - 1))) fprintf_filtered (stream, "..."); } } |