diff options
| author | wlemb <wlemb> | 2001-07-03 10:08:06 +0000 |
|---|---|---|
| committer | wlemb <wlemb> | 2001-07-03 10:08:06 +0000 |
| commit | 0ae0a650c2ef82dc9f9c26c58ce8fbb5be89da07 (patch) | |
| tree | e6f2345cf89824231d7a5950389dd8fb10e8cf3d /tmac/doc.tmac | |
| parent | bccf610853f12cc340189bb8310432eee0a80161 (diff) | |
| download | groff-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.
Diffstat (limited to 'tmac/doc.tmac')
| -rw-r--r-- | tmac/doc.tmac | 32 |
1 files changed, 28 insertions, 4 deletions
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 . \} . |