xlint/lint1/init.c

131 	istk_t	*istk;
137 	while ((istk = initstk) != NULL) {
138 		initstk = istk->i_nxt;
139 		free(istk);
149 	istk = initstk = xcalloc(1, sizeof (istk_t));
150 	istk->i_subt = initsym->s_type;
151 	istk->i_cnt = 1;
161 	istk_t	*istk;
164 	initstk = (istk = initstk)->i_nxt;
167 	free(istk);
169 	istk = initstk;
171 	istk->i_cnt--;
172 	if (istk->i_cnt < 0)
175 	DPRINTF(("popi2(): %d %s\n", istk->i_cnt,
177 	if (istk->i_cnt >= 0 && namedmem != NULL) {
178 		DPRINTF(("popi2(): %d %s %s\n", istk->i_cnt,
179 		    tyname(buf, sizeof(buf), istk->i_type), namedmem->n_name));
180 		for (m = istk->i_type->t_str->memb; m != NULL; m = m->s_nxt) {
184 				istk->i_subt = m->s_type;
185 				istk->i_cnt++;
192 		istk->i_namedmem = 1;
199 	if (istk->i_cnt > 0 && istk->i_type->t_tspec == STRUCT &&
200 	    !istk->i_namedmem) {
202 			m = istk->i_mem = istk->i_mem->s_nxt;
206 		istk->i_subt = m->s_type;
243 	istk_t	*istk;
247 	istk = initstk;
250 	if (istk->i_cnt == 0) {
252 		    istk->i_type)));
257 		if (istk->i_nxt->i_nxt != NULL)
259 		istk->i_cnt = 1;
260 		if (istk->i_type->t_tspec != ARRAY)
262 		istk->i_type->t_dim++;
264 		setcompl(istk->i_type, 0);
267 	if (istk->i_cnt <= 0)
269 	if (istk->i_type != NULL && issclt(istk->i_type->t_tspec))
273 	initstk->i_nxt = istk;
274 	initstk->i_type = istk->i_subt;
279 	istk = initstk;
281 	DPRINTF(("pushinit(%s)\n", tyname(buf, sizeof(buf), istk->i_type)));
282 	switch (istk->i_type->t_tspec) {
286 			free(istk);
290 		if (incompl(istk->i_type) && istk->i_nxt->i_nxt != NULL) {
296 		istk->i_subt = istk->i_type->t_subt;
297 		istk->i_nolimit = incompl(istk->i_type);
298 		istk->i_cnt = istk->i_type->t_dim;
300 		    tyname(buf, sizeof(buf), istk->i_subt), istk->i_cnt,
309 		if (incompl(istk->i_type)) {
317 		    tyname(buf, sizeof(buf), istk->i_type),
319 		for (m = istk->i_type->t_str->memb; m != NULL; m = m->s_nxt) {
332 				istk->i_mem = m;
333 				istk->i_subt = m->s_type;
337 			istk->i_namedmem = 1;
342 				istk->i_mem = m;
343 				istk->i_subt = m->s_type;
346 			cnt = istk->i_type->t_tspec == STRUCT ? 2 : 1;
354 		istk->i_cnt = istk->i_type->t_tspec == STRUCT ? cnt : 1;
359 			free(istk);
363 		istk->i_cnt = 1;
371 	istk_t	*istk;
373 	istk = initstk;
379 	if (istk->i_cnt == 0 && !istk->i_nolimit && !istk->i_namedmem) {
380 		switch (istk->i_type->t_tspec) {
596 	istk_t	*istk;
603 	istk = initstk;
610 	if (istk->i_subt != NULL && istk->i_subt->t_tspec == ARRAY) {
611 		t = istk->i_subt->t_subt->t_tspec;
619 		istk = initstk;
620 	} else if (istk->i_type != NULL && istk->i_type->t_tspec == ARRAY) {
621 		t = istk->i_type->t_subt->t_tspec;
631 		if (istk->i_cnt != istk->i_type->t_dim)
640 	if (istk->i_nolimit) {
641 		istk->i_nolimit = 0;
642 		istk->i_type->t_dim = len + 1;
644 		setcompl(istk->i_type, 0);
646 		if (istk->i_type->t_dim < len) {
653 	istk->i_cnt = 0;