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

Bruno Le Floch bruno at le-floch.fr
Tue Jul 14 17:20:30 CEST 2020


Repository : https://github.com/latex3/latex3
On branch  : peek-analysis
Link       : https://github.com/latex3/latex3/commit/044405f7f7dd512307e0b532ce08cceed06c6b0b

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

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

    Test \peek_analysis_map_inline:n


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

044405f7f7dd512307e0b532ce08cceed06c6b0b
 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 13804466d..1a81a8971 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.