ГОСТ Р ИСОГГС 10303-26—2015
}
)
*+level;
len - H51get_name(mycompound_type, NULL,0);
ler. - H5Iget_name<mycompound_type, dataset_name, len+1>;
fprintf <rep_file,"is:" ,datasec_name);
mycorapour.d_type_size* H5Tget_size<mycompound_type);
mycompound_type_members - H5Tget_nmembers(mycompour.d_type);
/ /
// Handle membmer by member
//
for(jx - 0; jx< mycompound_type_members; jx++) {
indent О ;indent_nlf();
/ /
// Get the characteristics of the member
//
mymember_name
mymember_type
mymember_class
mymember_offset
- H5Tget_member_name(mycompound_type,jx);
- H5Tget_member_type(mycompound_type,jx);
- H5Tget_member_class(mycompound_type,jx);
- H5Tget_member_offset<mycompound_type,jx);
mymember_type_size - H5Tget_size{mymember_type) ;
myoffset - curr_offset + mymember_offset;
/ /
/ /
Branch on datatype.
/ /
switch(mymember_class){
case H5T_1NTEGER:
memcpy<imyinteger,mybuffer + myoffset,sizeof{long));
fprintf (repfile,"%s: ».lu",mymember_name,myinteger) ;
break;
case H5T_FL0AT:
memcpy(&myreal,mybuffer + myoffset,sizeof(double)>;
fprintf(repfile,"%s: if",mymember_name,myreal);
break;
case H5T_REFERENCE:
if(H5Tequal(obj_ref_tid,mymember_type)){
fprintf<rep_file,"%s: ",mymember_name);
memcpy<&obj_ref,mybuffer + myoffset,sizeof{hobj_ref_t));
if(rstat - dump_aggr_by_reference<mycompound_type,obj_ref))
GOTO ERR;
break;
case H5T_STR1NG:
memcpy{Smystring,mybuffer * myoffset,sizeof(char*));
fprintf(repfile,"is: is",mymember_name,mystring);
break;
case H5T_C0MP0UND:
fprintf(rep_file,"is: ",mymember_name);
if(rstat - dump_compour.d<mymember_type,myoffset,mybuffer) )
GOTO_ERR;
break;
case H5T_ENUM:
fprintf(rep_file,"is: ",mymember_name);
memcpy(imycolor,mybuffer + myoffset,sizeof{enurn colors_t));
if(rstat - H5Tenum_nameof(mymember_type,imycolor,enum_name,10))
GOTO_ERR;
if(rstat - H5Tenum_valueof(mymember_type,enum_r.ame,&myenumval))
60