1 .\" Copyright (c) 1991, 1993
2 .\" The Regents of the University of California. All rights reserved.
4 .\" Redistribution and use in source and binary forms, with or without
5 .\" modification, are permitted provided that the following conditions
7 .\" 1. Redistributions of source code must retain the above copyright
8 .\" notice, this list of conditions and the following disclaimer.
9 .\" 2. Redistributions in binary form must reproduce the above copyright
10 .\" notice, this list of conditions and the following disclaimer in the
11 .\" documentation and/or other materials provided with the distribution.
12 .\" 3. All advertising materials mentioning features or use of this software
13 .\" must display the following acknowledgement:
14 .\" This product includes software developed by the University of
15 .\" California, Berkeley and its contributors.
16 .\" 4. Neither the name of the University nor the names of its contributors
17 .\" may be used to endorse or promote products derived from this software
18 .\" without specific prior written permission.
20 .\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 .\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 .\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 .\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 .\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 .\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 .\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 .\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 .\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 .\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 .\" @(#)doc-ditroff 8.1 (Berkeley) 06/08/93
33 .\" $FreeBSD: src/contrib/groff/tmac/doc-ditroff,v 1.1.1.1.8.5 2003/02/14 15:22:11 ru Exp $
34 .\" $DragonFly: src/contrib/groff/tmac/Attic/doc-ditroff,v 1.2 2003/06/17 04:24:02 dillon Exp $
41 .\" use -rC=1 to number pages continuously
45 .\" use -rD=1 for double-sided printing
49 .\" use -rcR=1 to force the creation of a single, very long page
53 .\" use -rS={11,12} to change the font size from 10pt to 11pt or 12pt.
65 .el \{ .ie (\n[S] == 12) \{\
75 .\" the `doc-xx-font' strings must not be empty!
77 .ds doc-caption-font \f[R]\s[\n[.ps]u]
78 .ds doc-caption-font2 \f[R]\s[\n[.ps]u]
79 .ds doc-Ad-font \f[I]\s[\n[.ps]u]
80 .ds doc-Ar-font \f[CO]\s[\n[.ps]u]
81 .ds doc-Cm-font \f[CB]\s[\n[.ps]u]
82 .ds doc-Em-font \f[I]\s[\n[.ps]u]
83 .ds doc-Er-font \f[C]\s[\n[.ps]u]
84 .ds doc-Ev-font \f[C]\s[\n[.ps]u]
85 .ds doc-Fa-font \f[CO]\s[\n[.ps]u]
86 .ds doc-Fd-font \f[CB]\s[\n[.ps]u]
87 .ds doc-Fl-font \f[CB]\s[\n[.ps]u]
88 .ds doc-Fn-font \f[CB]\s[\n[.ps]u]
89 .ds doc-Ft-font \f[CO]\s[\n[.ps]u]
90 .ds doc-Ic-font \f[CB]\s[\n[.ps]u]
92 .ds doc-Me-font \f[B]\s[\n[.ps]u]
93 .ds doc-Nm-font \f[CB]\s[\n[.ps]u]
94 .ds doc-No-font \f[R]\s[\n[.ps]u]
95 .ds doc-Pa-font \f[C]\s[\n[.ps]u]
96 .ds doc-Sh-font \f[B]\s[\n[.ps]u]
97 .ds doc-Sy-font \f[B]\s[\n[.ps]u]
98 .ds doc-Sx-font \f[B]\s[\n[.ps]u]
99 .ds doc-Tn-font-shape \f[R]
100 \# XXX: adapt to discrete LaTeX font sizes
101 .ds doc-Tn-font-size \s[(\n[.ps]u - 1z)]
102 .ds doc-Va-font \f[I]\s[\n[.ps]u]
103 .ds doc-Xr-font \f[C]\s[\n[.ps]u]
105 .ds doc-left-parenthesis \f[R]\|(\|\f[]\s[\n[.ps]u]
106 .ds doc-right-parenthesis \f[R]\|)\|\f[]\s[\n[.ps]u]
107 .ds lp \f[R](\f[]\s[\n[.ps]u]
108 .ds rp \f[R])\f[]\s[\n[.ps]u]
109 .ds doc-left-bracket \f[R]\^[\^\f[]\s[\n[.ps]u]
110 .ds doc-right-bracket \f[R]\^]\f[]\s[\n[.ps]u]
115 .nr doc-subheader-indent (\w
\a\f[C],
\au * 5u)
116 .nr doc-paragraph-space .5v
118 .nr doc-digit-width \w'\0'u
119 .nr doc-fixed-width \w
\a\f[C]0
\a
124 .\" NS doc-header-space global register
125 .\" NS the space between header and body
127 .nr doc-header-space 0
130 .\" NS doc-footer-space global register
131 .\" NS the space between body and footer
133 .nr doc-footer-space 0
136 .\" NS doc-display-vertical global register
137 .\" NS vertical space between list elements etc.
139 .nr doc-display-vertical 0
142 .\" NS doc-setup-page-layout macro
143 .\" NS set up page layout
146 .\" NS doc-display-vertical
147 .\" NS doc-footer-space
148 .\" NS doc-header-space
150 .de doc-setup-page-layout
151 . nr doc-header-space .5i
152 . nr doc-footer-space .5i
166 . nr doc-display-vertical .5v
170 .ds doc-left-singlequote \[oq]
171 .ds doc-right-singlequote \[cq]
173 .\" the following strings are `official'
197 .\" NS doc-header-string global string
198 .\" NS the final string used for the manual page header
200 .ds doc-header-string
203 .\" NS doc-setup-header macro
204 .\" NS install and initialize header and footer support
207 .\" NS doc-header-string
210 . ds doc-header-string "\*[doc-document-title]
211 . if !"\*[doc-section]"Null" \
212 . as doc-header-string \|(\*[doc-section])
215 . wh -1.25i doc-footer
219 . ds doc-command-name
223 . \" Don't set the page number if this is the first page,
224 . \" in case the user has used -n.
234 .\" NS doc-get-width macro
235 .\" NS computes the width of a string as a multiple of `doc-fixed-width':
236 .\" NS `.doc-get-width string'
242 . nr doc-width \w
\a\f[C]\$1
\a
243 . ie (\n[doc-width] >= \n[doc-fixed-width]) \{\
244 . ie (\n[doc-width] % \n[doc-fixed-width]) \
245 . nr doc-width ((\n[doc-width] / \n[doc-fixed-width]) + 1)
247 . nr doc-width (\n[doc-width] / \n[doc-fixed-width])
258 .\" NS doc-get-arg-width macro
259 .\" NS computes the width of an argument as a multiple of
260 .\" NS `doc-fixed-width': `.doc-get-arg-width arg-index'
265 .de doc-get-arg-width
266 . nr doc-width \w
\a\f[C]\*[doc-arg\$1]
\a
267 . ie (\n[doc-width] >= \n[doc-fixed-width]) \{\
268 . ie (\n[doc-width] % \n[doc-fixed-width]) \
269 . nr doc-width ((\n[doc-width] / \n[doc-fixed-width]) + 1)
271 . nr doc-width (\n[doc-width] / \n[doc-fixed-width])
283 .\" NS quoted literal define
289 .\" NS doc-macro-name
292 .\" NS doc-quote-left
293 .\" NS doc-quote-right
295 .\" NS local variables:
300 .\" NS width register `Ql' set in doc-common
303 . if !\n[doc-arg-limit] \{\
305 . ds doc-macro-name Ql
309 . tm Usage: .Ql argument ... (#\n[.c])
312 . nr doc-reg-Ql (\n[doc-arg-ptr] + 1)
313 . doc-get-arg-width \n[doc-reg-Ql]
315 . \" don't use quotes if we have more than two succeeding string arguments
317 . if (\n[doc-arg-limit] >= \n[doc-reg-Ql]) \
318 . if (\n[doc-type\n[doc-reg-Ql]] == 2) \
321 . \" make a difference in quotation style for strings longer
322 . \" than two characters
323 . ie (\n[doc-width] > 2) \
326 . ie \n[doc-arg-ptr] \{\
327 . \" we replace `Ql' with `Li'
328 . ds doc-arg\n[doc-arg-ptr] Li
332 . \" if .Ql has been called directly, we must shift all elements in
333 . \" the argument vector to the right so that we can insert `Li'
334 . nr doc-reg-Ql \n[doc-arg-limit]
335 . nr doc-reg-Ql1 (\n[doc-arg-limit] + 1)
336 . while \n[doc-reg-Ql] \{\
337 . rn doc-arg\n[doc-reg-Ql] doc-arg\n[doc-reg-Ql1]
338 . rnn doc-type\n[doc-reg-Ql] doc-type\n[doc-reg-Ql1]
339 . rn doc-space\n[doc-reg-Ql] doc-space\n[doc-reg-Ql1]
346 . nr doc-arg-limit +1
349 . ds doc-quote-left "\*[doc-left-singlequote]
350 . ds doc-quote-right "\*[doc-right-singlequote]