luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

frontend/postcoms.c, add variable `width' to command "print line ..."

This commit is contained in:
h_vogt 2015-12-13 10:34:27 +01:00 committed by rlar
parent 33c0dde68f
commit 1cd8bbf744
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/frontend/postcoms.c
View File

@ -143,6 +143,12 @@ com_print(wordlist *wl)
out_init();
if (!col) {
if (cp_getvar("width", CP_NUM, &i))
width = i;
if (width < 60)
width = 60;
if (width > BSIZE_SP - 2)
buf = TREALLOC(char, buf, width + 1);
for (v = vecs; v; v = v->v_link2) {
char *basename = vec_basename(v);
if (plotnames)
@ -186,7 +192,7 @@ com_print(wordlist *wl)
ll += (int) strlen(buf);
ll = (ll + 7) / 8;
ll = ll * 8 + 1;
if (ll > 60) {
if (ll > width) {
out_send("\n\t");
ll = 9;
} else {
@ -201,7 +207,7 @@ com_print(wordlist *wl)
ll += (int) strlen(buf);
ll = (ll + 7) / 8;
ll = ll * 8 + 1;
if (ll > 60) {
if (ll > width) {
out_send("\n\t");
ll = 9;
} else {
@ -211,7 +217,7 @@ com_print(wordlist *wl)
out_send(")\n");
} //end if (v->v_length == 1)
} //end if (v->v_rlength == 1)
}
} // end for loop
} else { /* Print in columns. */
if (cp_getvar("width", CP_NUM, &i))
width = i;