[latex3-commits] [git/LaTeX3-latex3-latex3] l3doc: Make <@@=...> valid only at the beginning of lines (53fc14149)

[Phelype Oleinik]

Repository : https://github.com/latex3/latex3
On branch  : l3doc
Link       : https://github.com/latex3/latex3/commit/53fc1414928f53ec8f84d2640d0ebf2cc24d9e1b

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

commit 53fc1414928f53ec8f84d2640d0ebf2cc24d9e1b
Author: Phelype Oleinik <phe.h.o1 at gmail.com>
Date:   Wed Oct 9 22:21:06 2019 -0300

    Make <@@=...> valid only at the beginning of lines


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

53fc1414928f53ec8f84d2640d0ebf2cc24d9e1b
 l3kernel/l3doc-pkg.dtx | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/l3kernel/l3doc-pkg.dtx b/l3kernel/l3doc-pkg.dtx
index fc48ae08d..dea2329b0 100644
--- a/l3kernel/l3doc-pkg.dtx
+++ b/l3kernel/l3doc-pkg.dtx
@@ -3703,11 +3703,13 @@
 \group_begin:
   \char_set_catcode_active:N \<
   \char_set_catcode_active:N \>
+  \char_set_catcode_other:N \%
+  \char_set_catcode_comment:N \/
   \cs_new_protected:Npn \@@_xmacro_code:n #1
     {
       \tl_clear:N \l_@@_tmpa_tl
-      \tl_if_in:nnTF {#1} { < @ @ = }
-        { \@@_xmacro_code:w #1 < @ @ = \q_recursion_tail > \q_recursion_stop }
+      \tl_if_in:nnTF {#1} { % < @ @ = }
+        { \@@_xmacro_code:w #1 % < @ @ = \q_recursion_tail > \q_recursion_stop }
         {
           \tl_set:Nn \l_@@_tmpa_tl {#1}
           \@@_detect_internals:N \l_@@_tmpa_tl
@@ -3715,20 +3717,20 @@
           \tl_use:N \l_@@_tmpa_tl
         }
     }
-  \cs_new_protected:Npn \@@_xmacro_code:w #1 < @ @ = #2 >
+  \cs_new_protected:Npn \@@_xmacro_code:w #1 % < @ @ = #2 >
     {
-      % Add code before <@@@@=...>
+      // Add code before <@@@@=...>
       \tl_set:Nn \l_@@_tmpb_tl {#1}
       \@@_detect_internals:N \l_@@_tmpb_tl
       \@@_replace_at_at:N \l_@@_tmpb_tl
       \tl_put_right:NV \l_@@_tmpa_tl \l_@@_tmpb_tl
-      % Check for \q_recursion_tail
+      // Check for \q_recursion_tail
       \quark_if_recursion_tail_stop_do:nn {#2}
         { \tl_use:N \l_@@_tmpa_tl }
-      % Change module name and add <@@@@=#2> to typeset output
+      // Change module name and add <@@@@=#2> to typeset output
       \tl_gset:Nn \g_@@_module_name_tl {#2}
       \tl_put_right:Nn \l_@@_tmpa_tl { < \text { \verbatim at font @ @ = #2 } > }
-      % Loop
+      // Loop
       \@@_xmacro_code:w
     }
 \group_end: