===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/awk/parse.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- src/usr.bin/awk/parse.c	1999/04/20 17:31:30	1.3
+++ src/usr.bin/awk/parse.c	1999/12/08 23:09:46	1.4
@@ -1,4 +1,4 @@
-/*	$OpenBSD: parse.c,v 1.3 1999/04/20 17:31:30 millert Exp $	*/
+/*	$OpenBSD: parse.c,v 1.4 1999/12/08 23:09:46 millert Exp $	*/
 /****************************************************************
 Copyright (C) Lucent Technologies 1997
 All Rights Reserved
@@ -36,7 +36,7 @@
 
 	x = (Node *) malloc(sizeof(Node) + (n-1)*sizeof(Node *));
 	if (x == NULL)
-		ERROR "out of space in nodealloc" FATAL;
+		FATAL("out of space in nodealloc");
 	x->nnext = NULL;
 	x->lineno = lineno;
 	return(x);
@@ -190,7 +190,7 @@
 	if (isvalue(p)) {
 		cp = (Cell *) (p->narg[0]);
 		if (isfcn(cp))
-			ERROR "%s is a function, not an array", cp->nval SYNTAX;
+			SYNTAX( "%s is a function, not an array", cp->nval );
 		else if (!isarr(cp)) {
 			xfree(cp->sval);
 			cp->sval = (char *) makesymtab(NSYMTAB);
@@ -210,7 +210,7 @@
 
 	x = node4(PASTAT2, a, b, c, itonp(paircnt));
 	if (paircnt++ >= PA2NUM)
-		ERROR "limited to %d pat,pat statements", PA2NUM SYNTAX;
+		SYNTAX( "limited to %d pat,pat statements", PA2NUM );
 	x->ntype = NSTAT;
 	return(x);
 }
@@ -237,7 +237,7 @@
 	int n;
 
 	if (isarr(v)) {
-		ERROR "`%s' is an array name and a function name", v->nval SYNTAX;
+		SYNTAX( "`%s' is an array name and a function name", v->nval );
 		return;
 	}
 	v->tval = FCN;