void DtInpStruct( void ) { //===================== // Initialize a struct. StructInit( ((sym_id)GetPtr())->u.sd.fl.sym_fields ); }
static void InitStructArr( sym_id fd, act_dim_list *dim ) { //============================================================= // Data initialize an array. unsigned_32 num_elts; num_elts = dim->num_elts; while( num_elts != 0 ) { StructInit( fd ); num_elts--; } }
static void StructInit( sym_id fd ) { //======================================= while( fd != NULL ) { if( fd->u.fd.typ == FT_STRUCTURE ) { StructInit( fd->u.fd.xt.record->fl.sym_fields ); } else { StructInitItem( fd ); if( fd->u.fd.dim_ext == NULL ) { DtOffset += fd->u.fd.xt.size; } } fd = fd->u.fd.link; } }
/* // DotInitialize // // Open the dot-command environment // // void */ void DotInitialize(int pass) { StructInit(); }