summaryrefslogtreecommitdiff
path: root/tmac/X.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/X.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/X.tmac')
-rw-r--r--tmac/X.tmac37
1 files changed, 37 insertions, 0 deletions
diff --git a/tmac/X.tmac b/tmac/X.tmac
index 23aaf936..91062974 100644
--- a/tmac/X.tmac
+++ b/tmac/X.tmac
@@ -68,6 +68,43 @@
.X-achar \['c] \' c c
.X-achar \[:Y] \[ad] Y y
.
+.de X-frac
+. schar \[\\$1\\$2] \
+\v'-.28m'\s[\\En[.s]*6u/10u]\\$1\s0\v'.28m'\
+\h'-.1m'\[f/]\h'-.1m'\
+\s[\\En[.s]*6u/10u]\\$2
+..
+.
+.de X-frac-mono
+. fschar \\$1 \[\\$2\\$3] \
+\Z'\v'-.28m'\s[\\En[.s]*5u/10u]\\$2\s0\v'.28m''\
+\Z'\h'0.25m'\[f/]'\
+\Z'\h'.35m'\s[\\En[.s]*5u/10u]\\$3\s0'\
+\h'\w'M'u'
+..
+.
+.X-frac 1 8
+.X-frac 3 8
+.X-frac 5 8
+.X-frac 7 8
+.
+.X-frac-mono CR 1 8
+.X-frac-mono CR 3 8
+.X-frac-mono CR 5 8
+.X-frac-mono CR 7 8
+.X-frac-mono CI 1 8
+.X-frac-mono CI 3 8
+.X-frac-mono CI 5 8
+.X-frac-mono CI 7 8
+.X-frac-mono CB 1 8
+.X-frac-mono CB 3 8
+.X-frac-mono CB 5 8
+.X-frac-mono CB 7 8
+.X-frac-mono CBI 1 8
+.X-frac-mono CBI 3 8
+.X-frac-mono CBI 5 8
+.X-frac-mono CBI 7 8
+.
.if '\*[.T]'X100' \
. char \[radicalex] \h'-\w'\[sr]'u'\[radicalex]\h'\w'\[sr]'u'
.