summaryrefslogtreecommitdiff
path: root/macros/luatex/optex/basics-macros.opm
diff options
context:
space:
mode:
Diffstat (limited to 'macros/luatex/optex/basics-macros.opm')
-rw-r--r--macros/luatex/optex/basics-macros.opm22
1 files changed, 6 insertions, 16 deletions
diff --git a/macros/luatex/optex/basics-macros.opm b/macros/luatex/optex/basics-macros.opm
index 368b9bd332..638270d38b 100644
--- a/macros/luatex/optex/basics-macros.opm
+++ b/macros/luatex/optex/basics-macros.opm
@@ -1,17 +1,16 @@
%% This is part of OpTeX project, see http://petr.olsak.net/optex
-\_codedecl \sdef {Basic macros for OpTeX <2019-05-21>}
+\_codedecl \sdef {Basic macros for OpTeX <2020-02-14>}
\let\_bgroup={ \let\_egroup=}
\_bgroup \_lccode`\.=`\\ \_lowercase{\_egroup \_def\_nbackslash {.}}
\_edef \_nbb {\_nbackslash\_nbackslash}
-\_edef \_pcent{\_xstring\%}
+\_edef \_pcent{\_csstring\%}
\_def \_empty {}
\_def \_space { }
\_def \_null {\_hbox{}}
\_def \_wlog {\_immediate\_write-1 } % write on log file (only)
-\_def \_wterm {\_immediate\_write16 }
\_def \_opwarning #1{\_wterm{WARNING: #1.}}
\_def \_sdef #1{\_ea\_def \_csname#1\_endcsname}
@@ -21,16 +20,6 @@
\_def \_cs #1{\_csname#1\_endcsname}
\_long\_def \_addto #1#2{\_ea\_def\_ea#1\_ea{#1#2}}
-\_ea\_def \_ea\_meaningsepare \_ea#\_ea1\_string m#2:#3->#4^{{#1}{#3}{#4}}
-
-\_bgroup \_catcode`!=3 \_catcode`?=3
-\_gdef\_replstring #1#2#3{% \replstring #1{stringA}{stringB}
- \_long\_def\_replacestringsA##1#2{\_def #1{##1}\_replacestringsB}%
- \_long\_def\_replacestringsB##1#2{\_ifx!##1\_relax \_else \_addto #1{#3##1}%
- \_ea\_replacestringsB\_fi}%
- \_ea\_replacestringsA #1?#2!#2%
- \_long\_def\_replacestringsA##1?{\_def #1{##1}}\_ea\_replacestringsA #1}
-\_egroup
\_def\_loggingall{\_tracingcommands=3 \tracingstats=2 \tracingassigns=1
\tracingpages=1 \tracingoutput=1 \tracinglostchars=1
@@ -41,10 +30,11 @@
\_def\_remfirstunderscoreA#1#2\_relax#3{\_if _#1\_def#3{#2}\_fi}
\_public
- \bgroup \egroup \nbackslash \sdef \sxdef \slet \cs \adef
- \addto \meaningsepare \wlog \wterm \opwarning
+ \bgroup \egroup \nbackslash
\empty \space \null \nbb \pcent \ncaret
- \isinlist \replstring \remfirstunderscore \loggingall \tracingall ;
+ \sdef \sxdef \slet \cs \adef
+ \addto \wlog \opwarning
+ \loggingall \tracingall ;
\_endcode % -------------------------------------