[latex3-commits] [git/LaTeX3-latex3-latex3] scan-quark: Replace quarks by scan marks in expl3.dtx (21e213680)

[PhelypeOleinik]

Repository : https://github.com/latex3/latex3
On branch  : scan-quark
Link       : https://github.com/latex3/latex3/commit/21e2136804aa1ea84096d6cf85c784fe6d7feacc

>---------------------------------------------------------------

commit 21e2136804aa1ea84096d6cf85c784fe6d7feacc
Author: PhelypeOleinik <tex.phelype at gmail.com>
Date:   Fri Mar 20 21:24:35 2020 -0300

    Replace quarks by scan marks in expl3.dtx


>---------------------------------------------------------------

21e2136804aa1ea84096d6cf85c784fe6d7feacc
 l3kernel/expl3.dtx                | 13 +++++++++++--
 l3kernel/testfiles/m3quark001.tlg |  2 +-
 2 files changed, 12 insertions(+), 3 deletions(-)

diff --git a/l3kernel/expl3.dtx b/l3kernel/expl3.dtx
index 080baf1be..924d48906 100644
--- a/l3kernel/expl3.dtx
+++ b/l3kernel/expl3.dtx
@@ -1334,6 +1334,15 @@
   { \sys_everyjob: }
 %    \end{macrocode}
 %
+% \begin{variable}{\s_@@_stop}
+%   Internal scan marks.
+%    \begin{macrocode}
+\reverse_if:N \if_cs_exist:N \s_@@_stop
+  \scan_new:N \s_@@_stop
+\fi:
+%    \end{macrocode}
+% \end{variable}
+%
 % \begin{macro}{\@pushfilename, \@popfilename}
 % \begin{macro}{\@@_status_pop:w}
 %   The idea here is to use \LaTeXe{}'s \tn{@pushfilename} and
@@ -1372,14 +1381,14 @@
     \__kernel_file_input_pop:
     \tl_if_empty:NTF \l_@@_status_stack_tl
       { \ExplSyntaxOff }
-      { \exp_after:wN \@@_status_pop:w \l_@@_status_stack_tl \q_stop }
+      { \exp_after:wN \@@_status_pop:w \l_@@_status_stack_tl \s_@@_stop }
   }
 %    \end{macrocode}
 %   The pop auxiliary function removes the first item from the stack,
 %   saves the rest of the stack and then does the test. The flag here
 %   is not a proper \texttt{bool}, so a low-level test is used.
 %    \begin{macrocode}
-\cs_gset_protected:Npn \@@_status_pop:w #1#2 \q_stop
+\cs_gset_protected:Npn \@@_status_pop:w #1#2 \s_@@_stop
   {
     \tl_set:Nn \l_@@_status_stack_tl {#2}
     \int_if_odd:nTF {#1}
diff --git a/l3kernel/testfiles/m3quark001.tlg b/l3kernel/testfiles/m3quark001.tlg
index ff796cdea..85e64d816 100644
--- a/l3kernel/testfiles/m3quark001.tlg
+++ b/l3kernel/testfiles/m3quark001.tlg
@@ -90,7 +90,7 @@ already been used for a scan mark.
 \s__fp_invalid \s__fp_underflow \s__fp_overflow \s__fp_division \s__fp_exact
 \s__fp_tuple \s__sort_mark \s__sort_stop \s__sort_scan_stop \s__tl
 \s__color_stop \s__text_stop \s__bool_mark \s__bool_stop \s__deprecation_mark
-\s__deprecation_stop \s__foo .
+\s__deprecation_stop \s__expl_stop \s__foo .
 ============================================================
 ============================================================
 TEST 14: Use none until s__stop (expect nothing)