summaryrefslogtreecommitdiff
path: root/tex/context/base/supp-dir.tex
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/supp-dir.tex')
-rw-r--r--tex/context/base/supp-dir.tex70
1 files changed, 0 insertions, 70 deletions
diff --git a/tex/context/base/supp-dir.tex b/tex/context/base/supp-dir.tex
deleted file mode 100644
index ad14eab1d..000000000
--- a/tex/context/base/supp-dir.tex
+++ /dev/null
@@ -1,70 +0,0 @@
-%D \module
-%D [ file=supp-dir,
-%D version=2004.11.11,
-%D title=\CONTEXT\ Support Macros,
-%D subtitle=Directional Things,
-%D author=Hans Hagen,
-%D date=\currentdate,
-%D copyright={PRAGMA / Hans Hagen \& Ton Otten}]
-%C
-%C This module is part of the \CONTEXT\ macro||package and is
-%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
-%C details.
-
-%D Inspired by and needed for Adam Lindsay's \XETEX\ efforts:
-%D
-%D \starttyping
-%D \starttext
-%D \input tufte \par
-%D \pardir TRT \input tufte \par \input tufte \par
-%D \pardir TLT \input tufte \par
-%D \stoptext
-%D \stoptyping
-
-\unprotect
-
-\chardef \inlinedirection \zerocount % 0==notset 1==LR 2==RL
-\let \checkinlinedirection \donothing
-
-\beginETEX \beginL
-
- \ifx\pardir \undefined
-
- \def\pardir#1#2#3% messages end up in a higher level command
- {\global\TeXXeTstate\plusone
- \if#2L\chardef\inlinedirection\plusone\else
- \if#2R\chardef\inlinedirection\plustwo\fi\fi
- \checkinlinedirection} % needed / added
-
- \let\normalpardir\pardir
-
- \def\checkinlinedirection
- {\ifcase\inlinedirection\or\beginL\or\beginR\fi}
-
- \else
-
-% \let\normalpardir\pardir
-
-% \def\pardir#1#2#3%
-% {\if#2L\chardef\inlinedirection\plusone\else
-% \if#2R\chardef\inlinedirection\plustwo\fi\fi
-% \normalpardir#1#2#3}
-
-% \def\beginL
-% {} % todo: \normalpardir...
-
-% \def\beginR
-% {} % todo: \normalpardir...
-
-% \def\checkinlinedirection
-% {\ifcase\inlinedirection\or\beginL\or\beginR\fi}
-
- \fi
-
-\endETEX
-
-% see core-ini.tex
-%
-% \appendtoks \checkinlinedirection \to \everypar
-
-\protect \endinput