* Copyright (c) 1983 Regents of the University of California.
* Redistribution and use in source and binary forms are permitted
* provided that the above copyright notice and this paragraph are
* duplicated in all such forms and that any documentation,
* advertising materials, and other materials related to such
* distribution and use acknowledge that the software was developed
* by the University of California, Berkeley. The name of the
* University may not be used to endorse or promote products derived
* from this software without specific prior written permission.
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
static char sccsid
[] = "@(#)error.c 3.14 (Berkeley) %G%";
#define ERRLINES 10 /* number of lines for errwin */
error(fmt
, a
, b
, c
, d
, e
, f
, g
, h
)
register struct context
*x
;
for (x
= &cx
; x
!= 0 && x
->x_type
!= X_FILE
; x
= x
->x_link
)
wwprintf(cmdwin
, fmt
, a
, b
, c
, d
, e
, f
, g
, h
);
if ((w
= x
->x_errwin
) == 0) {
(void) sprintf(buf
, "Errors from %s", x
->x_filename
);
if ((w
= x
->x_errwin
= openiwin(ERRLINES
, buf
)) == 0) {
wwputs("Can't open error window. ", cmdwin
);
wwprintf(w
, "line %d: ", x
->x_lineno
);
wwprintf(w
, fmt
, a
, b
, c
, d
, e
, f
, g
, h
);
if (cx
.x_type
== X_FILE
&& cx
.x_errwin
!= 0) {