diff options
| author | Hans Hagen <pragma@wxs.nl> | 2003-01-28 00:00:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2003-01-28 00:00:00 +0100 |
| commit | e65a436deb332118831156075846acc80fb9d386 (patch) | |
| tree | 361145fb042743a584c6bb7accc12e6e902088c6 /tex/context/base/math-pln.tex | |
| parent | 8de3b8a6a820ba65fe85f0cb83700b6282e61d71 (diff) | |
| download | context-e65a436deb332118831156075846acc80fb9d386.tar.gz | |
stable 2003.01.28
Diffstat (limited to 'tex/context/base/math-pln.tex')
| -rw-r--r-- | tex/context/base/math-pln.tex | 25 |
1 files changed, 17 insertions, 8 deletions
diff --git a/tex/context/base/math-pln.tex b/tex/context/base/math-pln.tex index 7c8d902f2..73c12c973 100644 --- a/tex/context/base/math-pln.tex +++ b/tex/context/base/math-pln.tex @@ -108,17 +108,26 @@ \def\prim@s {\prime\futurelet\next\pr@m@s} +% \def\pr@m@s +% {\ifx'\next +% \let\nxt\pr@@@s +% \else +% \ifx^\next +% \let\nxt\pr@@@t +% \else +% \let\nxt\egroup +% \fi +% \fi +% \nxt} + \def\pr@m@s {\ifx'\next - \let\nxt\pr@@@s + \@EA\pr@@@s + \else\ifx^\next + \@EAEAEA\pr@@@t \else - \ifx^\next - \let\nxt\pr@@@t - \else - \let\nxt\egroup - \fi - \fi - \nxt} + \@EAEAEA\egroup + \fi\fi} \def\pr@@@s#1% {\prim@s} |