summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Ff.c
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2009-06-10 16:03:42 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2009-06-10 16:03:42 (GMT)
commit66153395600210692eac9170794bfff3804106c8 (patch)
tree6a17511c8745515f7015f634c469c1a8b1577461 /fortran/src/H5Ff.c
parent7d5ef3e8adb287be145a03f47e2099a04cb7a8cb (diff)
downloadhdf5-66153395600210692eac9170794bfff3804106c8.zip
hdf5-66153395600210692eac9170794bfff3804106c8.tar.gz
hdf5-66153395600210692eac9170794bfff3804106c8.tar.bz2
[svn-r17023] Description:
Added debug statements in order to investigate intermittent failing of test on honest4 at NCSA, remove after debugging.
Diffstat (limited to 'fortran/src/H5Ff.c')
-rw-r--r--fortran/src/H5Ff.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/fortran/src/H5Ff.c b/fortran/src/H5Ff.c
index 674d702..ea7e5cf 100644
--- a/fortran/src/H5Ff.c
+++ b/fortran/src/H5Ff.c
@@ -72,7 +72,13 @@ nh5fcreate_c(_fcd name, int_f *namelen, int_f *access_flags, hid_t_f* crt_prp, h
/*
* Call H5Fcreate function.
*/
+ printf("\n DEBUG STATEMENTS IN H5Ff.c \n");
+ printf("filename = %s \n", c_name);
+ printf("access_flags = %d \n", (int)c_access_flags);
+ printf("c_crt_prp = %d \n",(int)c_crt_prp);
+ printf("c_acc_prp = %d \n",(int)c_acc_prp);
c_file_id = H5Fcreate(c_name, c_access_flags, c_crt_prp, c_acc_prp);
+ printf("c_file_id = %d \n",(int)c_file_id);
if (c_file_id < 0) return ret_value;
*file_id = c_file_id;