summaryrefslogtreecommitdiff
path: root/Build/source/texk/dvipsk/tex.lpro
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2010-05-05 09:37:32 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2010-05-05 09:37:32 +0000
commit149d652144fe416dbe4ecf9fc5cef71617ef01ff (patch)
treedd6af91d94b7a0fa3ee43fbf5996539d481c3285 /Build/source/texk/dvipsk/tex.lpro
parent52fa6e36fd5539d6bd3546acdfb401bd99d899d6 (diff)
dvips pTeX extensions, based on patches sent by Akira
git-svn-id: svn://tug.org/texlive/trunk@18107 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/dvipsk/tex.lpro')
-rw-r--r--Build/source/texk/dvipsk/tex.lpro17
1 files changed, 16 insertions, 1 deletions
diff --git a/Build/source/texk/dvipsk/tex.lpro b/Build/source/texk/dvipsk/tex.lpro
index 2b92d6ba5bc..b7cc3deebe7 100644
--- a/Build/source/texk/dvipsk/tex.lpro
+++ b/Build/source/texk/dvipsk/tex.lpro
@@ -258,7 +258,22 @@ TeXDict begin % start using it.
65781.76 div /hsize X
} N
-/p {show} N % the main character setting routine
+/dir 0 def
+/dyy {/dir 0 def
+} B
+/dyt {/dir 1 def
+} B
+/dty {/dir 2 def
+} B
+/dtt {/dir 3 def
+} B
+
+%/p {show} N % the main character setting routine
+/p {dir 2 eq
+ {-90 rotate show 90 rotate}
+ {dir 3 eq {-90 rotate show 90 rotate}
+ {show} ifelse} ifelse
+} N
/RMat [ 1 0 0 -1 0 0 ] N % things we need for rules
/BDot 260 string N