summaryrefslogtreecommitdiff
path: root/Build/source/texk/dvipsk/testdata/alt-rule.pro
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-02-25 17:27:46 +0000
committerKarl Berry <karl@freefriends.org>2011-02-25 17:27:46 +0000
commitb29fdf77e54a9344ce0284a053ee4cd98727dd8a (patch)
treed07f60aec0beac73bf7436127ed3a1911a468821 /Build/source/texk/dvipsk/testdata/alt-rule.pro
parent4a48c7546542514ae9137d0418dacf821efe4192 (diff)
avoid nan result with eepic lines
git-svn-id: svn://tug.org/texlive/trunk@21520 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/dvipsk/testdata/alt-rule.pro')
-rw-r--r--Build/source/texk/dvipsk/testdata/alt-rule.pro17
1 files changed, 17 insertions, 0 deletions
diff --git a/Build/source/texk/dvipsk/testdata/alt-rule.pro b/Build/source/texk/dvipsk/testdata/alt-rule.pro
new file mode 100644
index 00000000000..c7fb9443923
--- /dev/null
+++ b/Build/source/texk/dvipsk/testdata/alt-rule.pro
@@ -0,0 +1,17 @@
+%!
+% Patch by TVZ
+% Makes dvips files draw rules with stroke rather than fill.
+% Makes narrow rules more predictable at low resolutions
+% after distilling to PDF.
+% May have unknown consequences for very thick rules.
+% Tested only with dvips 5.85(k).
+TeXDict begin
+/QV {
+ gsave newpath /ruleY X /ruleX X
+ Rx Ry gt
+ { ruleX ruleY Ry 2 div sub moveto Rx 0 rlineto Ry }
+ { ruleX Rx 2 div add ruleY moveto 0 Ry neg rlineto Rx }
+ ifelse
+ setlinewidth 0 setlinecap stroke grestore
+} bind def
+end