summaryrefslogtreecommitdiff
path: root/tex/context/base/math-pln.tex
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2003-01-28 00:00:00 +0100
committerHans Hagen <pragma@wxs.nl>2003-01-28 00:00:00 +0100
commite65a436deb332118831156075846acc80fb9d386 (patch)
tree361145fb042743a584c6bb7accc12e6e902088c6 /tex/context/base/math-pln.tex
parent8de3b8a6a820ba65fe85f0cb83700b6282e61d71 (diff)
downloadcontext-e65a436deb332118831156075846acc80fb9d386.tar.gz
stable 2003.01.28
Diffstat (limited to 'tex/context/base/math-pln.tex')
-rw-r--r--tex/context/base/math-pln.tex25
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}