blob: 5f2281dc4815ef306e275e35f800fc1f38dedafa (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% tengtex.tex (TengTeX for Plain TeX)
% 22 September 1994
% Version 1.00
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Ivan A Derzhanski
% Centre for Cognitive Science
% University of Edinburgh
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def \makeatletter {\catcode `\@ = 11 }
\def \makeatother {\catcode `\@ = 12 }
\makeatletter
%%% hacks from latex.tex
\def\:{\let\@sptoken= } \: % this makes \@sptoken a space token
\def\:{\@xifnch} \expandafter\def\: {\futurelet\@tempc\@ifnch}
\def\@nnil{\@nil}
\def\@fornoop#1\@@#2#3{}
\def\@tfor#1:=#2\do#3{\def\@fortmp{#2}\ifx\@fortmp\@empty \else
\@tforloop#2\@nil\@nil\@@#1{#3}\fi}
\def\@tforloop#1#2\@@#3#4{\def#3{#1}\ifx #3\@nnil
\let\@nextwhile\@fornoop \else
#4\relax\let\@nextwhile\@tforloop\fi\@nextwhile#2\@@#3{#4}}
%%% hacks from arabtex.tex
\newif \if@ignore % ignore spaces after environment?
\def \begin #1{% small version without checks
\begingroup
\long \def \end ##1{% local version for \end{elvish} and \end \end
\ifx ##1\par \endelvish \endgroup
\else \csname end\string ##1\endcsname \endgroup \fi
\if@ignore \global\@ignorefalse \ignorespaces \fi }%
\csname #1\endcsname }
\input tengtex.sty
\makeatother
\endinput
|