internal update

5 files changed, 52 insertions, 12 deletions

diff --git a/tmac/doc-common.new b/tmac/doc-common.new
index 36dc7017..158cbb2c 100755
--- a/tmac/doc-common.new
+++ b/tmac/doc-common.new
@@ -237,6 +237,7 @@
 .als doc-volume-ds-LOC doc-volume-ds-LOCAL
 .
 .ds doc-volume-as-alpha    (Alpha Architecture)
+.ds doc-volume-as-Alpha    "\*[doc-volume-as-alpha]
 .ds doc-volume-as-amiga    (Amiga Architecture)
 .ds doc-volume-as-arc      (Arc Architecture)
 .ds doc-volume-as-arm26    (ARM26 Architecture)
@@ -808,4 +809,7 @@
 .  tm END OF GLOBAL REGISTER DUMP
 ..
 .
+.
+.ec
+.
 .\" EOF
diff --git a/tmac/doc-ditroff.new b/tmac/doc-ditroff.new
index 37cdd5d7..dc47cbad 100755
--- a/tmac/doc-ditroff.new
+++ b/tmac/doc-ditroff.new
@@ -34,6 +34,8 @@
 .\"     %beginstrip%
 .
 .
+.eo
+.
 .\" use -rC=1 to number pages continuously
 .
 .if !r C .nr C 0
@@ -431,4 +433,7 @@
 .  \}
 ..
 .
+.
+.ec
+.
 .\" EOF
diff --git a/tmac/doc-nroff.new b/tmac/doc-nroff.new
index 3f25399c..d7cd05e4 100755
--- a/tmac/doc-nroff.new
+++ b/tmac/doc-nroff.new
@@ -34,6 +34,8 @@
 .\"     %beginstrip%
 .
 .
+.eo
+.
 .\" use -rcR=0 to have multiple pages instead of a single, very long page
 .
 .if !r cR .nr cR 1
@@ -354,4 +356,7 @@
 .  \}
 ..
 .
+.
+.ec
+.
 .\" EOF
diff --git a/tmac/doc-syms.new b/tmac/doc-syms.new
index 35fe317c..bebb2860 100755
--- a/tmac/doc-syms.new
+++ b/tmac/doc-syms.new
@@ -34,6 +34,8 @@
 .\"     %beginstrip%
 .
 .
+.eo
+.
 .\" NS Ld user macro
 .\" NS   print `...' (similar to TeX's \ldots command)
 .\" NS
@@ -663,4 +665,7 @@
 .  \}
 ..
 .
+.
+.ec
+.
 .\" EOF
diff --git a/tmac/tmac.doc.new b/tmac/tmac.doc.new
index d7217940..9f710d77 100755
--- a/tmac/tmac.doc.new
+++ b/tmac/tmac.doc.new
@@ -48,8 +48,6 @@
 .
 .cp 0
 .
-.eo
-.
 .
 .\" Load start-up files
 .ie t .mso mdoc/doc-ditroff.new
@@ -58,6 +56,8 @@
 .mso mdoc/doc-common.new
 .mso mdoc/doc-syms.new
 .
+.eo
+.
 .
 .\" NS doc-inline-debug user register (bool)
 .\" NS   inline debug mode (inline if 1, to stderr if 0 (default))
@@ -487,6 +487,8 @@
 .\" NS   doc-out-string, doc-curr-space
 .
 .de doc-print-out-string
+.  nh
+.
 .  if !(\n[doc-in-list] : \n[doc-nesting-level]) \
 .    if !\n[doc-no-printing] \{\
 .      nop \&\*[doc-out-string]
@@ -578,7 +580,7 @@
 .  nr doc-reg-dfr1 \n[doc-type\n[doc-arg-ptr]]
 .  ds doc-str-dfr "\*[doc-arg\n[doc-arg-ptr]]
 .
-.  hy 0
+.  nh
 .
 .  ie (\n[doc-reg-dfr1] == 1) \{\
 .    as doc-out-string \f[P]\s[0]
@@ -654,8 +656,6 @@
 .  nr doc-reg-dpr1 \n[doc-type\n[doc-arg-ptr]]
 .  ds doc-str-dpr "\*[doc-arg\n[doc-arg-ptr]]
 .
-.  hy 0
-.
 .  ie (\n[doc-reg-dpr1] == 1) \{\
 .    as doc-out-string \f[\n[doc-curr-font]]\s[\n[doc-curr-size]]
 .    \*[doc-str-dpr]
@@ -2244,9 +2244,10 @@
 .        doc-print-and-reset
 .    \}
 .    el \{\
-.      nr doc-str-dec (\n[doc-arg-ptr] + 1)
-.      if (\n[doc-type\n[doc-str-dec]] == 2) \
-.        as doc-out-string "\*[doc-space\n[doc-arg-limit]]
+\#.      nr doc-str-dec (\n[doc-arg-ptr] + 1)
+\#.      if (\n[doc-type\n[doc-str-dec]] == 2) \
+\#.        as doc-out-string "\*[doc-space\n[doc-arg-limit]]
+.        as doc-out-string "\*[doc-space\n[doc-arg-ptr]]
 .      No
 .  \}\}
 .
@@ -3752,6 +3753,8 @@
 .\" NS   doc-out-string, doc-in-list
 .
 .de doc-inset-list
+.  nh
+.
 .  doc-set-vertical-and-indent 0
 .  br
 .  nop \&\*[doc-out-string]
@@ -3760,6 +3763,8 @@
 .  ds doc-out-string
 .  doc-reset-args
 '  fi
+.
+.  hy
 ..
 .
 .
@@ -3773,6 +3778,8 @@
 .\" NS   doc-reg-dhl
 .
 .de doc-hang-list
+.  nh
+.
 .  doc-set-vertical-and-indent 1
 .  nr doc-reg-dhl (\n[doc-list-indent-stack\n[doc-list-depth]]u + \n[doc-digit-width]u)
 .  ti -\n[doc-reg-dhl]u
@@ -3786,6 +3793,8 @@
 .  ds doc-out-string
 .  doc-reset-args
 '  fi
+.
+.  hy
 ..
 .
 .
@@ -3796,6 +3805,8 @@
 .\" NS   doc-out-string, doc-in-list
 .
 .de doc-ohang-list
+.  nh
+.
 .  doc-set-vertical-and-indent 0
 .  nop \&\*[doc-out-string]
 .  br
@@ -3804,6 +3815,8 @@
 .  ds doc-out-string
 .  doc-reset-args
 '  fi
+.
+.  hy
 ..
 .
 .
@@ -3896,6 +3909,8 @@
 .  nr doc-curr-font \n[.f]
 .  nr doc-curr-size \n[.s]
 .
+.  nh
+.
 .  ie \n[doc-have-diag-list] \{\
 .    ie ((\n[.c] - \n[doc-diag-list-input-line-count]) > 1) \
 .      doc-paragraph
@@ -3912,6 +3927,8 @@
 .  doc-reset-args
 .  ds doc-out-string
 '  fi
+.
+.  hy
 ..
 .
 .
@@ -3925,6 +3942,8 @@
 .\" NS   doc-reg-dtl
 .
 .de doc-tag-list
+.  nh
+.
 .  if !\n[doc-have-tag-width] \
 .    doc-get-tag-width
 .  doc-set-vertical-and-indent 1
@@ -3946,6 +3965,8 @@
 .  ds doc-out-string
 .  doc-reset-args
 '  fi
+.
+.  hy
 ..
 .
 .
@@ -4595,7 +4616,7 @@
 .\" NS width register `Fn' set in doc-common
 .
 .de Fn
-.  hy 0
+.  nh
 .
 .  if !\n[doc-arg-limit] \{\
 .    ie \n[.$] \{\
@@ -4798,7 +4819,7 @@
 .\" NS width register `Fo' set in doc-common
 .
 .de Fo
-.  hy 0
+.  nh
 .
 .  if !\n[doc-arg-limit] \{\
 .    ie \n[.$] \{\
@@ -5705,7 +5726,7 @@
 .\" NS   doc-reg-ddr, doc-reg-ddr1
 .
 .de doc-do-references
-.  hy 0
+.  nh
 .
 .  nr doc-reg-ddr1 \n[doc-type\n[doc-arg-ptr]]
 .
@@ -5862,7 +5883,7 @@
 .    \" .nr doc-num-args (\n[.$] - 1)
 .
 .    if "\$1"-std" \{\
-.      doc-reg-Rv \*[doc-section]
+.      nr doc-reg-Rv \*[doc-section]
 .      if ((\n[doc-reg-Rv] < 2) : (\n[doc-reg-Rv] > 3)) \
 .        tm Usage: .Rv -std in sections 2 and 3 only (#\n[.c])
 .      br