Cross Reference: /ast/src/cmd/dsslib/flat/flat.c

Lines Matching defs:structure
121 	Cxstructure_t	structure;	/* structure info		*/
312 		if (w->field->structure.level > 1 && !(((Field_t*)w->field->structure.parent))->structref)
314 			b = ((Field_t*)w->field->structure.parent)->record;
319 				if (!(v = flatget(r, w->field->structure.parent->index)))
1273 	level = fields->structure.level;
1276 			if (f->structure.level < level)
1300 		if (f->structure.members && !f->record && !(f->record = recinit(flat, file, r, f->table, f->next, 0, i + 1, disc)))
1302 		if (f->structure.level == level)
1893 		dict = ((Field_t*)flat->lastfield->structure.parent)->table->dict;
2081 	if (name && !((Field_t*)flat->lastfield->structure.parent)->table && !(((Field_t*)flat->lastfield->structure.parent)->table = tabinit(flat, (Dssdisc_t*)disc)))
2155 	"FIELD",	"Field structure.",
2195 		f->variable.structure = &f->structure;
2198 			f->structure.parent = p->structure.parent;
2199 			f->structure.level = p->structure.level;
2200 			((Field_t*)fp->tail)->structure.next = &f->variable;
2207 				f->structure.parent = &p->variable;
2208 				f->structure.level = p->structure.level + 1;
2210 					t->structure.next = &f->variable;
2212 					p->structure.members = &f->variable;
2217 				f->structure.level = 1;
2218 				f->structure.parent = &flat->root.variable;
3272 			if (f->structure.members)
3281 		else if (f->structure.members)
3287 				(*disc->errorf)(NiL, disc, 1, "%s: structure attributes ignored", f->variable.name);
3449 				if (f->structure.members)
3489 				if (f->structure.members)
3491 					f->structure.size = offset;
3507 				if (!f->structure.level)
3508 					f->variable.structure = 0;
3558 				if (!f->structure.next)
3561 					if (v->structure)
3562 						while (!v->structure->next && (v = v->structure->parent) && v->structure)
3564 							v->structure->size = offset - v->structure->size;
3569 									offset += (v->array->size - 1) * v->structure->size;
3625 				if (f->structure.members)
3627 					f->structure.size = offset;
3644 				if (f->structure.level)
3645 					n += sfprintf(sfstdout, "/*%02d*/", f->structure.level);
3647 					f->variable.structure = 0;
3703 				if (!f->structure.next)
3706 					if (v->structure)
3707 						while (!v->structure->next && (v = v->structure->parent) && v->structure)
3709 							v->structure->size = offset - v->structure->size;
3714 									offset += (v->array->size - 1) * v->structure->size;