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 | c54c05a7f5c69574f0884735e4533f151157e026 (patch) | |
| tree | 19d4c9f7e3a65c5e1bcb3324edba615227ebe307 /gdb/f-valprint.c | |
| parent | 115eacabcb53f3c861775f58e65a66493744a8d0 (diff) | |
| download | gdb-c54c05a7f5c69574f0884735e4533f151157e026.tar.gz | |
2003-10-06 David Lecomber <dsl@sources.redhat.com>
* f-valprint.c: Reformatting
Diffstat (limited to 'gdb/f-valprint.c')
| -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 cc337e9481e..7fdcabd7173 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, "..."); } } |