[latex3-commits] [l3svn] r6991 - Run xparse processors in the correct order! (fixes #347)

[noreply at latex-project.org]

Author: bruno
Date: 2017-03-13 02:31:48 +0100 (Mon, 13 Mar 2017)
New Revision: 6991

Modified:
   trunk/l3packages/xparse/testfiles/xparse004.luatex.tlg
   trunk/l3packages/xparse/testfiles/xparse004.lvt
   trunk/l3packages/xparse/testfiles/xparse004.tlg
   trunk/l3packages/xparse/xparse.dtx
Log:
Run xparse processors in the correct order! (fixes #347)


Modified: trunk/l3packages/xparse/testfiles/xparse004.luatex.tlg
===================================================================
--- trunk/l3packages/xparse/testfiles/xparse004.luatex.tlg	2017-03-13 01:19:18 UTC (rev 6990)
+++ trunk/l3packages/xparse/testfiles/xparse004.luatex.tlg	2017-03-13 01:31:48 UTC (rev 6991)
@@ -1915,3 +1915,14 @@
 .................................................
 |-NoValue-|B|C|
 ============================================================
+============================================================
+TEST 26: Two processors
+============================================================
+.................................................
+. LaTeX info: "xparse/redefine-command"
+. 
+. Redefining command \foo with sig. '>{\CountArg }>{\SplitList
+. {,}}m>{\SplitList {,}}>{\CountArg }m' on line ....
+.................................................
+|2|{5}|
+============================================================

Modified: trunk/l3packages/xparse/testfiles/xparse004.lvt
===================================================================
--- trunk/l3packages/xparse/testfiles/xparse004.lvt	2017-03-13 01:19:18 UTC (rev 6990)
+++ trunk/l3packages/xparse/testfiles/xparse004.lvt	2017-03-13 01:31:48 UTC (rev 6991)
@@ -438,4 +438,12 @@
     \foo{C}
   }
 
+\TEST { Two~processors }
+  {
+    \cs_new_protected:Npn \CountArg #1 { \tl_set:Nx \ProcessedArgument { \tl_count:n {#1} } }
+    \DeclareDocumentCommand { \foo } { >{\CountArg} >{\SplitList{,}} m >{\SplitList{,}} >{\CountArg} m }
+      { \TYPE { \tl_to_str:n { |#1|#2| } } }
+    \foo { a , bcd } { a , bcd }
+  }
+
 \END

Modified: trunk/l3packages/xparse/testfiles/xparse004.tlg
===================================================================
--- trunk/l3packages/xparse/testfiles/xparse004.tlg	2017-03-13 01:19:18 UTC (rev 6990)
+++ trunk/l3packages/xparse/testfiles/xparse004.tlg	2017-03-13 01:31:48 UTC (rev 6991)
@@ -1915,3 +1915,14 @@
 .................................................
 |-NoValue-|B|C|
 ============================================================
+============================================================
+TEST 26: Two processors
+============================================================
+.................................................
+. LaTeX info: "xparse/redefine-command"
+. 
+. Redefining command \foo with sig. '>{\CountArg }>{\SplitList
+. {,}}m>{\SplitList {,}}>{\CountArg }m' on line ....
+.................................................
+|2|{5}|
+============================================================

Modified: trunk/l3packages/xparse/xparse.dtx
===================================================================
--- trunk/l3packages/xparse/xparse.dtx	2017-03-13 01:19:18 UTC (rev 6990)
+++ trunk/l3packages/xparse/xparse.dtx	2017-03-13 01:31:48 UTC (rev 6991)
@@ -2051,7 +2051,7 @@
     \bool_set_true:N \l_@@_prefixed_bool
     \bool_set_true:N \l_@@_process_some_bool
     \int_decr:N \l_@@_current_arg_int
-    \tl_put_right:Nn \l_@@_process_one_tl { {#1} }
+    \tl_put_left:Nn \l_@@_process_one_tl { {#1} }
     \@@_prepare_signature_bypass:N
   }
 %    \end{macrocode}