summaryrefslogtreecommitdiff
path: root/tex/context/base/math-fen.mkiv
diff options
context:
space:
mode:
authorMarius <mariausol@gmail.com>2013-08-30 23:40:26 +0300
committerMarius <mariausol@gmail.com>2013-08-30 23:40:26 +0300
commit04219c4748f9840941bd9c9c0974f3b24e64bba5 (patch)
tree49a2bf4799d99de0aaf3f87a5b1fd8f050666e05 /tex/context/base/math-fen.mkiv
parentc0a1ceef697a9c71b66dcdf1bbf1ba3bc27af15f (diff)
downloadcontext-04219c4748f9840941bd9c9c0974f3b24e64bba5.tar.gz
beta 2013.08.30 22:40
Diffstat (limited to 'tex/context/base/math-fen.mkiv')
-rw-r--r--tex/context/base/math-fen.mkiv22
1 files changed, 19 insertions, 3 deletions
diff --git a/tex/context/base/math-fen.mkiv b/tex/context/base/math-fen.mkiv
index b487e6b5c..a7f5b2188 100644
--- a/tex/context/base/math-fen.mkiv
+++ b/tex/context/base/math-fen.mkiv
@@ -210,6 +210,7 @@
\installmathfencepair \lparent \Lparent \rparent \Rparent
\installmathfencepair \langle \Langle \rangle \Rangle
%installmathfencepair \lbar \Lbar \rbar \Rbar
+\installmathfencepair \vert \Lbar \vert \Rbar
\unexpanded\def\{{\mathortext\lbrace \letterleftbrace } % or maybe a chardef
\unexpanded\def\}{\mathortext\rbrace \letterrightbrace } % or maybe a chardef
@@ -346,12 +347,25 @@
\expandafter\math_fences_saved_right
\fi}
-\unexpanded\def\math_fences_checked_left_or_middle
+% \unexpanded\def\math_fences_checked_left_or_middle
+% {\ifcase\c_math_fenced_nesting
+% \expandafter\math_fences_saved_left
+% \else
+% \expandafter\math_fences_saved_middle
+% \fi}
+
+\newconditional\c_math_checked_done % only bars
+
+\unexpanded\def\math_fences_checked_left_or_right
{\ifcase\c_math_fenced_nesting
+ \settrue\c_math_checked_done
\expandafter\math_fences_saved_left
+ \else\ifconditional\c_math_checked_done
+ \setfalse\c_math_checked_done
+ \doubleexpandafter\math_fences_saved_right
\else
- \expandafter\math_fences_saved_middle
- \fi}
+ \doubleexpandafter\math_fences_saved_middle
+ \fi\fi}
\unexpanded\def\math_fences_checked_start
{\c_math_fenced_nesting\zerocount}
@@ -373,6 +387,8 @@
{\math_fences_checked_stop
\endgroup}
+\let\leftorright\math_fences_checked_left_or_right % for bars
+
%D The next characters were used for constructing nicer extensibles but
%D nowadays we have real characters.