From 0a379e1cc1a0cfcc51d3bb1a3e90cbc3310aa820 Mon Sep 17 00:00:00 2001 From: Quincey Koziol Date: Fri, 5 Sep 1997 14:33:15 -0500 Subject: [svn-r70] Added clarifying comments from code review meeting to H5Mflush and H5D_flush. --- src/H5D.c | 3 ++- src/H5M.c | 8 +++++--- 2 files changed, 7 insertions(+), 4 deletions(-) diff --git a/src/H5D.c b/src/H5D.c index 95990b8..4c1dbdd 100644 --- a/src/H5D.c +++ b/src/H5D.c @@ -256,7 +256,8 @@ done: DESCRIPTION This function flushes a dataset to disk. (i.e. makes the disk version agree with what's in memory, it does _not_ update the memory version with - any changes on disk) + any changes on disk) This function is primarily called from H5Mflush, but + internal library routines may call it also. --------------------------------------------------------------------------*/ herr_t H5D_flush(hatom_t oid) { diff --git a/src/H5M.c b/src/H5M.c index 04cbeaf..b4a18a4 100644 --- a/src/H5M.c +++ b/src/H5M.c @@ -614,17 +614,19 @@ done: --------------------------------------------------------------------------*/ hatom_t H5Mflush(hatom_t oid) { - group_t group=H5Aatom_group(oid); /* Atom group for incoming object */ + group_t group; /* Atom group for incoming object */ intn i; /* local counting variable */ herr_t ret_value = SUCCEED; - FUNC_ENTER(H5Mflush, H5M_init_interface, FAIL); + FUNC_ENTER(H5Mflush, H5M_init_interface, FAIL); /* Insert function initialization code and variables */ /* Clear errors and check args and all the boring stuff. */ H5ECLEAR; + group=H5Aatom_group(oid); /* look up group for incoming object */ if(group<=BADGROUP || group>=MAXGROUP) HGOTO_ERROR(H5E_ARGS, H5E_BADRANGE, FAIL); + /* Find correct function pointer set from static array */ i=H5M_find_type(group); if(meta_func_arr[i].flush==NULL) HGOTO_ERROR(H5E_INTERNAL, H5E_UNSUPPORTED, FAIL); @@ -638,7 +640,7 @@ done: /* Normal function cleanup */ - FUNC_LEAVE(ret_value); + FUNC_LEAVE(ret_value); /* Insert function prologue code */ } /* end H5Mflush() */ /*-------------------------------------------------------------------------- -- cgit v0.12