===================================================================
RCS file: /cvs/mandoc/Attic/mdocml.c,v
retrieving revision 1.38
retrieving revision 1.41
diff -u -p -r1.38 -r1.41
--- mandoc/Attic/mdocml.c	2009/01/09 14:45:44	1.38
+++ mandoc/Attic/mdocml.c	2009/01/12 16:39:57	1.41
@@ -1,4 +1,4 @@
-/* $Id: mdocml.c,v 1.38 2009/01/09 14:45:44 kristaps Exp $ */
+/* $Id: mdocml.c,v 1.41 2009/01/12 16:39:57 kristaps Exp $ */
 /*
  * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -192,6 +192,7 @@ print_node(const struct mdoc_node *n, int indent)
 	params = NULL;
 	sz = 0;
 
+	/* FIXME: put parts of this in util.c. */
 	switch (n->type) {
 	case (MDOC_TEXT):
 		assert(NULL == n->child);
@@ -199,25 +200,25 @@ print_node(const struct mdoc_node *n, int indent)
 		t = "text";
 		break;
 	case (MDOC_BODY):
-		p = mdoc_macronames[n->data.body.tok];
+		p = mdoc_macronames[n->tok];
 		t = "block-body";
 		break;
 	case (MDOC_HEAD):
-		p = mdoc_macronames[n->data.head.tok];
+		p = mdoc_macronames[n->tok];
 		t = "block-head";
 		break;
 	case (MDOC_TAIL):
-		p = mdoc_macronames[n->data.tail.tok];
+		p = mdoc_macronames[n->tok];
 		t = "block-tail";
 		break;
 	case (MDOC_ELEM):
-		p = mdoc_macronames[n->data.elem.tok];
+		p = mdoc_macronames[n->tok];
 		t = "element";
 		argv = n->data.elem.argv;
 		argc = n->data.elem.argc;
 		break;
 	case (MDOC_BLOCK):
-		p = mdoc_macronames[n->data.block.tok];
+		p = mdoc_macronames[n->tok];
 		t = "block";
 		argv = n->data.block.argv;
 		argc = n->data.block.argc;
@@ -237,14 +238,18 @@ print_node(const struct mdoc_node *n, int indent)
 
 	for (i = 0; i < (int)argc; i++) {
 		(void)printf(" -%s", mdoc_argnames[argv[i].arg]);
+		if (j > 0)
+			(void)printf(" [");
 		for (j = 0; j < (int)argv[i].sz; j++)
-			(void)printf(" \"%s\"", argv[i].value[j]);
+			(void)printf(" [%s]", argv[i].value[j]);
+		if (j > 0)
+			(void)printf(" ]");
 	}
 
 	for (i = 0; i < (int)sz; i++)
-		(void)printf(" \"%s\"", params[i]);
+		(void)printf(" [%s]", params[i]);
 
-	(void)printf("\n");
+	(void)printf(" %d:%d\n", n->line, n->pos);
 
 	if (n->child)
 		print_node(n->child, indent + 1);
@@ -328,7 +333,6 @@ msg_err(void *arg, int line, int col, enum mdoc_err ty
 {
 	char		 *lit;
 	struct md_parse	 *p;
-	int		  i;
 
 	p = (struct md_parse *)arg;
 
@@ -409,11 +413,20 @@ msg_err(void *arg, int line, int col, enum mdoc_err ty
 		lit = "syntax: expected value for macro argument";
 		break;
 	case (ERR_SYNTAX_ARGBAD):
-		lit = "syntax: invalid value for macro argument";
+		lit = "syntax: invalid value(s) for macro argument";
 		break;
+	case (ERR_SYNTAX_ARGMISS):
+		lit = "syntax: missing required argument(s) for macro";
+		break;
 	case (ERR_SYNTAX_ARGMANY):
 		lit = "syntax: too many values for macro argument";
 		break;
+	case (ERR_SYNTAX_CHILDBAD):
+		lit = "syntax: invalid child for parent macro";
+		break;
+	case (ERR_SYNTAX_PARENTBAD):
+		lit = "syntax: invalid parent for macro";
+		break;
 	case (ERR_SYNTAX_CHILDHEAD):
 		lit = "syntax: expected only block-header section";
 		break;
@@ -431,18 +444,8 @@ msg_err(void *arg, int line, int col, enum mdoc_err ty
 		/* NOTREACHED */
 	}
 
-	(void)fprintf(stderr, "%s:%d: error: %s", p->name, p->lnn, lit);
-
-	if (p->dbg < 1) {
-		(void)fprintf(stderr, " (column %d)\n", col);
-		return(0);
-	} 
-
-	(void)fprintf(stderr, "\nFrom: %s\n      ", p->line);
-	for (i = 0; i < col; i++)
-		(void)fprintf(stderr, " ");
-	(void)fprintf(stderr, "^\n");
-
+	(void)fprintf(stderr, "%s:%d: error: %s (column %d)\n", 
+			p->name, line, lit, col);
 	return(0);
 }
 
@@ -451,24 +454,14 @@ static void
 msg_msg(void *arg, int line, int col, const char *msg)
 {
 	struct md_parse	 *p;
-	int		  i;
 
 	p = (struct md_parse *)arg;
 
 	if (p->dbg < 2)
 		return;
 
-	(void)printf("%s:%d: %s", p->name, line, msg);
-
-	if (p->dbg < 3) {
-		(void)printf(" (column %d)\n", col);
-		return;
-	}
-
-	(void)printf("\nFrom: %s\n      ", p->line);
-	for (i = 0; i < col; i++)
-		(void)printf(" ");
-	(void)printf("^\n");
+	(void)printf("%s:%d: %s (column %d)\n", 
+			p->name, line, msg, col);
 }
 
 
@@ -477,7 +470,6 @@ msg_warn(void *arg, int line, int col, enum mdoc_warn 
 {
 	char		 *lit;
 	struct md_parse	 *p;
-	int		  i;
 	extern char	 *__progname;
 
 	p = (struct md_parse *)arg;
@@ -501,8 +493,14 @@ msg_warn(void *arg, int line, int col, enum mdoc_warn 
 		lit = "syntax: argument-like value";
 		break;
 	case (WARN_SYNTAX_EMPTYBODY):
-		lit = "syntax: empty block-body section";
+		lit = "syntax: macro suggests non-empty block-body section";
 		break;
+	case (WARN_SYNTAX_EMPTYHEAD):
+		lit = "syntax: macro suggests non-empty block-head section";
+		break;
+	case (WARN_SYNTAX_NOBODY):
+		lit = "syntax: macro suggests empty block-body section";
+		break;
 	case (WARN_SEC_OO):
 		lit = "section is out of conventional order";
 		break;
@@ -533,15 +531,8 @@ msg_warn(void *arg, int line, int col, enum mdoc_warn 
 	}
 
 
-	(void)fprintf(stderr, "%s:%d: warning: %s", p->name, line, lit);
-
-	if (p->dbg >= 1) {
-		(void)fprintf(stderr, "\nFrom: %s\n      ", p->line);
-		for (i = 0; i < col; i++)
-			(void)fprintf(stderr, " ");
-		(void)fprintf(stderr, "^\n");
-	} else 
-		(void)fprintf(stderr, " (column %d)\n", col);
+	(void)fprintf(stderr, "%s:%d: warning: %s (column %d)\n", 
+			p->name, line, lit, col);
 
 	if (p->warn & MD_WARN_ERR) {
 		(void)fprintf(stderr, "%s: considering warnings as "