Browse Source

com_spec(), use for(;;) loops

rlar 14 years ago
parent
commit
5a58281e7b
  1. 20
      src/frontend/spec.c

20
src/frontend/spec.c

@ -166,36 +166,34 @@ com_spec(wordlist *wl)
}
}
pn = ft_getpnames(wl, TRUE);
names = pn;
names = ft_getpnames(wl, TRUE);
vlist = NULL;
ngood = 0;
while (pn) {
for (pn = names; pn; pn = pn->pn_next) {
vec = ft_evaluate(pn);
pn = pn->pn_next;
while (vec) {
for (; vec; vec = vec->v_link2) {
if (vec->v_length != tlen) {
fprintf(cp_err, "Error: lengths don't match: %d, %d\n",
vec->v_length, tlen);
vec = vec->v_link2;
continue;
}
if (!isreal(vec)) {
fprintf(cp_err, "Error: %s isn't real!\n",
vec->v_name);
vec = vec->v_link2;
fprintf(cp_err, "Error: %s isn't real!\n", vec->v_name);
continue;
}
if (vec->v_type == SV_TIME) {
vec = vec->v_link2;
continue;
}
if (!vlist)
vlist = vec;
else
lv->v_link2 = vec;
lv = vec;
vec = vec->v_link2;
ngood++;
}
}

Loading…
Cancel
Save