diff options
author | Quincey Koziol <koziol@hdfgroup.org> | 2005-04-21 06:55:42 (GMT) |
---|---|---|
committer | Quincey Koziol <koziol@hdfgroup.org> | 2005-04-21 06:55:42 (GMT) |
commit | 0cf3f85ccec2776e4e6276cbc3b1b72f21536e0b (patch) | |
tree | 8e4ad75b45bddd06f1274abc9ceebfa3b1570e28 /tools/h5dump/h5dump.c | |
parent | 31fb2d13de02c9e7139abdb5f346a3f0b9f472e3 (diff) | |
download | hdf5-0cf3f85ccec2776e4e6276cbc3b1b72f21536e0b.zip hdf5-0cf3f85ccec2776e4e6276cbc3b1b72f21536e0b.tar.gz hdf5-0cf3f85ccec2776e4e6276cbc3b1b72f21536e0b.tar.bz2 |
[svn-r10637] Purpose:
Bug fix/code cleanup
Description:
Add tests to determine that very long (64K+) object names are working.
Fixed a couple of bugs in h5dump where they weren't...
Platforms tested:
FreeBSD 4.11 (sleipnir)
Solaris 2.9 (shanti)
Diffstat (limited to 'tools/h5dump/h5dump.c')
-rw-r--r-- | tools/h5dump/h5dump.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/tools/h5dump/h5dump.c b/tools/h5dump/h5dump.c index 3ba8e9d..e6a1bf1 100644 --- a/tools/h5dump/h5dump.c +++ b/tools/h5dump/h5dump.c @@ -35,9 +35,9 @@ const char *progname = "h5dump"; int d_status = EXIT_SUCCESS; static int unamedtype = 0; /* shared data type with no name */ -static size_t prefix_len = 1024; +extern size_t prefix_len; static table_t *group_table = NULL, *dset_table = NULL, *type_table = NULL; -char *prefix; +extern char *prefix; static const char *driver = NULL; /* The driver to open the file with. */ static const dump_header *dump_header_format; @@ -825,7 +825,7 @@ print_datatype(hid_t type,unsigned in_group) if (H5Tequal(tmp_type, str_type)) { printf("H5T_C_S1;\n"); goto done; - } + } /* If not equal to C variable-length string, check Fortran type. */ H5Tclose(str_type); @@ -3734,15 +3734,15 @@ print_enum(hid_t type) for (j = 0; j < dst_size; j++) printf("%02x", value[i * dst_size + j]); } else if (H5T_SGN_NONE == H5Tget_sign(native)) { - /*On SGI Altix(cobalt), wrong values were printed out with "value+i*dst_size" - *strangely, unless use another pointer "copy".*/ - copy = value+i*dst_size; + /*On SGI Altix(cobalt), wrong values were printed out with "value+i*dst_size" + *strangely, unless use another pointer "copy".*/ + copy = value+i*dst_size; HDfprintf(stdout,"%" H5_PRINTF_LL_WIDTH "u", *((unsigned long_long *) ((void *)copy))); } else { - /*On SGI Altix(cobalt), wrong values were printed out with "value+i*dst_size" - *strangely, unless use another pointer "copy".*/ - copy = value+i*dst_size; + /*On SGI Altix(cobalt), wrong values were printed out with "value+i*dst_size" + *strangely, unless use another pointer "copy".*/ + copy = value+i*dst_size; HDfprintf(stdout,"%" H5_PRINTF_LL_WIDTH "d", *((long_long *) ((void *)copy))); } |