summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2018-12-30 22:11:51 +0000
committerKarl Berry <karl@freefriends.org>2018-12-30 22:11:51 +0000
commit5a8b5044b55dfb4e76f990eb433c7e229906c162 (patch)
tree6ce99f31e044b1b5bbd52eb7300f201763cd6f2d /Master/texmf-dist/dvips
parentbb7737fd4c99d8110fadbf69be86d62160650916 (diff)
pst-text (30dec18)
git-svn-id: svn://tug.org/texlive/trunk@49542 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips')
-rw-r--r--Master/texmf-dist/dvips/pst-text/pst-text.pro30
1 files changed, 29 insertions, 1 deletions
diff --git a/Master/texmf-dist/dvips/pst-text/pst-text.pro b/Master/texmf-dist/dvips/pst-text/pst-text.pro
index f4fb7ca43aa..e60e2e6c51e 100644
--- a/Master/texmf-dist/dvips/pst-text/pst-text.pro
+++ b/Master/texmf-dist/dvips/pst-text/pst-text.pro
@@ -1,6 +1,8 @@
%!
+% $Id: pst-text.pro 891 2018-12-29 19:42:20Z herbert $
+%
% PostScript header file pst-text.pro
-% Version 1.01, 2018-12-22 (hv)
+% Version 1.02, 2018-12-28 (hv)
% For distribution, see pstricks.tex.
%
/tx@TextPathDict 45 dict def
@@ -131,5 +133,31 @@ tx@TextPathDict begin
pop
} def
%
+/circle {
+ exch neg
+ % .5 mul
+ 90 add
+ dup cos 2 index mul
+ 3 1 roll
+ sin mul
+} bind def
+
+/circmove{
+ 2 index { newpath } if
+ circle moveto
+ pop false
+} bind def
+
+/circline { circle lineto } bind def
+
+/circcurve {
+ 6 2 roll circle
+ 6 2 roll circle
+ 6 2 roll circle
+ curveto
+} bind def
+
+/circit { true { circmove } { circline } { circcurve } { closepath } pathforall pop } bind def
+%
end
% END pst-text.pro \ No newline at end of file