NO_TSPEC
typeinfo("_Complex", NO_TSPEC, NO_TSPEC, 0, 0, ' '),
typeinfo(NULL, NO_TSPEC, NO_TSPEC, 0, 0, ' '),
typeinfo(NULL, NO_TSPEC, NO_TSPEC, 0, 0, ' '),
tspec_t rt = NO_TSPEC;
if (dl->d_abstract_type != NO_TSPEC)
if (dl->d_complex_mod != NO_TSPEC)
if (dl->d_sign_mod != NO_TSPEC)
if (dl->d_rank_mod != NO_TSPEC)
} else if (t == INT && dcs->d_sign_mod == NO_TSPEC) {
if (tp->t_tspec == NO_TSPEC) {
if (dcs->d_type != NULL || dcs->d_abstract_type != NO_TSPEC ||
dcs->d_sign_mod != NO_TSPEC || dcs->d_rank_mod != NO_TSPEC)
lint_assert(dcs->d_abstract_type == NO_TSPEC);
lint_assert(dcs->d_sign_mod == NO_TSPEC);
lint_assert(dcs->d_rank_mod == NO_TSPEC);
if (dcs->d_type != NULL || dcs->d_abstract_type != NO_TSPEC ||
dcs->d_rank_mod != NO_TSPEC || dcs->d_sign_mod != NO_TSPEC) {
dcs->d_abstract_type = NO_TSPEC;
dcs->d_sign_mod = NO_TSPEC;
dcs->d_rank_mod = NO_TSPEC;
else if (dcs->d_abstract_type == NO_TSPEC)
dcs->d_complex_mod = NO_TSPEC;
dcs->d_rank_mod = NO_TSPEC;
if (dcs->d_sign_mod != NO_TSPEC)
if (dcs->d_rank_mod != NO_TSPEC)
if (dcs->d_rank_mod == NO_TSPEC || dcs->d_rank_mod == LONG) {
if (dcs->d_complex_mod != NO_TSPEC
if (dcs->d_abstract_type != NO_TSPEC)
else if (t == COMPLEX && dcs->d_abstract_type == NO_TSPEC)
if (dcs->d_abstract_type != NO_TSPEC)
dcs->d_abstract_type = NO_TSPEC;
dcs->d_complex_mod = NO_TSPEC;
dcs->d_sign_mod = NO_TSPEC;
dcs->d_rank_mod = NO_TSPEC;
lint_assert(t == NO_TSPEC);
lint_assert(s == NO_TSPEC);
lint_assert(l == NO_TSPEC);
if (t == NO_TSPEC && s == NO_TSPEC && l == NO_TSPEC && c == NO_TSPEC)
if (t == NO_TSPEC && s == NO_TSPEC && (l == NO_TSPEC || l == LONG))
if (t == NO_TSPEC)
if (s == NO_TSPEC && t == INT)
if (l != NO_TSPEC && t == CHAR) {
l = NO_TSPEC;
l = NO_TSPEC;
l = NO_TSPEC;
l = NO_TSPEC;
if (t != INT && t != CHAR && (s != NO_TSPEC || l != NO_TSPEC)) {
l = s = NO_TSPEC;
if (l != NO_TSPEC)
tspec_t to = NO_TSPEC;
!(to == NO_TSPEC && sym->s_osdef) &&
} else if (to == NO_TSPEC && t == VOID) {
lint_assert(rt == NO_TSPEC);
tspec_t lt, rt, lst = NO_TSPEC, rst = NO_TSPEC;
tspec_t rt = mp->m_binary ? rtp->t_tspec : NO_TSPEC;
if (sz != NO_TSPEC)
to = NO_TSPEC;
tspec_t sz, t1, t2 = NO_TSPEC;
sz = NO_TSPEC;
if (sz != NO_TSPEC)
if (sz != NO_TSPEC || left || sign || space ||
if ((alt && fc != 'O') || sz != NO_TSPEC || !tflag)
if (sz == NO_TSPEC)
if (sz != NO_TSPEC || alt || zero)
if (sz != NO_TSPEC || alt || zero)
if (fwidth || prec || sz != NO_TSPEC || alt || zero)
tspec_t sz, t1 = NO_TSPEC, t2 = NO_TSPEC;
sz = NO_TSPEC;
if (sz != NO_TSPEC)
if (sz != NO_TSPEC || noasgn || fwidth)
if (sz != NO_TSPEC || !tflag)
if (sz != NO_TSPEC || !tflag)
if (sz != NO_TSPEC || !tflag)
if (sz != NO_TSPEC || !tflag)
if (sz != NO_TSPEC || !tflag)
if (sz != NO_TSPEC && sz != LONG && sz != LDOUBLE)
if (sz == NO_TSPEC) {
if (sz != NO_TSPEC)
t = NO_TSPEC;
if (t == NO_TSPEC)