Searched refs:class_is (Results 1 – 2 of 2) sorted by relevance
9388 gfc_code *class_is = NULL, *default_case = NULL; in resolve_select_type() local9719 if (class_is == NULL) in resolve_select_type()9721 class_is = body->block; in resolve_select_type()9722 tail = class_is; in resolve_select_type()9726 for (tail = class_is; tail->block; tail = tail->block) ; in resolve_select_type()9738 if (class_is) in resolve_select_type()9755 if (class_is->block) in resolve_select_type()9763 for (c1 = &class_is; (*c1) && (*c1)->block; c1 = &((*c1)->block)) in resolve_select_type()9792 for (body = class_is; body; body = body->block) in resolve_select_type()
9250 gfc_code *class_is = NULL, *default_case = NULL; in resolve_select_type() local9581 if (class_is == NULL) in resolve_select_type()9583 class_is = body->block; in resolve_select_type()9584 tail = class_is; in resolve_select_type()9588 for (tail = class_is; tail->block; tail = tail->block) ; in resolve_select_type()9600 if (class_is) in resolve_select_type()9617 if (class_is->block) in resolve_select_type()9625 for (c1 = &class_is; (*c1) && (*c1)->block; c1 = &((*c1)->block)) in resolve_select_type()9654 for (body = class_is; body; body = body->block) in resolve_select_type()