mdoc: Add NetBSD 6.0 (used in wbsio.4).
[dragonfly.git] / gnu / usr.bin / groff / tmac / patches / doc-syms.no_obj.patch
1 $DragonFly: src/gnu/usr.bin/groff/tmac/patches/doc-syms.no_obj.patch,v 1.1 2005/09/08 10:58:16 asmodai Exp $
2
3 --- doc-syms    2005-09-08 12:50:26.000000000 +0200
4 +++ doc-syms    2005-09-08 12:52:04.000000000 +0200
5 @@ -324,6 +262,70 @@
6  ..
7  .
8  .
9 +.\" NS Dx user macro
10 +.\" NS   print DragonFly
11 +.\" NS
12 +.\" NS modifies:
13 +.\" NS   doc-arg-ptr
14 +.\" NS   doc-curr-font
15 +.\" NS   doc-curr-size
16 +.\" NS   doc-macro-name
17 +.\" NS
18 +.\" NS local variable:
19 +.\" NS   doc-str-Dx
20 +.\" NS   doc-str-Dx1
21 +.\" NS
22 +.\" NS width register `Dx' defined in doc-common
23 +.
24 +.\" we use the doc-operating-system-DragonFly-* strings defined in doc-common
25 +.
26 +.de Dx
27 +.  nr doc-curr-font \n[.f]
28 +.  nr doc-curr-size \n[.ps]
29 +.  ds doc-str-Dx \f[\n[doc-curr-font]]\s[\n[doc-curr-size]u]
30 +.
31 +.  \" default value if no argument
32 +.  ds doc-str-Dx1 \*[doc-Tn-font-size]\%DragonFly\*[doc-str-Dx]
33 +.
34 +.  if !\n[doc-arg-limit] \
35 +.    if \n[.$] \{\
36 +.      ds doc-macro-name Dx
37 +.      doc-parse-args \$@
38 +.    \}
39 +.
40 +.  if (\n[doc-arg-limit] > \n[doc-arg-ptr]) \{\
41 +.    nr doc-arg-ptr +1
42 +.    ie (\n[doc-type\n[doc-arg-ptr]] == 2) \{\
43 +.      ie \A\a\*[doc-arg\n[doc-arg-ptr]]\a \{\
44 +.        ie d doc-operating-system-DragonFly-\*[doc-arg\n[doc-arg-ptr]] \
45 +.          as doc-str-Dx1 \~\*[doc-operating-system-DragonFly-\*[doc-arg\n[doc-arg-ptr]]]
46 +.        el \{\
47 +.          tmc mdoc warning: .Dx: Unknown DragonFly version
48 +.          tm1 " `\*[doc-arg\n[doc-arg-ptr]]' (#\n[.c])
49 +.          as doc-str-Dx1 \~\*[doc-arg\n[doc-arg-ptr]]
50 +.      \}\}
51 +.      el \
52 +.        as doc-str-Dx1 \~\*[doc-arg\n[doc-arg-ptr]]
53 +.    \}
54 +.    el \
55 +.      nr doc-arg-ptr -1
56 +.  \}
57 +.
58 +.  \" replace current argument with result
59 +.  ds doc-arg\n[doc-arg-ptr] "\*[doc-str-Dx1]
60 +.  nr doc-type\n[doc-arg-ptr] 2
61 +.  ds doc-space\n[doc-arg-ptr] "\*[doc-space]
62 +.
63 +.  \" recompute space vector for remaining arguments
64 +.  nr doc-num-args (\n[doc-arg-limit] - \n[doc-arg-ptr])
65 +.  nr doc-arg-limit \n[doc-arg-ptr]
66 +.  if \n[doc-num-args] \
67 +.    doc-parse-space-vector
68 +.
69 +.  doc-print-recursive
70 +..
71 +.
72 +.
73  .\" NS Fx user macro
74  .\" NS   print FreeBSD
75  .\" NS