===================================================================
RCS file: /cvs/mandoc/mdoc.c,v
retrieving revision 1.53
retrieving revision 1.58
diff -u -p -r1.53 -r1.58
--- mandoc/mdoc.c	2009/03/08 11:41:22	1.53
+++ mandoc/mdoc.c	2009/03/09 13:04:01	1.58
@@ -1,4 +1,4 @@
-/* $Id: mdoc.c,v 1.53 2009/03/08 11:41:22 kristaps Exp $ */
+/* $Id: mdoc.c,v 1.58 2009/03/09 13:04:01 kristaps Exp $ */
 /*
  * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -38,6 +38,7 @@ static	int		  mdoc_node_append(struct mdoc *, 
 
 static	int		  parsetext(struct mdoc *, int, char *);
 static	int		  parsemacro(struct mdoc *, int, char *);
+static	int		  macrowarn(struct mdoc *, int, const char *);
 
 
 const	char *const __mdoc_macronames[MDOC_MAX] = {		 
@@ -70,7 +71,8 @@ const	char *const __mdoc_macronames[MDOC_MAX] = {		 
 	"Tn",		"Ux",		"Xc",		"Xo",
 	"Fo",		"Fc",		"Oo",		"Oc",
 	"Bk",		"Ek",		"Bt",		"Hf",
-	"Fr",		"Ud",		"Lb",
+	"Fr",		"Ud",		"Lb",		"Ap",
+	"Lp"
 	};
 
 const	char *const __mdoc_argnames[MDOC_ARG_MAX] = {		 
@@ -129,7 +131,7 @@ mdoc_free(struct mdoc *mdoc)
 
 
 struct mdoc *
-mdoc_alloc(void *data, const struct mdoc_cb *cb)
+mdoc_alloc(void *data, int pflags, const struct mdoc_cb *cb)
 {
 	struct mdoc	*p;
 
@@ -142,7 +144,7 @@ mdoc_alloc(void *data, const struct mdoc_cb *cb)
 	p->last = xcalloc(1, sizeof(struct mdoc_node));
 	p->last->type = MDOC_ROOT;
 	p->first = p->last;
-
+	p->pflags = pflags;
 	p->next = MDOC_NEXT_CHILD;
 	p->htab = mdoc_tokhash_alloc();
 
@@ -494,6 +496,19 @@ parsetext(struct mdoc *mdoc, int line, char *buf)
 }
 
 
+static int
+macrowarn(struct mdoc *m, int ln, const char *buf)
+{
+	if ( ! (MDOC_IGN_MACRO & m->pflags))
+		return(mdoc_perr(m, ln, 1, "unknown macro: %s%s", 
+				buf, buf[3] ? "..." : ""));
+	return(mdoc_pwarn(m, ln, 1, WARN_SYNTAX,
+				"unknown macro: %s%s",
+				buf, buf[3] ? "..." : ""));
+}
+
+
+
 /*
  * Parse a macro line, that is, a line beginning with the control
  * character.
@@ -519,17 +534,20 @@ parsemacro(struct mdoc *m, int ln, char *buf)
 			break;
 	}
 
+	/* FIXME: be able to skip unknown macro lines! */
+
 	mac[i - 1] = 0;
 
 	if (i == 5 || i <= 2) {
-		(void)mdoc_perr(m, ln, 1, "unknown macro: %s%s", 
-				mac, i == 5 ? "..." : "");
-		goto err;
+		if ( ! macrowarn(m, ln, mac))
+			goto err;
+		return(1);
 	} 
 	
 	if (MDOC_MAX == (c = mdoc_tokhash_find(m->htab, mac))) {
-		(void)mdoc_perr(m, ln, 1, "unknown macro: %s", mac);
-		goto err;
+		if ( ! macrowarn(m, ln, mac))
+			goto err;
+		return(1);
 	}
 
 	/* The macro is sane.  Jump to the next word. */