Browse Source

plotit.c #9/9, whitespace

rlar 14 years ago
parent
commit
46980f2cc6
  1. 57
      src/frontend/plotting/plotit.c

57
src/frontend/plotting/plotit.c

@ -540,41 +540,41 @@ plotit(wordlist *wl, char *hcopy, char *devname)
fprintf(cp_err, "Error: misplaced vs arg\n");
goto quit;
}
if ((n = n->pn_next) == NULL) {
fprintf(cp_err, "Error: missing vs arg\n");
goto quit;
}
dv = ft_evaluate(n);
if (!dv)
goto quit;
if ((n = n->pn_next) == NULL) {
fprintf(cp_err, "Error: missing vs arg\n");
goto quit;
}
if (lastvs)
lv = lastvs->v_link2;
else
lv = vecs;
dv = ft_evaluate(n);
if (!dv)
goto quit;
while (lv) {
lv->v_scale = dv;
lastvs = lv;
lv = lv->v_link2;
}
if (lastvs)
lv = lastvs->v_link2;
else
lv = vecs;
} else {
while (lv) {
lv->v_scale = dv;
lastvs = lv;
lv = lv->v_link2;
}
dv = ft_evaluate(n);
} else {
if (!dv)
goto quit;
dv = ft_evaluate(n);
if (!dv)
goto quit;
if (!d)
vecs = dv;
else
d->v_link2 = dv;
if (!d)
vecs = dv;
else
d->v_link2 = dv;
for (d = dv; d->v_link2; d = d->v_link2)
;
for (d = dv; d->v_link2; d = d->v_link2)
;
lv = dv;
lv = dv;
}
/* free_pnode(names); pn:really should be commented out ? */
@ -945,6 +945,7 @@ plotit(wordlist *wl, char *hcopy, char *devname)
vecs->v_scale = newv_scale;
}
ft_agraf(xlims, ylims,
vecs->v_scale, vecs->v_plot, vecs,
xdelta ? *xdelta : 0.0,
@ -1030,8 +1031,8 @@ plotit(wordlist *wl, char *hcopy, char *devname)
ft_graf(d, oneval ? NULL : d->v_scale, FALSE);
gr_clean();
rtn = TRUE;
quit:
free_pnode(names);
quit1:

Loading…
Cancel
Save