summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorwlemb <wlemb>2001-07-03 10:08:06 +0000
committerwlemb <wlemb>2001-07-03 10:08:06 +0000
commit0ae0a650c2ef82dc9f9c26c58ce8fbb5be89da07 (patch)
treee6f2345cf89824231d7a5950389dd8fb10e8cf3d
parentbccf610853f12cc340189bb8310432eee0a80161 (diff)
downloadgroff-0ae0a650c2ef82dc9f9c26c58ce8fbb5be89da07.tar.gz
* tmac/doc-common, tmac/doc.tmac (doc-display-ft-stack,
doc-display-ps-stack): Implement font and font size stack for displays.
-rw-r--r--ChangeLog8
-rw-r--r--tmac/doc-common2
-rw-r--r--tmac/doc.tmac32
3 files changed, 37 insertions, 5 deletions
diff --git a/ChangeLog b/ChangeLog
index e77d20a6..aef91186 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2001-04-18 Ruslan Ermilov <ru@FreeBSD.org>
+
+ * tmac/doc-common, tmac/doc.tmac (doc-display-ft-stack,
+ doc-display-ps-stack): Implement font and font size stack for
+ displays.
+
2001-07-02 Werner LEMBERG <wl@gnu.org>
* REVISION: Increased to 2.
@@ -7,7 +13,7 @@
beginning of a line.
* src/groff/grog/grog.sh: Ditto.
-2001-06-29 Peter Marquardt <wwwutz@molgen.mpg.de>
+2001-06-29 Peter Marquardt <wwwutz@molgen.mpg.de>
* src/preproc/eqn/neqn.sh: Put `export' keyword in a new line to
make it portable.
diff --git a/tmac/doc-common b/tmac/doc-common
index 8e788ebd..d19a795f 100644
--- a/tmac/doc-common
+++ b/tmac/doc-common
@@ -918,6 +918,8 @@
. tm doc-display-indent-stack\n[doc-reg-Rd] == \n[doc-display-indent-stack\n[doc-reg-Rd]]
. tm doc-display-ad-stack\n[doc-reg-Rd] == \n[doc-display-ad-stack\n[doc-reg-Rd]]
. tm doc-display-fi-stack\n[doc-reg-Rd] == \n[doc-display-fi-stack\n[doc-reg-Rd]]
+. tm doc-display-ft-stack\n[doc-reg-Rd] == \n[doc-display-ft-stack\n[doc-reg-Rd]]
+. tm doc-display-ps-stack\n[doc-reg-Rd] == \n[doc-display-ps-stack\n[doc-reg-Rd]]
. nr doc-reg-Rd +1
. \}
.
diff --git a/tmac/doc.tmac b/tmac/doc.tmac
index 74661939..9b61bdc4 100644
--- a/tmac/doc.tmac
+++ b/tmac/doc.tmac
@@ -2583,6 +2583,24 @@
.nr doc-display-fi-stack0 0
.
.
+.\" NS doc-display-ft-stackXXX global register
+.\" NS stack of saved fonts
+.\" NS
+.\" NS limit:
+.\" NS doc-display-depth
+.
+.nr doc-display-ft-stack0 0
+.
+.
+.\" NS doc-display-ps-stackXXX global register
+.\" NS stack of saved font sizes
+.\" NS
+.\" NS limit:
+.\" NS doc-display-depth
+.
+.nr doc-display-ps-stack0 0
+.
+.
.\" NS Bd user macro
.\" NS begin display
.\" NS
@@ -2594,6 +2612,8 @@
.\" NS doc-display-depth
.\" NS doc-display-ad-stackXXX
.\" NS doc-display-fi-stackXXX
+.\" NS doc-display-ft-stackXXX
+.\" NS doc-display-ps-stackXXX
.\" NS doc-display-file
.\" NS doc-display-indent-stackXXX
.\" NS doc-display-type-stackXXX
@@ -2623,8 +2643,8 @@
.
. ie "\$1"-literal" \{\
. ds doc-display-type-stack\n[doc-display-depth] literal
-. nr doc-curr-font \n[.f]
-. nr doc-curr-size \n[.ps]
+. nr doc-display-ft-stack\n[doc-display-depth] \n[.f]
+. nr doc-display-ps-stack\n[doc-display-depth] \n[.ps]
.
. ie t \{\
. nop \*[doc-Li-font]\c
@@ -2816,8 +2836,8 @@
. \}
.
. if "\*[doc-display-type-stack\n[doc-display-depth]]"literal" \{\
-. ft \n[doc-curr-font]
-. ps \n[doc-curr-size]u
+. ft \n[doc-display-ft-stack\n[doc-display-depth]]
+. ps \n[doc-display-ps-stack\n[doc-display-depth]]u
. \}
.
. in -\n[doc-display-indent-stack\n[doc-display-depth]]u
@@ -3231,6 +3251,8 @@
. nr doc-display-indent-stack\n[doc-reg-dsgv]-saved \n[doc-display-indent-stack\n[doc-reg-dsgv]]
. nr doc-display-ad-stack\n[doc-reg-dsgv]-saved \n[doc-display-ad-stack\n[doc-reg-dsgv]]
. nr doc-display-fi-stack\n[doc-reg-dsgv]-saved \n[doc-display-fi-stack\n[doc-reg-dsgv]]
+. nr doc-display-ft-stack\n[doc-reg-dsgv]-saved \n[doc-display-ft-stack\n[doc-reg-dsgv]]
+. nr doc-display-ps-stack\n[doc-reg-dsgv]-saved \n[doc-display-ps-stack\n[doc-reg-dsgv]]
. nr doc-reg-dsgv +1
. \}
.
@@ -3368,6 +3390,8 @@
. nr doc-display-indent-stack\n[doc-reg-drgv] \n[doc-display-indent-stack\n[doc-reg-drgv]-saved]
. nr doc-display-ad-stack\n[doc-reg-drgv] \n[doc-display-ad-stack\n[doc-reg-drgv]-saved]
. nr doc-display-fi-stack\n[doc-reg-drgv] \n[doc-display-fi-stack\n[doc-reg-drgv]-saved]
+. nr doc-display-ft-stack\n[doc-reg-drgv] \n[doc-display-ft-stack\n[doc-reg-drgv]-saved]
+. nr doc-display-ps-stack\n[doc-reg-drgv] \n[doc-display-ps-stack\n[doc-reg-drgv]-saved]
. nr doc-reg-drgv +1
. \}
.