diff options
author | Quincey Koziol <koziol@hdfgroup.org> | 2003-10-15 20:02:51 (GMT) |
---|---|---|
committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-10-15 20:02:51 (GMT) |
commit | eb878857a708ee0b0ae4a03391a42967f3162866 (patch) | |
tree | c29e931976eb8b1522ff9c9bd25e61f9c9002812 /fortran | |
parent | 3e38f979816386fd8f35aefe507d78f8a863eaf3 (diff) | |
download | hdf5-eb878857a708ee0b0ae4a03391a42967f3162866.zip hdf5-eb878857a708ee0b0ae4a03391a42967f3162866.tar.gz hdf5-eb878857a708ee0b0ae4a03391a42967f3162866.tar.bz2 |
[svn-r7638] Purpose:
Code cleanup
Description:
Clean up compiler warnings
Platforms tested:
h5committest
Diffstat (limited to 'fortran')
-rw-r--r-- | fortran/src/H5Ef.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Ef.c b/fortran/src/H5Ef.c index 8bd4751..8199a90 100644 --- a/fortran/src/H5Ef.c +++ b/fortran/src/H5Ef.c @@ -121,7 +121,7 @@ int_f nh5eget_major_c(int_f* error_no, _fcd name) { int ret_val = -1; - const char c_name[H5E_LEN]; + char c_name[H5E_LEN]; hid_t c_error_no; c_error_no = (hid_t)*error_no; @@ -151,7 +151,7 @@ int_f nh5eget_minor_c(int_f* error_no, _fcd name) { int ret_val = -1; - const char c_name[H5E_LEN]; + char c_name[H5E_LEN]; hid_t c_error_no; c_error_no = (hid_t)*error_no; |