diff --git a/src/frontend/plotting/plotit.c b/src/frontend/plotting/plotit.c index 211925142..9fa85c5c3 100644 --- a/src/frontend/plotting/plotit.c +++ b/src/frontend/plotting/plotit.c @@ -532,9 +532,10 @@ plotit(wordlist *wl, char *hcopy, char *devname) goto quit1; /* Now evaluate the names. */ - for (n = names, lv = NULL; n; n = n->pn_next) { + for (n = names, lv = NULL; n; n = n->pn_next) if (n->pn_value && (n->pn_value->v_length == 0) && - eq(n->pn_value->v_name, "vs")) { + eq(n->pn_value->v_name, "vs")) + { if (!lv) { fprintf(cp_err, "Error: misplaced vs arg\n"); goto quit; @@ -575,7 +576,6 @@ plotit(wordlist *wl, char *hcopy, char *devname) lv = dv; } - } /* free_pnode(names); pn:really should be commented out ? */ d->v_link2 = NULL; @@ -591,7 +591,7 @@ plotit(wordlist *wl, char *hcopy, char *devname) /* If there are higher dimensional vectors, transform them into a * family of vectors. */ - for (d = vecs, lv = NULL; d; d = d->v_link2) { + for (d = vecs, lv = NULL; d; d = d->v_link2) if (d->v_numdims > 1) { if (lv) lv->v_link2 = vec_mkfamily(d); @@ -604,7 +604,6 @@ plotit(wordlist *wl, char *hcopy, char *devname) } else { lv = d; } - } /* Now fill in the scales for vectors who aren't already fixed up. */ for (d = vecs; d; d = d->v_link2) @@ -684,13 +683,12 @@ plotit(wordlist *wl, char *hcopy, char *devname) /* Now patch up each vector with the compression and thestrchr * selection. */ - if (xcompress || xindices) { + if (xcompress || xindices) for (d = vecs; d; d = d->v_link2) { compress(d, xcompress, xindices); d->v_scale = vec_copy(d->v_scale); compress(d->v_scale, xcompress, xindices); } - } /* Transform for smith plots */ if (gtype == GRID_SMITH) { @@ -1003,9 +1001,8 @@ plotit(wordlist *wl, char *hcopy, char *devname) #ifdef TCL_MODULE if (devname && eq(devname, "blt")) { /* Just send the pairs to Tcl/Tk */ - for (d = vecs; d; d = d->v_link2) { + for (d = vecs; d; d = d->v_link2) blt_plot(d, oneval ? NULL : d->v_scale, (d == vecs) ? 1 : 0); - } rtn = TRUE; goto quit; }