[svn-r5911]

Purpose:
    bug fix in 'ID to name' function
Description:
    the function replace_name was only checking for immutable datatypes
Solution:
added a new function H5T_is_named, that checks for named datatypes


Platforms tested:
windows 2000, linux, solaris with Fortran

1 files changed, 7 insertions, 6 deletions

diff --git a/src/H5G.c b/src/H5G.c
index 482a551..317c1e3 100644
--- a/src/H5G.c
+++ b/src/H5G.c
@@ -2594,6 +2594,8 @@ done:
  *-------------------------------------------------------------------------
  */
 
+
+
 herr_t H5G_replace_name( int type, H5G_entry_t *loc, const char *src_name, 
                         const char *dst_name, int op )
 {
@@ -2774,15 +2776,15 @@ done:
   FUNC_ENTER_NOAPI(H5G_replace_ent, FAIL);
   
   assert(obj_ptr);
-  
+ 
   /* avoid no named datatypes */
-  if( names->obj_type==H5I_DATATYPE && H5T_is_immutable((H5T_t*)obj_ptr)) 
+  if( names->obj_type==H5I_DATATYPE && !H5T_is_named((H5T_t*)obj_ptr)) 
   {
    /* Do not exit loop */
    ret_value = SUCCEED;
    goto done;
   }
-  
+ 
   /* Get the symbol table entry */
   switch(names->obj_type) {
   case H5I_GROUP:
@@ -2800,9 +2802,8 @@ done:
     "unknown data object");
   }
 
-		if( !ent) 
-			goto done;
-  
+		assert( ent );
+ 
   
   /* Check if is a mounted file */
   if(ent->file->mtab.parent) {