summaryrefslogtreecommitdiff
path: root/graphics/pictex/postpictex.tex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /graphics/pictex/postpictex.tex
Initial commit
Diffstat (limited to 'graphics/pictex/postpictex.tex')
-rw-r--r--graphics/pictex/postpictex.tex44
1 files changed, 44 insertions, 0 deletions
diff --git a/graphics/pictex/postpictex.tex b/graphics/pictex/postpictex.tex
new file mode 100644
index 0000000000..d46612a862
--- /dev/null
+++ b/graphics/pictex/postpictex.tex
@@ -0,0 +1,44 @@
+% This is postpictex.tex Version 1.1 9/10/87
+
+% To use the PiCTeX macros under LaTeX, you first need to \input the
+% file prepictex.tex, then the main corpus of PiCTeX macros (pictex.tex),
+% and finally this file. Do not \input the file latexpicobjs.tex.
+
+\catcode`@=11 \catcode`!=11
+
+% Save meanings of PiCTeX keywords that duplicate LaTeX keywords
+\let\!pictexendpicture=\endpicture
+\let\!pictexframe=\frame
+\let\!pictexlinethickness=\linethickness
+\let\!pictexmultiput=\multiput
+\let\!pictexput=\put
+
+% Redefine the PiCTeX \beginpicture macro
+\def\beginpicture{%
+ \setbox\!picbox=\hbox\bgroup%
+ \let\endpicture=\!pictexendpicture
+ \let\frame=\!pictexframe
+ \let\linethickness=\!pictexlinethickness
+ \let\multiput=\!pictexmultiput
+ \let\put=\!pictexput
+ \let\input=\@@input % \@@input is LaTeX's saved version of TeX's primitive
+ \!xleft=\maxdimen
+ \!xright=-\maxdimen
+ \!ybot=\maxdimen
+ \!ytop=-\maxdimen}
+
+% Reestablish LaTeX's meaning of \frame. This makes
+% PiCTeX's meaning of \frame available only inside a PiCture.
+\let\frame=\!latexframe
+
+% Make PiCTeX's meaning of \frame available everywhere in the
+% guise of \pictexframe
+\let\pictexframe=\!pictexframe
+
+% Now do the same for \linethickness
+\let\linethickness=\!latexlinethickness
+\let\pictexlinethickness=\!pictexlinethickness
+
+% Reset LaTeX's default meaning of \\
+\let\\=\@normalcr
+\catcode`@=12 \catcode`!=12