summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Rf.c
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2005-08-13 20:53:35 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2005-08-13 20:53:35 (GMT)
commit6b45f5172ccb4311e0be9ae15da3758abb6b0e67 (patch)
tree5a7a112fe7a8a98c6fecb45b513789d15962eb3d /fortran/src/H5Rf.c
parent6562465a2c2a58cfbc2f47bf60bb538f7a783933 (diff)
downloadhdf5-6b45f5172ccb4311e0be9ae15da3758abb6b0e67.zip
hdf5-6b45f5172ccb4311e0be9ae15da3758abb6b0e67.tar.gz
hdf5-6b45f5172ccb4311e0be9ae15da3758abb6b0e67.tar.bz2
[svn-r11245] Purpose:
Code cleanup Description: Trim trailing whitespace, which is making 'diff'ing the two branches difficult. Solution: Ran this script in each directory: foreach f (*.[ch] *.cpp) sed 's/[[:blank:]]*$//' $f > sed.out && mv sed.out $f end Platforms tested: FreeBSD 4.11 (sleipnir) Too minor to require h5committest
Diffstat (limited to 'fortran/src/H5Rf.c')
-rw-r--r--fortran/src/H5Rf.c66
1 files changed, 33 insertions, 33 deletions
diff --git a/fortran/src/H5Rf.c b/fortran/src/H5Rf.c
index 843c2ea..808bb90 100644
--- a/fortran/src/H5Rf.c
+++ b/fortran/src/H5Rf.c
@@ -19,10 +19,10 @@
/*----------------------------------------------------------------------------
* Name: h5rcreate_object_c
* Purpose: Call H5Rcreate to create a reference to an object
- * Inputs: loc_id - file or group identifier
- * name - name of the dataset
+ * Inputs: loc_id - file or group identifier
+ * name - name of the dataset
* namelen - name length
- * Outputs: ref - reference to the object
+ * Outputs: ref - reference to the object
* Returns: 0 on success, -1 on failure
* Programmer: Elena Pourmal
* Wednesday, December 1, 1999
@@ -42,7 +42,7 @@ nh5rcreate_object_c (haddr_t_f *ref, hid_t_f *loc_id, _fcd name, int_f *namelen)
* Convert FORTRAN name to C name
*/
c_namelen = *namelen;
- c_name = (char *)HD5f2cstring(name, c_namelen);
+ c_name = (char *)HD5f2cstring(name, c_namelen);
if (c_name == NULL) return ret_value;
/*
@@ -56,19 +56,19 @@ nh5rcreate_object_c (haddr_t_f *ref, hid_t_f *loc_id, _fcd name, int_f *namelen)
*ref=(haddr_t_f)ref_c;
ret_value = 0;
}
-
+
return ret_value;
-}
+}
/*----------------------------------------------------------------------------
* Name: h5rcreate_region_c
* Purpose: Call H5Rcreate to create a reference to dataset region
- * region
- * Inputs: loc_id - file or group identifier
- * name - name of the dataset
+ * region
+ * Inputs: loc_id - file or group identifier
+ * name - name of the dataset
* namelen - name length
* space_id - dataset space identifier
- * Outputs: ref - reference to the dataset region
+ * Outputs: ref - reference to the dataset region
* Returns: 0 on success, -1 on failure
* Programmer: Elena Pourmal
* Wednesday, December 1, 1999
@@ -89,7 +89,7 @@ nh5rcreate_region_c (int_f *ref, hid_t_f *loc_id, _fcd name, int_f *namelen, hid
* Convert FORTRAN name to C name
*/
c_namelen = *namelen;
- c_name = (char *)HD5f2cstring(name, c_namelen);
+ c_name = (char *)HD5f2cstring(name, c_namelen);
if (c_name == NULL) return ret_value;
/*
@@ -105,14 +105,14 @@ nh5rcreate_region_c (int_f *ref, hid_t_f *loc_id, _fcd name, int_f *namelen, hid
ret_value = 0;
}
return ret_value;
-}
+}
/*----------------------------------------------------------------------------
* Name: h5rdereference_region_c
* Purpose: Call H5Rdereference to dereference to dataset region
- * Inputs: dset_id - dataset identifier
- * ref - reference to the dataset region
- * Outputs: obj_id - dereferenced dataset identifier
+ * Inputs: dset_id - dataset identifier
+ * ref - reference to the dataset region
+ * Outputs: obj_id - dereferenced dataset identifier
* Returns: 0 on success, -1 on failure
* Programmer: Elena Pourmal
* Wednesday, December 1, 1999
@@ -135,17 +135,17 @@ nh5rdereference_region_c (hid_t_f *dset_id, int_f *ref, hid_t_f *obj_id)
c_obj_id = H5Rdereference(c_dset_id, H5R_DATASET_REGION, &ref_c);
if(c_obj_id < 0) return ret_value;
*obj_id = (hid_t_f)c_obj_id;
- ret_value = 0;
+ ret_value = 0;
return ret_value;
-}
+}
/*----------------------------------------------------------------------------
* Name: h5rdereference_object_c
- * Purpose: Call H5Rdereference to dereference an object
- * Inputs: dset_id - dataset identifier
- * ref - reference to an object
- * Outputs: obj_id - dereferenced object identifier
+ * Purpose: Call H5Rdereference to dereference an object
+ * Inputs: dset_id - dataset identifier
+ * ref - reference to an object
+ * Outputs: obj_id - dereferenced object identifier
* Returns: 0 on success, -1 on failure
* Programmer: Elena Pourmal
* Wednesday, December 1, 1999
@@ -168,16 +168,16 @@ nh5rdereference_object_c (hid_t_f *dset_id, haddr_t_f *ref, hid_t_f *obj_id)
c_obj_id = H5Rdereference(c_dset_id, H5R_OBJECT, &ref_c);
if(c_obj_id < 0) return ret_value;
*obj_id = (hid_t_f)c_obj_id;
- ret_value = 0;
+ ret_value = 0;
return ret_value;
}
/*----------------------------------------------------------------------------
* Name: h5rget_region_region_object_c
- * Purpose: Call H5Rget_region to dereference dataspace region
- * Inputs: dset_id - dataset identifier
- * ref - reference to the dataset region
- * Outputs: space_id - dereferenced dataset dataspace identifier
+ * Purpose: Call H5Rget_region to dereference dataspace region
+ * Inputs: dset_id - dataset identifier
+ * ref - reference to the dataset region
+ * Outputs: space_id - dereferenced dataset dataspace identifier
* Returns: 0 on success, -1 on failure
* Programmer: Elena Pourmal
* Wednesday, December 1, 1999
@@ -200,17 +200,17 @@ nh5rget_region_region_c (hid_t_f *dset_id, int_f *ref, hid_t_f *space_id)
c_space_id = H5Rget_region(c_dset_id, H5R_DATASET_REGION, &ref_c);
if(c_space_id < 0) return ret_value;
*space_id = (hid_t_f)c_space_id;
- ret_value = 0;
+ ret_value = 0;
return ret_value;
}
/*----------------------------------------------------------------------------
* Name: h5rget_object_type_obj_c
- * Purpose: Call H5Rget_object_type to retrieve the type of the object reference points
- * to
- * Inputs: dset_id - dataset identifier
- * ref - reference to the dataset region
- * Outputs: obj_type - type of dereferenced object
+ * Purpose: Call H5Rget_object_type to retrieve the type of the object reference points
+ * to
+ * Inputs: dset_id - dataset identifier
+ * ref - reference to the dataset region
+ * Outputs: obj_type - type of dereferenced object
* Returns: 0 on success, -1 on failure
* Programmer: Elena Pourmal
* Wednesday, December 1, 1999
@@ -233,6 +233,6 @@ nh5rget_object_type_obj_c (hid_t_f *dset_id, haddr_t_f *ref, int_f *obj_type)
c_obj_type = H5Rget_obj_type(c_dset_id, H5R_OBJECT, &ref_c);
if(c_obj_type < 0) return ret_value;
*obj_type = (int_f)c_obj_type;
- ret_value = 0;
+ ret_value = 0;
return ret_value;
}