summaryrefslogtreecommitdiff
path: root/tmac/ps.tmac
diff options
context:
space:
mode:
authorwlemb <wlemb>2002-12-21 08:32:52 +0000
committerwlemb <wlemb>2002-12-21 08:32:52 +0000
commite480b407edc11741542bf0471125680b35481cf7 (patch)
tree5acd186e3a90ce4b892111263038122deb42df85 /tmac/ps.tmac
parent546b51e1039bdeec6498cb54a09414ca98c6c132 (diff)
downloadgroff-e480b407edc11741542bf0471125680b35481cf7.tar.gz
* font/devX*/S: Regenerated.
* font/devdvi/generate/ec.map: Remove `pl'. * font/devdvi/generate/tc.map: Remove `mi', `14', `12', `34'. * font/devdvi/*{TC,EC}: Regenerated. * font/devhtml/R.proto: Add `-+'. Remove double entries for `rk', `lk', `lt', `rt', `rb', `lb'. * font/devlbp/*: Remove `or'. * font/devlj4/generate/special.map: Remove `or'. * font/devlj4/S: Regenerated. * font/devps/generate/textmap: Add `fiveeighths', `oneeighth', `seveneighths', `threeeighths'. Remove `plusmath'. Replace `minusplus' with `uni2213'. * font/devps/symbolmap: Regenerated. * font/devutf8/R.proto: Replace `shc' with unnamed glyph. Add `-+'. * src/roff/troff/charinfo.h (charinfo): Add `is_normal' inline function. * src/roff/troff/node.cc (troff_output_file::put_char_width): Call glyph_color and fill_color even if tcommand_flag isn't set. (make_node, node::add_char): Check not ci->is_fallback but ci->is_normal. * tmac/lj4.tmac, tmac/lbp.tmac: Define `or'. * tmac/ec.tmac: Add remove entry for `f/'. Don't remove `12', `14', `34'. Define `pl' to be always roman. * tmac/ps.tmac (ps-frac, ps-frac-mono): New macros. Define `18', `38', `58', `78'. * tmac/tty.tmac: Add `-+'. * tmac/dvi.tmac: Define `f/'. (dvi-frac): Use `f/'. * tmac/X.tmac (X-frac, X-frac-mono): New macros. Define `18', `38', `58', `78'.
Diffstat (limited to 'tmac/ps.tmac')
-rw-r--r--tmac/ps.tmac36
1 files changed, 36 insertions, 0 deletions
diff --git a/tmac/ps.tmac b/tmac/ps.tmac
index d438ccfa..b8b7e7bd 100644
--- a/tmac/ps.tmac
+++ b/tmac/ps.tmac
@@ -71,6 +71,42 @@
.ps-achar \['C] \' C c
.ps-achar \['c] \' c c
.
+.de ps-frac
+. schar \[\\$1\\$2] \
+\v'-.28m'\s[\\En[.s]*6u/10u]\\$1\s0\v'.28m'\
+\[f/]\
+\s[\\En[.s]*6u/10u]\\$2
+..
+.
+.de ps-frac-mono
+. fschar \\$1 \[\\$2\\$3] \
+\Z'\v'-.28m'\s[\\En[.s]*5u/10u]\\$2\s0\v'.28m''\
+\Z'\h'.35m'\s[\\En[.s]*5u/10u]\\$3\s0'\
+\h'.02m'\[f/]\h'-.02m'
+..
+.
+.ps-frac 1 8
+.ps-frac 3 8
+.ps-frac 5 8
+.ps-frac 7 8
+.
+.ps-frac-mono CR 1 8
+.ps-frac-mono CR 3 8
+.ps-frac-mono CR 5 8
+.ps-frac-mono CR 7 8
+.ps-frac-mono CI 1 8
+.ps-frac-mono CI 3 8
+.ps-frac-mono CI 5 8
+.ps-frac-mono CI 7 8
+.ps-frac-mono CB 1 8
+.ps-frac-mono CB 3 8
+.ps-frac-mono CB 5 8
+.ps-frac-mono CB 7 8
+.ps-frac-mono CBI 1 8
+.ps-frac-mono CBI 3 8
+.ps-frac-mono CBI 5 8
+.ps-frac-mono CBI 7 8
+.
.\" pic tests this register to see whether it should use \X'ps:...'
.nr 0p 1
.