med_err MEDsupportMeshInfoByName(const med_idt fid, const char * const supportmeshname, med_int * const spacedim, med_int * const meshdim, char * const description, med_axis_type * const axistype, char * const axisname, char * const axisunit) { med_err _ret=-1; char _dtunit[MED_SNAME_SIZE+1]=""; med_sorting_type _sortingtype=MED_SORT_UNDEF; med_mesh_type _meshtype = MED_UNDEF_MESH_TYPE; med_int _nstep=0; /* * On inhibe le gestionnaire d'erreur HDF 5 */ _MEDmodeErreurVerrouiller(); if ( _MEDmeshInfoByName(fid, MED_MESH_SUPPORT_GRP, supportmeshname, spacedim, meshdim, &_meshtype, description, _dtunit, &_sortingtype, &_nstep, axistype, axisname, axisunit) < 0) { MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_MESH_MSG); SSCRUTE(supportmeshname);SSCRUTE("MEDmeshInfoByName"); goto ERROR; } _ret = 0; ERROR: return _ret; }
void _MEDmeshInfoByName30(int dummy, ...) { /* med_idt fid; */ /* char * const meshname; */ /* med_int * const spacedim; */ /* med_int * const meshdim; */ /* med_mesh_type * const meshtype; */ /* char * const description; */ /* char * const dtunit; */ /* med_sorting_type * const sortingtype; */ /* med_int * const nstep; */ /* med_axis_type * const axistype; */ /* char * const axisname; */ /* char * const axisunit; */ med_err _ret=-1; MED_VARGS_DECL(, med_idt ,, fid ); MED_VARGS_DECL(, char * , const , meshname ); MED_VARGS_DECL(, med_int * , const , spacedim ); MED_VARGS_DECL(, med_int * , const , meshdim ); MED_VARGS_DECL(, med_mesh_type * , const , meshtype ); MED_VARGS_DECL(, char * , const , description ); MED_VARGS_DECL(, char * , const , dtunit ); MED_VARGS_DECL(, med_sorting_type *, const , sortingtype ); MED_VARGS_DECL(, med_int * , const , nstep ); MED_VARGS_DECL(, med_axis_type * , const , axistype ); MED_VARGS_DECL(, char * , const , axisname ); MED_VARGS_DECL(, char * , const , axisunit ); MED_VARGS_DECL(, med_err * ,, fret ); va_list params; va_start(params,dummy); MED_VARGS_DEF(, med_idt ,, fid ); MED_VARGS_DEF(, char * , const , meshname ); MED_VARGS_DEF(, med_int * , const , spacedim ); MED_VARGS_DEF(, med_int * , const , meshdim ); MED_VARGS_DEF(, med_mesh_type * , const , meshtype ); MED_VARGS_DEF(, char * , const , description ); MED_VARGS_DEF(, char * , const , dtunit ); MED_VARGS_DEF(, med_sorting_type *, const , sortingtype ); MED_VARGS_DEF(, med_int * , const , nstep ); MED_VARGS_DEF(, med_axis_type * , const , axistype ); MED_VARGS_DEF(, char * , const , axisname ); MED_VARGS_DEF(, char * , const , axisunit ); MED_VARGS_DEF(, med_err * ,, fret ); /* * On inhibe le gestionnaire d'erreur HDF 5 */ _MEDmodeErreurVerrouiller(); if ( _MEDmeshInfoByName(fid, MED_MAA, meshname, spacedim, meshdim, meshtype, description, dtunit, sortingtype, nstep,axistype, axisname, axisunit) < 0) { MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_MESH_MSG); SSCRUTE(meshname);SSCRUTE("MEDmeshInfoByName"); goto ERROR; } _ret = 0; ERROR: va_end(params); *fret = _ret; return; }