[latex3-commits] [git/LaTeX3-latex3-latex3] peek-analysis: Test \peek_analysis_map_inline:n (556c5c4fe)

Joseph Wright joseph.wright at morningstar2.co.uk
Thu Dec 3 13:56:04 CET 2020


Repository : https://github.com/latex3/latex3
On branch  : peek-analysis
Link       : https://github.com/latex3/latex3/commit/556c5c4fe2e632d6c6e48b73810b7745c65a45cf

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

commit 556c5c4fe2e632d6c6e48b73810b7745c65a45cf
Author: Bruno Le Floch <bruno at le-floch.fr>
Date:   Tue Jul 14 17:19:25 2020 +0200

    Test \peek_analysis_map_inline:n


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

556c5c4fe2e632d6c6e48b73810b7745c65a45cf
 l3kernel/testfiles/m3peek002.lvt | 13 +++++++++++++
 l3kernel/testfiles/m3peek002.tlg | 13 +++++++++++++
 2 files changed, 26 insertions(+)

diff --git a/l3kernel/testfiles/m3peek002.lvt b/l3kernel/testfiles/m3peek002.lvt
index 16fa222d1..e86844e20 100644
--- a/l3kernel/testfiles/m3peek002.lvt
+++ b/l3kernel/testfiles/m3peek002.lvt
@@ -275,4 +275,17 @@
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
+\TEST { Peek~analysis~map~inline }
+  {
+    \peek_analysis_map_inline:n
+      {
+        \int_compare:nNnT {#2} = { `Z } { \peek_analysis_map_break:n { \TYPE } }
+        \TYPE { \tl_to_str:n { #1 , #2 , #3 } }
+      }
+    a { ~ { } \c_group_begin_token \c_space_token }
+    Z { TRUE }
+  }
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
 \END
diff --git a/l3kernel/testfiles/m3peek002.tlg b/l3kernel/testfiles/m3peek002.tlg
index a553260a8..7d968c702 100644
--- a/l3kernel/testfiles/m3peek002.tlg
+++ b/l3kernel/testfiles/m3peek002.tlg
@@ -224,3 +224,16 @@ TRUE
 FALSE
 |\l_test_token |
 ============================================================
+============================================================
+TEST 10: Peek analysis map inline
+============================================================
+\exp_not:n {a},97,B
+\exp_after:wN {\if_false: }\fi: ,123,1
+ ,32,A
+\exp_after:wN {\if_false: }\fi: ,123,1
+\if_false: {\fi: },125,2
+\exp_not:n {\c_group_begin_token },-1,0
+\exp_not:n {\c_space_token },-1,0
+\if_false: {\fi: },125,2
+TRUE
+============================================================





More information about the latex3-commits mailing list.