docbook2mdoc/macro.c - diff

Return to macro.c CVS log

Up to [cvsweb.bsd.lv] / docbook2mdoc

Diff for /docbook2mdoc/macro.c between version 1.5 and 1.6

-version 1.5, 2019/04/03 15:04:03
+version 1.6, 2019/04/06 22:37:57
 Line 17
 Line 17
 Line 17
  #include <assert.h>
  #include <ctype.h>
  #include <stdio.h>
+ #include <string.h>
  #include "node.h"
  #include "macro.h"
-Line 39  macro_open(struct format *f, const char *name)
+Line 40  macro_open(struct format *f, const char *name)
 Line 39  macro_open(struct format *f, const char *name)
 Line 40  macro_open(struct format *f, const char *name)
                  break;
          case LINE_MACRO:
                  putchar(' ');
+                 if (f->spc == 0)
+                         fputs("Ns ", stdout);
                  break;
          }
          fputs(name, stdout);
-Line 61  macro_line(struct format *f, const char *name)
+Line 64  macro_line(struct format *f, const char *name)
 Line 61  macro_line(struct format *f, const char *name)
 Line 64  macro_line(struct format *f, const char *name)
  }
  /*
-  * If the next node is a text node starting with closing punctuation,
+  * At the end of a macro, decide whether the line needs to remain open
-  * emit the closing punctuation as a trailing macro argument.
+  * because the next node follows without intervening whitespace;
+  * otherwise, close the line.
   */
  void
  macro_closepunct(struct format *f, struct pnode *pn)
  {
-         if ((pn = TAILQ_NEXT(pn, child)) != NULL &&
+         char            *cp;
-             pn->node == NODE_TEXT && pn->bsz > 0 &&
-             (pn->b[0] == ',' || pn->b[0] == '.') &&
+         if ((pn = TAILQ_NEXT(pn, child)) != NULL && pn->spc == 0) {
-             (pn->bsz == 1 || isspace((unsigned char)pn->b[1]))) {
-                 putchar(' ');
+                 /*
-                 putchar(pn->b[0]);
+                  * If a non-text node follows without intervening
-                 pn->b++;
+                  * whitespace, the handler of that node will decide
-                 pn->bsz--;
+                  * whether and how to suppress whitespace.  To allow
+                  * that, the macro line needs to remain open.
+                  */
+                 if (pn->node != NODE_TEXT && pn->node != NODE_ESCAPE)
+                         return;
+                 /*
+                  * Give closing punctuation
+                  * in the form of trailing macro arguments.
+                  */
+                 while (*pn->b != '\0' &&
+                     strchr("!),.:;?]", *pn->b) != NULL) {
+                         putchar(' ');
+                         putchar(*pn->b);
+                         pn->b++;
+                         pn->bsz--;
+                 }
+                 /*
+                  * Text follows without intervening whitespace.
+                  * Append the first word with .Ns.
+                  */
+                 if (*pn->b != '\0' && isspace((unsigned char)*pn->b) == 0) {
+                         fputs(" Ns", stdout);
+                         for (cp = pn->b; *cp != '\0'; cp++)
+                                 if (isspace((unsigned char)*cp))
+                                         break;
+                         *cp = '\0';
+                         macro_addarg(f, pn->b, ARG_SPACE);
+                         pn->bsz -= cp - pn->b;
+                         pn->b = cp;
+                         if (pn->bsz > 0) {
+                                 pn->b++;
+                                 pn->bsz--;
+                                 pn->spc = 1;
+                         }
+                 }
+                 /* Skip whitespace after the first word. */
+                 while (isspace((unsigned char)*pn->b)) {
+                         pn->b++;
+                         pn->bsz--;
+                         pn->spc = 1;
+                 }
          }
          macro_close(f);
  }

CVSweb