[latex3-commits] [git/LaTeX3-latex3-latex3] master: more tests for predicates of tl_if_head_eq_... (639712bfe)
Bruno Le Floch
blflatex at gmail.com
Tue Oct 27 09:11:58 CET 2020
Repository : https://github.com/latex3/latex3
On branch : master
Link : https://github.com/latex3/latex3/commit/639712bfee3cdc80fbb26637de72eeb8e95160f7
>---------------------------------------------------------------
commit 639712bfee3cdc80fbb26637de72eeb8e95160f7
Author: Jonathan Spratte <jspratte at yahoo.de>
Date: Sun Sep 20 15:00:00 2020 +0200
more tests for predicates of tl_if_head_eq_...
>---------------------------------------------------------------
639712bfee3cdc80fbb26637de72eeb8e95160f7
l3kernel/testfiles/m3tl006.lvt | 77 ++++++++++++++++++++++++++++++++++++++++--
1 file changed, 75 insertions(+), 2 deletions(-)
diff --git a/l3kernel/testfiles/m3tl006.lvt b/l3kernel/testfiles/m3tl006.lvt
index 3da895e9d..2f8c41729 100644
--- a/l3kernel/testfiles/m3tl006.lvt
+++ b/l3kernel/testfiles/m3tl006.lvt
@@ -131,6 +131,25 @@
\tl_if_head_eq_meaning:nNTF {~{ }~} \c_group_begin_token ?F
\tl_if_head_eq_meaning:nNTF { {A} } \c_group_begin_token T?
\tl_if_head_eq_meaning:nNTF { {A}~} A ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {} ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {} \else: } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {} \ERROR } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {} \fi: } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {~} ? } ?F
+ \bool_if:nTF { \exp_args:Nf \tl_if_head_eq_meaning_p:nN
+ { \prg_replicate:nn {5} {~} } \c_space_token } T?
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {\foo} \scan_stop: } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {^^65} X } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {~\foo} \c_space_token } T?
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN { * ~ } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN { ~*~ } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN { A B } A } T?
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN { { } } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN { { }~} \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {~{ } } \c_group_begin_token } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN {~{ }~} \c_group_begin_token } ?F
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN { {A} } \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_meaning_p:nN { {A}~} A } ?F
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -155,6 +174,25 @@
\tl_if_head_eq_catcode:nNTF {~{ }~} \c_group_begin_token ?F
\tl_if_head_eq_catcode:nNTF { {A} } \c_group_begin_token T?
\tl_if_head_eq_catcode:nNTF { {A}~} A ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {} ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {} \ERROR } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {} \else: } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {} \fi: } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {~} ? } ?F
+ \bool_if:nTF { \exp_args:Nf \tl_if_head_eq_catcode_p:nN
+ { \prg_replicate:nn {5} {~} } \c_space_token } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {\foo} \scan_stop: } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {^^65} X } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {~\foo} \c_space_token } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN { * ~ } ? } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN { ~*~ } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN { A B } A } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN { { } } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN { { }~} \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {~{ } } \c_group_begin_token } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN {~{ }~} \c_group_begin_token } ?F
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN { {A} } \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_catcode_p:nN { {A}~} A } ?F
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -179,7 +217,25 @@
\tl_if_head_eq_charcode:nNTF {~{ }~} \c_group_begin_token ?F
\tl_if_head_eq_charcode:nNTF { {A} } \c_group_begin_token T?
\tl_if_head_eq_charcode:nNTF { {A}~} A ?F
- \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {} ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {} ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {} \ERROR } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {} \else: } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {} \fi: } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {~} ? } ?F
+ \bool_if:nTF { \exp_args:Nf \tl_if_head_eq_charcode_p:nN
+ { \prg_replicate:nn {5} {~} } \c_space_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {\foo} \scan_stop: } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {^^65} X } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {~\foo} \c_space_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN { * ~ } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN { ~*~ } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN { A B } A } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN { { } } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN { { }~} \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {~{ } } \c_group_begin_token } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN {~{ }~} \c_group_begin_token } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN { {A} } \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:nN { {A}~} A } ?F
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -203,7 +259,24 @@
\tl_if_head_eq_charcode:fNTF {&~{ }~} \c_group_begin_token T?
\tl_if_head_eq_charcode:fNTF {& {A} } \c_group_begin_token T?
\tl_if_head_eq_charcode:fNTF {& {A}~} A ?F
- \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&} ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&} ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&} \ERROR } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&} \else: } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&} \fi: } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&} \c_space_token } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN
+ {& \prg_replicate:nn {5} {~} } \c_space_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&^^65} X } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&~\foo} \scan_stop: } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {& * ~ } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {& ~*~ } * } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {& A B } A } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {& { } } ? } ?F
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {& { }~} \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&~{ } } \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {&~{ }~} \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {& {A} } \c_group_begin_token } T?
+ \bool_if:nTF { \tl_if_head_eq_charcode_p:fN {& {A}~} A } ?F
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
More information about the latex3-commits
mailing list.