[latex3-commits] [git/LaTeX3-latex3-latex3] scan-quark: Replace quarks by scan marks in l3sys-shell (e9f43fea1)

[PhelypeOleinik]

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

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

commit e9f43fea133c078cfba93db1d87f26a35b72b3c0
Author: PhelypeOleinik <tex.phelype at gmail.com>
Date:   Fri Mar 20 22:59:19 2020 -0300

    Replace quarks by scan marks in l3sys-shell


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

e9f43fea133c078cfba93db1d87f26a35b72b3c0
 l3experimental/l3sys-shell/l3sys-shell.dtx         | 32 ++++++++++++++++++----
 .../l3sys-shell/testfiles/m3sys-shell001.tlg       |  3 ++
 2 files changed, 30 insertions(+), 5 deletions(-)

diff --git a/l3experimental/l3sys-shell/l3sys-shell.dtx b/l3experimental/l3sys-shell/l3sys-shell.dtx
index cf5e76022..af21194c1 100644
--- a/l3experimental/l3sys-shell/l3sys-shell.dtx
+++ b/l3experimental/l3sys-shell/l3sys-shell.dtx
@@ -141,6 +141,28 @@
 %</package>
 %    \end{macrocode}
 %
+% \begin{variable}{\s_@@_stop}
+%   Internal scan marks.
+%    \begin{macrocode}
+\scan_new:N \s_@@_stop
+%    \end{macrocode}
+% \end{variable}
+%
+% \begin{variable}{\q_@@_nil}
+%   Internal quarks.
+%    \begin{macrocode}
+\quark_new:N \q_@@_nil
+%    \end{macrocode}
+% \end{variable}
+%
+% \begin{macro}[pTF]{\@@_if_nil:n}
+%   Branching quark conditional.
+%    \begin{macrocode}
+\__kernel_quark_conditional_generate:NNnn \@@_if_nil:N
+  \q_@@_nil { @@ } { F }
+%    \end{macrocode}
+% \end{macro}
+%
 % \begin{macro}[EXP]{\@@_path_to_win:n}
 % \begin{macro}[EXP]{\@@_path_to_win:w}
 % \begin{macro}[EXP]{\@@_path_to_win:N}
@@ -148,20 +170,20 @@
 %    \begin{macrocode}
 \cs_new:Npn \@@_path_to_win:n #1
   {
-    \exp_after:wN \@@_path_to_win:w \tl_to_str:n {#1} ~ \q_stop
+    \exp_after:wN \@@_path_to_win:w \tl_to_str:n {#1} ~ \s_@@_stop
   }
-\cs_new:Npn \@@_path_to_win:w #1 ~ #2 \q_stop
+\cs_new:Npn \@@_path_to_win:w #1 ~ #2 \s_@@_stop
   {
-    \@@_path_to_win:N #1 \q_nil
+    \@@_path_to_win:N #1 \q_@@_nil
     \tl_if_empty:nF {#2}
       {
         \c_space_tl
-        \@@_path_to_win:w #2 \q_stop
+        \@@_path_to_win:w #2 \s_@@_stop
       }
   }
 \cs_new:Npn \@@_path_to_win:N #1
   {
-    \quark_if_nil:NF #1
+    \@@_if_nil:NF #1
       {
         \token_if_eq_meaning:NNTF #1 /
           { \c_backslash_str }
diff --git a/l3experimental/l3sys-shell/testfiles/m3sys-shell001.tlg b/l3experimental/l3sys-shell/testfiles/m3sys-shell001.tlg
index 1955e9fcc..fca580fd5 100644
--- a/l3experimental/l3sys-shell/testfiles/m3sys-shell001.tlg
+++ b/l3experimental/l3sys-shell/testfiles/m3sys-shell001.tlg
@@ -3,6 +3,9 @@ Don't change this file in any respect.
 Author: Joseph Wright
 (l3sys-shell.sty
 Package: l3sys-shell ....-..-.. L3 Experimental system shell functions
+Defining \s__sys_stop on line ...
+Defining \q__sys_nil on line ...
+Defining \__sys_if_nil:NF on line ...
 Defining \__sys_path_to_win:n on line ...
 Defining \__sys_path_to_win:w on line ...
 Defining \__sys_path_to_win:N on line ...