diff options
author | Hans Hagen <pragma@wxs.nl> | 2004-01-13 00:00:00 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2004-01-13 00:00:00 +0100 |
commit | 0b61aa2fbf3667649962132eadfb1d78eab0be41 (patch) | |
tree | 781defc3254dcfbcb708a2c46e33ea9c0495c54d /tex/context/base/supp-pdf.tex | |
parent | 722c56251cf3c197a4a8474aa7024265ba284ec0 (diff) | |
download | context-0b61aa2fbf3667649962132eadfb1d78eab0be41.tar.gz |
stable 2004.01.13
Diffstat (limited to 'tex/context/base/supp-pdf.tex')
-rw-r--r-- | tex/context/base/supp-pdf.tex | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/tex/context/base/supp-pdf.tex b/tex/context/base/supp-pdf.tex index aed57b32e..7775842c2 100644 --- a/tex/context/base/supp-pdf.tex +++ b/tex/context/base/supp-pdf.tex @@ -396,6 +396,8 @@ \def \PSscale {scale} \def \PSconcat {concat} \def \PSdtransform {dtransform} +\def \PSsetlinewidth {setlinewidth} +\def \PSpop {pop} \def \PSnfont {nfont} % was needed for TUG98 proceedings \def \PSspecial {special} % extensions to MetaPost @@ -662,6 +664,17 @@ \resetMPstack \else\ifx\somestring\PSdtransform % == setlinewidth \let\handleMPsequence\handleMPdtransform + % after that we will encounter more tokens until setlinewidth+pop + % or pop+setlinewidth which we catch next; we explicitly need to + % reset the stack since [] n setdash may follow; a more clever + % approach would be to read on till the condition is met, but it's + % the only pop / setlinewidth we will encounter so ... + \else\ifx\somestring\PSsetlinewidth + % already handled in dtransform + \resetMPstack + \else\ifx\somestring\PSpop + % already handled in dtransform + \resetMPstack \else\ifx\somestring\PSconcat \PDFcode{\gMPa1 \gMPa2 \gMPa3 \gMPa4 \gMPa5 \gMPa6 cm}% \resetMPstack @@ -704,7 +717,7 @@ \resetMPstack \else \handleMPgraphic% {#1}% - \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi \handleMPsequence} \def\dohandleMPsequenceC#1 % |