From: schwarze@mdocml.bsd.lv
To: source@mdocml.bsd.lv
Subject: pod2mdoc: mark up foreign function names with .Xr
Date: Sat, 14 Feb 2015 06:13:19 -0500 (EST) [thread overview]
Message-ID: <3702453890831876125.enqueue@fantadrom.bsd.lv> (raw)
Log Message:
-----------
mark up foreign function names with .Xr
Modified Files:
--------------
pod2mdoc:
pod2mdoc.c
Revision Data
-------------
Index: pod2mdoc.c
===================================================================
RCS file: /home/cvs/mdocml/pod2mdoc/pod2mdoc.c,v
retrieving revision 1.42
retrieving revision 1.43
diff -Lpod2mdoc.c -Lpod2mdoc.c -u -p -r1.42 -r1.43
--- pod2mdoc.c
+++ pod2mdoc.c
@@ -1329,6 +1329,7 @@ static void
ordinary(struct state *st, const char *buf, size_t start, size_t end)
{
size_t i, j, opstack;
+ enum mdoc_type mtype;
int seq;
if ( ! st->parsing || st->paused)
@@ -1405,16 +1406,22 @@ ordinary(struct state *st, const char *b
/* Detect function names. */
+ mtype = MDOC_Fa;
if (st->outbuflen > 2 &&
')' == st->outbuf[st->outbuflen - 1] &&
- '(' == st->outbuf[st->outbuflen - 2] &&
- dict_get(st->outbuf, st->outbuflen - 2) ==
- MDOC_Fo) {
- st->outbuflen -= 2;
- st->outbuf[st->outbuflen] = '\0';
- mdoc_newln(st);
- fputs(".Fn ", stdout);
- st->oust = OUST_MAC;
+ '(' == st->outbuf[st->outbuflen - 2]) {
+ mtype = dict_get(st->outbuf,
+ st->outbuflen - 2);
+ if (MDOC_Fo == mtype || MDOC_MAX == mtype) {
+ st->outbuflen -= 2;
+ st->outbuf[st->outbuflen] = '\0';
+ mdoc_newln(st);
+ if (MDOC_Fo == mtype)
+ fputs(".Fn ", stdout);
+ else
+ fputs(".Xr ", stdout);
+ st->oust = OUST_MAC;
+ }
}
/*
@@ -1434,8 +1441,11 @@ ordinary(struct state *st, const char *b
'!' == buf[start - 2] ||
'?' == buf[start - 2]) &&
islower((unsigned char)buf[start - 3]) &&
- islower((unsigned char)buf[start - 4])))
+ islower((unsigned char)buf[start - 4]))) {
+ if (MDOC_MAX == mtype)
+ fputs(" 3", stdout);
mdoc_newln(st);
+ }
/* Advance to the next word. */
--
To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv
reply other threads:[~2015-02-14 11:13 UTC|newest]
Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=3702453890831876125.enqueue@fantadrom.bsd.lv \
--to=schwarze@mdocml.bsd.lv \
--cc=source@mdocml.bsd.lv \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).