Deleted Added
full compact
doc.tmac (151498) doc.tmac (202358)
1.\" Copyright (c) 1991, 1993
2.\" The Regents of the University of California. 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.

--- 342 unchanged lines hidden (view full) ---

351. nr doc-curr-font \n[.f]
352. nr doc-curr-size \n[.ps]
353. nop \*[doc-Fl-font]\c
354.
355. if !\n[doc-arg-limit] \{\
356. ds doc-macro-name Fl
357. doc-parse-args \$@
358.
1.\" Copyright (c) 1991, 1993
2.\" The Regents of the University of California. 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.

--- 342 unchanged lines hidden (view full) ---

351. nr doc-curr-font \n[.f]
352. nr doc-curr-size \n[.ps]
353. nop \*[doc-Fl-font]\c
354.
355. if !\n[doc-arg-limit] \{\
356. ds doc-macro-name Fl
357. doc-parse-args \$@
358.
359. if !\n[.$] \{\
360. \" no arguments
359. \" no arguments
360. if !\n[.$] \
361. nop \|\-\|\f[]\s[0]
361. nop \|\-\|\f[]\s[0]
362. \}\}
362. \}
363.
364. if !\n[doc-arg-limit] \
365. return
366.
367. nr doc-arg-ptr +1
368. ie (\n[doc-arg-limit] < \n[doc-arg-ptr]) \{\
369. \" last argument
370. nop \|\-\f[]\s[0]\c

--- 105 unchanged lines hidden (view full) ---

476.
477. ie (\n[doc-reg-dpr1] == 1) \{\
478. nop \f[\n[doc-curr-font]]\s[\n[doc-curr-size]u]\c
479. \*[doc-str-dpr]
480. \}
481. el \{\
482. nr doc-reg-dpr \n[doc-arg-ptr]
483.
363.
364. if !\n[doc-arg-limit] \
365. return
366.
367. nr doc-arg-ptr +1
368. ie (\n[doc-arg-limit] < \n[doc-arg-ptr]) \{\
369. \" last argument
370. nop \|\-\f[]\s[0]\c

--- 105 unchanged lines hidden (view full) ---

476.
477. ie (\n[doc-reg-dpr1] == 1) \{\
478. nop \f[\n[doc-curr-font]]\s[\n[doc-curr-size]u]\c
479. \*[doc-str-dpr]
480. \}
481. el \{\
482. nr doc-reg-dpr \n[doc-arg-ptr]
483.
484. \" the `\%' prevents hyphenation on a dash (`-')
484. ie (\n[doc-reg-dpr1] == 2) \
485. ie (\n[doc-reg-dpr1] == 2) \
485. \" the `\%' prevents hyphenation on a dash (`-')
486. nop \%\*[doc-str-dpr]\&\c
487. el \{\
488. \" punctuation character
489. nop \f[\n[doc-curr-font]]\s[\n[doc-curr-size]u]\c
490. nop \)\*[doc-str-dpr]\f[]\s[0]\c
491. \}
492.
493. nr doc-arg-ptr +1

--- 96 unchanged lines hidden (view full) ---

590. nr doc-curr-font \n[.f]
591. nr doc-curr-size \n[.ps]
592. nop \*[doc-Ar-font]\c
593.
594. if !\n[doc-arg-limit] \{\
595. ds doc-macro-name Ar
596. doc-parse-args \$@
597.
486. nop \%\*[doc-str-dpr]\&\c
487. el \{\
488. \" punctuation character
489. nop \f[\n[doc-curr-font]]\s[\n[doc-curr-size]u]\c
490. nop \)\*[doc-str-dpr]\f[]\s[0]\c
491. \}
492.
493. nr doc-arg-ptr +1

--- 96 unchanged lines hidden (view full) ---

590. nr doc-curr-font \n[.f]
591. nr doc-curr-size \n[.ps]
592. nop \*[doc-Ar-font]\c
593.
594. if !\n[doc-arg-limit] \{\
595. ds doc-macro-name Ar
596. doc-parse-args \$@
597.
598. if !\n[.$] \{\
599. \" no argument
598. \" no argument
599. if !\n[.$] \
600. nop \)\*[doc-str-Ar-default]\&\f[]\s[0]
600. nop \)\*[doc-str-Ar-default]\&\f[]\s[0]
601. \}\}
601. \}
602.
603. if !\n[doc-arg-limit] \
604. return
605.
606. nr doc-arg-ptr +1
607. doc-print-prefixes
608. ie (\n[doc-arg-limit] < \n[doc-arg-ptr]) \{\
609. nop \)\*[doc-str-Ar-default]\&\f[]\s[0]\c

--- 419 unchanged lines hidden (view full) ---

1029.\" NS
1030.\" NS width register `Pa' set in doc-common
1031.
1032.de Pa
1033. if !\n[doc-arg-limit] \{\
1034. ds doc-macro-name Pa
1035. doc-parse-args \$@
1036.
602.
603. if !\n[doc-arg-limit] \
604. return
605.
606. nr doc-arg-ptr +1
607. doc-print-prefixes
608. ie (\n[doc-arg-limit] < \n[doc-arg-ptr]) \{\
609. nop \)\*[doc-str-Ar-default]\&\f[]\s[0]\c

--- 419 unchanged lines hidden (view full) ---

1029.\" NS
1030.\" NS width register `Pa' set in doc-common
1031.
1032.de Pa
1033. if !\n[doc-arg-limit] \{\
1034. ds doc-macro-name Pa
1035. doc-parse-args \$@
1036.
1037. if !\n[.$] \{\
1038. \" default value
1037. \" default value
1038. if !\n[.$] \
1039. nop \*[doc-Pa-font]~\f[]\s[0]
1039. nop \*[doc-Pa-font]~\f[]\s[0]
1040. \}\}
1040. \}
1041.
1042. if !\n[doc-arg-limit] \
1043. return
1044.
1045. nr doc-arg-ptr +1
1046. doc-print-prefixes
1047. ie (\n[doc-arg-limit] >= \n[doc-arg-ptr]) \{\
1048. nr doc-curr-font \n[.f]

--- 5371 unchanged lines hidden (view full) ---

6420. if !\n[doc-display-depth] \
6421. tm mdoc warning: Empty input line #\n[.c]
6422. sp
6423..
6424.
6425.blm doc-empty-line
6426.
6427.
1041.
1042. if !\n[doc-arg-limit] \
1043. return
1044.
1045. nr doc-arg-ptr +1
1046. doc-print-prefixes
1047. ie (\n[doc-arg-limit] >= \n[doc-arg-ptr]) \{\
1048. nr doc-curr-font \n[.f]

--- 5371 unchanged lines hidden (view full) ---

6420. if !\n[doc-display-depth] \
6421. tm mdoc warning: Empty input line #\n[.c]
6422. sp
6423..
6424.
6425.blm doc-empty-line
6426.
6427.
6428.\" For UTF-8, map some characters conservatively for the sake
6429.\" of easy cut and paste.
6430.
6431.if '\*[.T]'utf8' \{\
6432. rchar \- - ' `
6433.
6434. char \- \N'45'
6435. char - \N'45'
6436. char ' \N'39'
6437. char ` \N'96'
6438.\}
6439.
6440.
6428.ec
6429.
6430.
6431.\" load local modifications
6432.mso mdoc.local
6433.
6434.\" EOF
6441.ec
6442.
6443.
6444.\" load local modifications
6445.mso mdoc.local
6446.
6447.\" EOF