114194Sedward #ifndef lint 2*15681Sedward static char *sccsid = "@(#)error.c 3.4 83/12/07"; 314194Sedward #endif 414194Sedward 514194Sedward #include "defs.h" 615580Sedward #include "value.h" 715580Sedward #include "context.h" 814194Sedward 914418Sedward #define ERRLINES 10 /* number of lines for errwin */ 1014194Sedward 1114194Sedward /*VARARGS1*/ 1214194Sedward error(fmt, a, b, c, d, e, f, g, h) 1314194Sedward char *fmt; 1414194Sedward { 15*15681Sedward register struct ww *w; 16*15681Sedward 1715580Sedward if (cx.x_type != X_FILE) { 1814194Sedward if (terse) 1914418Sedward wwbell(); 2014194Sedward else { 2114418Sedward (void) wwprintf(cmdwin, fmt, a, b, c, d, e, f, g, h); 2214418Sedward (void) wwputs(" ", cmdwin); 2314194Sedward } 2414194Sedward return; 2514194Sedward } 26*15681Sedward if (cx.x_noerrwin) 2714194Sedward return; 28*15681Sedward if ((w = cx.x_errwin) == 0) { 2914194Sedward char buf[512]; 3014194Sedward 3115580Sedward (void) sprintf(buf, "Errors from %s", cx.x_filename); 32*15681Sedward if ((w = cx.x_errwin = openiwin(ERRLINES, buf)) == 0) { 33*15681Sedward (void) wwputs("Can't open error window. ", cmdwin); 34*15681Sedward cx.x_noerrwin = 1; 3514194Sedward return; 3614194Sedward } 3714194Sedward } 38*15681Sedward if (w->ww_cur.r >= w->ww_w.b - 2) { 39*15681Sedward waitnl(w); 40*15681Sedward (void) wwputs("\033E", w); 4114194Sedward } 42*15681Sedward (void) wwprintf(w, "line %d: ", cx.x_lineno); 43*15681Sedward (void) wwprintf(w, fmt, a, b, c, d, e, f, g, h); 44*15681Sedward (void) wwputc('\n', w); 4514194Sedward } 4614194Sedward 4715580Sedward err_end() 4814194Sedward { 4915580Sedward if (cx.x_errwin != 0) { 5015580Sedward waitnl(cx.x_errwin); 5115580Sedward closeiwin(cx.x_errwin); 5215580Sedward cx.x_errwin = 0; 5314194Sedward } 5414194Sedward } 55