Salome HOME
Initialisation de la base KERNEL avec la version operationnelle de KERNEL_SRC issue...
[modules/kernel.git] / src / HDFPersist / HDFobjectType.c
1 #include "hdfi.h"
2
3 hdf_err 
4 HDFobjectType(hdf_idt id, char *name, hdf_object_type *type)
5 {
6   hdf_object_type rep;
7   hdf_bool follow = 1;
8   H5G_stat_t buf;
9   hdf_err ret;
10
11   if ((ret = H5Gget_objinfo(id,name,follow,&buf) < 0))
12     return -1; 
13   
14   switch(buf.type)
15     {
16     case H5G_GROUP :
17       *type = HDF_GROUP;
18       break;
19
20     case H5G_DATASET :
21       *type = HDF_DATASET;
22       break;
23      
24     default :
25       return -1;
26     }
27
28   return 0;
29 }