tmac/doc-syms.new

   1 .\" Copyright (c) 1991 The Regents of the University of California.
   2 .\" All rights reserved.
   3 .\"
   4 .\" Redistribution and use in source and binary forms, with or without
   5 .\" modification, are permitted provided that the following conditions
   6 .\" are met:
   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.
  19 .\"
  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
  30 .\" SUCH DAMAGE.
  31 .\"
  32 .\"     @(#)doc-syms 5.6 (Berkeley) 8/5/91
  33 .\"
  34 .\"     %beginstrip%
  35 .
  36 .\" NS Ux user macro
  37 .\" NS   print UNIX
  38 .\" NS
  39 .\" NS width register `.Ux' defined in doc-common
  40 .\" NS
  41 .\" NS local variable:
  42 .\" NS   doc-str-Ux
  43 .
  44 .de Ux
  45 .  nr doc-curr-font \n[.f]
  46 .  nr doc-curr-size \n[.s]
  47 .  ds doc-str-Ux \f[\n[doc-curr-font]]\s[\n[doc-curr-size]]
  48 .  as doc-out-string \*[doc-Tn-font-size]UNIX\*[doc-str-Ux]
  49 .
  50 .  if !\n[doc-args-processed] \
  51 .    if \n[.$] \
  52 .      doc-parse-args \$@
  53 .
  54 .  ie (\n[doc-args-processed] > \n[doc-arg-ptr]) \{\
  55 .    nr doc-arg-ptr +1
  56 .    ie "\*[doc-type\n[doc-arg-ptr]]"macro" \
  57 .      \*[doc-arg\n[doc-arg-ptr]]
  58 .    el \
  59 .      doc-print-recursive
  60 .  \}
  61 .  el \
  62 .    doc-print-and-reset
  63 ..
  64 .
  65 .
  66 .\" NS Bx user macro
  67 .\" NS   print BSD UNIX (fix smaller nroff version)
  68 .\" NS
  69 .\" NS width register `.Bx' defined in doc-common
  70 .\" NS
  71 .\" NS local variable:
  72 .\" NS   doc-str-Bx, doc-reg-Bx
  73 .
  74 .de Bx
  75 .  nr doc-curr-font \n[.f]
  76 .  nr doc-curr-size \n[.s]
  77 .  ds doc-str-Bx \f[\n[doc-curr-font]]\s[\n[doc-curr-size]]
  78 .
  79 .  if !\n[doc-args-processed] \{\
  80 .    ie !\n[.$] \{\
  81 .      nop \*[doc-Tn-font-size]BSD\*[doc-str-Bx]
  82 .      nop \*[doc-Tn-font-size]UNIX\*[doc-str-Bx]
  83 .    \}
  84 .    el \
  85 .      doc-parse-args \$@
  86 .  \}
  87 .
  88 .  if "\$1"-alpha" \{\
  89 .    nop \&currently in alpha test.
  90 .    doc-clean-vectors
  91 .  \}
  92 .
  93 .  if "\$1"-beta" \{\
  94 .    nop \&currently in beta test.
  95 .    doc-clean-vectors
  96 .  \}
  97 .
  98 .  if "\$1"-devel" \{\
  99 .    nop \&currently under development.
 100 .    doc-clean-vectors
 101 .  \}
 102 .
 103 .  if (\n[doc-args-processed] > \n[doc-arg-ptr]) \{\
 104 .    nr doc-arg-ptr +1
 105 .    ie "\*[doc-type\n[doc-arg-ptr]]"string" \{\
 106 .      as doc-out-string \&\*[doc-arg\n[doc-arg-ptr]]\*[doc-Tn-font-size]
 107 .      as doc-out-string BSD\*[doc-str-Bx]
 108 .      ie (\n[doc-args-processed] > \n[doc-arg-ptr]) \{\
 109 .        nr doc-reg-Bx (\n[doc-arg-ptr] + 1)
 110 .        ie "\*[doc-type\n[doc-reg-Bx]]"string" \{\
 111 .          if "\*[doc-arg\n[doc-reg-Bx]]"Reno" \{\
 112 .            nr doc-arg-ptr +1
 113 .            as doc-out-string \-Reno
 114 .          \}
 115 .          if "\*[doc-arg\n[doc-reg-Bx]]"reno" \{\
 116 .            nr doc-arg-ptr +1
 117 .            as doc-out-string \-Reno
 118 .          \}
 119 .
 120 .          if "\*[doc-arg\n[doc-reg-Bx]]"Tahoe" \{\
 121 .            nr doc-arg-ptr +1
 122 .            as doc-out-string \-Tahoe
 123 .          \}
 124 .          if "\*[doc-arg\n[doc-reg-Bx]]"tahoe" \{\
 125 .            nr doc-arg-ptr +1
 126 .            as doc-out-string \-Tahoe
 127 .          \}
 128 .
 129 .          ie (\n[doc-args-processed] > \n[doc-arg-ptr]) \{\
 130 .            nr doc-arg-ptr +1
 131 .            doc-print-recursive
 132 .          \}
 133 .          el \
 134 .            doc-print-and-reset
 135 .        \}
 136 .        el \{\
 137 .          nr doc-arg-ptr +1
 138 .          doc-print-recursive
 139 .        \}
 140 .      \}
 141 .      el \
 142 .        doc-print-and-reset
 143 .    \}
 144 .    el \{\
 145 .      as doc-out-string \*[doc-Tn-font-size]BSD\*[doc-str-Bx]
 146 .      as doc-out-string " U\*[doc-Tn-font-size]NIX\*[doc-str-Bx]
 147 .      doc-print-recursive
 148 .    \}
 149 .  \}
 150 ..
 151 .
 152 .
 153 .\" NS Ud user macro
 154 .\" NS   print "currently under development" (HISTORY section)
 155 .\" NS
 156 .\" NS width register `.Ud' defined in doc-common
 157 .
 158 .de Ud
 159 .  nop \&currently under development.
 160 ..
 161 .
 162 .
 163 .\" NS At user macro
 164 .\" NS   print AT&T UNIX
 165 .\" NS
 166 .\" NS width register `.At' defined in doc-common
 167 .\" NS
 168 .\" NS local variable:
 169 .\" NS   doc-str-At
 170 .
 171 .de At
 172 .  nr doc-curr-font \n[.f]
 173 .  nr doc-curr-size \n[.s]
 174 .  ds doc-str-At \f[\n[doc-curr-font]]\s[\n[doc-curr-size]]
 175 .
 176 .  if (\n[.$] == 2) \{\
 177 .    if "\$1"32v" \
 178 .      nop \&Version\~32V \*[doc-Tn-font-size]AT&T UNIX\*[doc-str-At]\$2
 179 .    if "\$1"v6" \
 180 .      nop \&Version\~6 \*[doc-Tn-font-size]AT&T UNIX\*[doc-str-At]\$2
 181 .    if "\$1"v7" \
 182 .      nop \&Version\~7 \*[doc-Tn-font-size]AT&T UNIX\*[doc-str-At]\$2
 183 .    if "\$1"V" \{\
 184 .      nop \*[doc-Tn-font-size]AT&T\*[doc-str-At] System\~V
 185 .      nop \*[doc-Tn-font-size]UNIX\*[doc-str-At]\$2
 186 .    \}
 187 .    if "\$1"V.1" \{\
 188 .      nop \*[doc-Tn-font-size]AT&T\*[doc-str-At] System\~V.1
 189 .      nop \*[doc-Tn-font-size]UNIX\*[doc-str-At]\$2
 190 .    \}
 191 .    if "\$1"V.4" \{\
 192 .      nop \*[doc-Tn-font-size]AT&T\*[doc-str-At] System\~V.4
 193 .      nop \*[doc-Tn-font-size]UNIX\*[doc-str-At]\$2
 194 .    \}
 195 .  \}
 196 .
 197 .  if (\n[.$] == 1) \{\
 198 .    if "\$1"32v" \
 199 .      nop \&Version\~32V \*[doc-Tn-font-size]AT&T UNIX\*[doc-str-At]
 200 .    if "\$1"v6" \
 201 .      nop \&Version\~6 \*[doc-Tn-font-size]AT&T UNIX\*[doc-str-At]
 202 .    if "\$1"v7" \
 203 .      nop \&Version\~7 \*[doc-Tn-font-size]AT&T UNIX\*[doc-str-At]
 204 .    if "\$1"V" \{\
 205 .      nop \*[doc-Tn-font-size]AT&T\*[doc-str-At] System\~V
 206 .      nop \*[doc-Tn-font-size]UNIX\*[doc-str-At]
 207 .    \}
 208 .    if "\$1"V.1" \{\
 209 .      nop \*[doc-Tn-font-size]AT&T\*[doc-str-At] System\~V.1
 210 .      nop \*[doc-Tn-font-size]UNIX\*[doc-str-At]
 211 .    \}
 212 .    if "\$1"V.4" \{\
 213 .      nop \*[doc-Tn-font-size]AT&T\*[doc-str-At] System\~V.4
 214 .      nop \*[doc-Tn-font-size]UNIX\*[doc-str-At]
 215 .    \}
 216 .  \}
 217 ..
 218 .
 219 .
 220 .\" The Bt macro should go away now
 221 .
 222 .\" NS Bt user macro
 223 .\" NS   print "is currently in beta test." (HISTORY section)
 224 .\" NS
 225 .\" NS width register `.Bt' defined in doc-common
 226 .
 227 .de Bt
 228 .  nop \&is currently in beta test.
 229 ..
 230 .
 231 .
 232 .\" NS St macro - standards (posix, ansi - formal standard names)
 233 .\" NS
 234 .\" NS width register `.St' defined in doc-common
 235 .\" NS
 236 .\" NS local variable:
 237 .\" NS   doc-str-St, doc-reg-St
 238 .
 239 .ds Px \*[doc-Tn-font-size]POSIX
 240 .ds Ai \*[doc-Tn-font-size]ANSI
 241 .
 242 .de St
 243 .  if !\n[doc-args-processed] \{\
 244 .    ie \n[.$] \{\
 245 .      ds doc-macro-name St
 246 .
 247 .      nr doc-reg-St 1
 248 .      while (\n[doc-reg-St] <= \n[.$]) \{\
 249 .        ds doc-arg\n[doc-reg-St] "\$[\n[doc-reg-St]]
 250 .        nr doc-reg-St +1
 251 .      \}
 252 .
 253 .      nr doc-num-args \n[.$]
 254 .      doc-parse-arg-vector
 255 .    \}
 256 .    el \{\
 257 .      tmc "Usage: .St [-p1003.1-88 | -p1003.2 | -ansiC-89 | -iso]
 258 .      tm1 " \*[doc-punct-chars] ... (#\n[.c])
 259 .    \}
 260 .  \}
 261 .
 262 .  if (\n[doc-args-processed] > \n[doc-arg-ptr]) \{\
 263 .    nr doc-curr-font \n[.f]
 264 .    nr doc-curr-size \n[.s]
 265 .    ds doc-str-St \f[\n[doc-curr-font]]\s[\n[doc-curr-size]]
 266 .    nr doc-arg-ptr +1
 267 .
 268 .    if "\*[doc-arg\n[doc-arg-ptr]]"-p1003.1-88" \{\
 269 .      ds doc-out-string \*[doc-Tn-font-size]IEEE Std
 270 .      as doc-out-string " \*[doc-str-St]1003.1-1988
 271 .      as doc-out-string " (``\*[doc-Tn-font-size]\*[Px]\*[doc-str-St]'')
 272 .    \}
 273 .    if "\*[doc-arg\n[doc-arg-ptr]]"-p1003.2" \{\
 274 .      ds doc-out-string \*[doc-Tn-font-size]IEEE Std
 275 .      as doc-out-string " \*[doc-str-St]1003.2
 276 .      as doc-out-string " (``\*[doc-Tn-font-size]\*[Px]\*[doc-str-St]'')
 277 .    \}
 278 .    if "\*[doc-arg\n[doc-arg-ptr]]"-ansiC" \{\
 279 .      ds doc-out-string \*[doc-Tn-font-size]ANSI\~C
 280 .      as doc-out-string " \*[doc-str-St]3.159-1989
 281 .      as doc-out-string " (``\*[doc-Tn-font-size]ANSI\~C\*[doc-str-St]'')
 282 .    \}
 283 .    if "\*[doc-arg\n[doc-arg-ptr]]"-ansiC-89" \{\
 284 .      ds doc-out-string \*[doc-Tn-font-size]ANSI\~C
 285 .      as doc-out-string " \*[doc-str-St]3.159-1989
 286 .      as doc-out-string " (``\*[doc-Tn-font-size]ANSI\~C\*[doc-str-St]'')
 287 .    \}
 288 .    if "\*[doc-arg\n[doc-arg-ptr]]"-iso8802-3" \{\
 289 .      ds doc-out-string \*[doc-Tn-font-size]
 290 .      as doc-out-string ISO\~\*[doc-str-St]8802-3:\~1989
 291 .      \" .ds doc-out-string \*[doc-Tn-font-size]
 292 .      \" .as doc-out-string ISO\~\*[doc-str-St]8802-3:\~1989
 293 .      \" .as doc-out-string " (``\*[doc-Tn-font-size]ANSI\~C\*[doc-str-St]'')
 294 .    \}
 295 .
 296 .    ie (\n[doc-args-processed] > \n[doc-arg-ptr]) \{\
 297 .      nr doc-arg-ptr +1
 298 .      doc-print-recursive
 299 .    \}
 300 .    el \
 301 .      doc-print-and-reset
 302 .  \}
 303 ..
 304 .
 305 .\" EOF