[latex3-commits] [git/LaTeX3-latex3-latex3] cctab: Avoid allocation messages in a test file, check them in another (4583b7179)

[Bruno Le Floch]

Repository : https://github.com/latex3/latex3
On branch  : cctab
Link       : https://github.com/latex3/latex3/commit/4583b7179d23da5d587d33970d48a56567b6a6dc

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

commit 4583b7179d23da5d587d33970d48a56567b6a6dc
Author: Bruno Le Floch <bruno at le-floch.fr>
Date:   Thu Jul 2 11:44:37 2020 +0200

    Avoid allocation messages in a test file, check them in another


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

4583b7179d23da5d587d33970d48a56567b6a6dc
 l3kernel/testfiles/m3cctab001.lvt        | 14 ++++++++++++++
 l3kernel/testfiles/m3cctab002.luatex.tlg |  9 +++++++++
 l3kernel/testfiles/m3cctab002.lvt        | 14 ++++++++++++++
 l3kernel/testfiles/m3cctab002.tlg        |  4 ++++
 4 files changed, 41 insertions(+)

diff --git a/l3kernel/testfiles/m3cctab001.lvt b/l3kernel/testfiles/m3cctab001.lvt
index 873faf1d3..c21d3695d 100644
--- a/l3kernel/testfiles/m3cctab001.lvt
+++ b/l3kernel/testfiles/m3cctab001.lvt
@@ -49,6 +49,20 @@
       { \prg_return_false: }
   }
 \cs_new_eq:NN \IntarrayIfEqTF \intarray_if_eq:NNTF
+
+\use:n
+  {
+    \cctab_begin:N \c_code_cctab
+      \cctab_begin:N \c_code_cctab
+        \cctab_begin:N \c_code_cctab
+          \cctab_begin:N \c_code_cctab
+            \cctab_begin:N \c_code_cctab
+            \cctab_end:
+          \cctab_end:
+        \cctab_end:
+      \cctab_end:
+    \cctab_end:
+  }
 \TIMO
 
 \TEST { cctab_begin / code~in~iniTeX }
diff --git a/l3kernel/testfiles/m3cctab002.luatex.tlg b/l3kernel/testfiles/m3cctab002.luatex.tlg
index 8bdd3dca9..4fd38eeaf 100644
--- a/l3kernel/testfiles/m3cctab002.luatex.tlg
+++ b/l3kernel/testfiles/m3cctab002.luatex.tlg
@@ -32,3 +32,12 @@ l. ...  { \cctab_end: }
 LaTeX came across a \cctab_end: without a matching \cctab_begin:N. This
 command will be ignored.
 ============================================================
+============================================================
+TEST 4: Nested \cctab_begin:N 
+============================================================
+\g__cctab_next_cctab=\catcodetable...
+\g__cctab_next_cctab=\catcodetable...
+\g__cctab_next_cctab=\catcodetable...
+\g__cctab_next_cctab=\catcodetable...
+\g__cctab_next_cctab=\catcodetable...
+============================================================
diff --git a/l3kernel/testfiles/m3cctab002.lvt b/l3kernel/testfiles/m3cctab002.lvt
index 3fd96b9e2..f7a89cb59 100644
--- a/l3kernel/testfiles/m3cctab002.lvt
+++ b/l3kernel/testfiles/m3cctab002.lvt
@@ -27,6 +27,20 @@
 \TEST { Extra~\cctab_end: }
   { \cctab_end: }
 
+\TEST { Nested~\cctab_begin:N }
+  {
+    \cctab_begin:N \c_code_cctab
+      \cctab_begin:N \c_code_cctab
+        \cctab_begin:N \c_code_cctab
+          \cctab_begin:N \c_code_cctab
+            \cctab_begin:N \c_code_cctab
+            \cctab_end:
+          \cctab_end:
+        \cctab_end:
+      \cctab_end:
+    \cctab_end:
+  }
+
 \ExplSyntaxOff
 
 \END
diff --git a/l3kernel/testfiles/m3cctab002.tlg b/l3kernel/testfiles/m3cctab002.tlg
index 8bdd3dca9..f9a19737b 100644
--- a/l3kernel/testfiles/m3cctab002.tlg
+++ b/l3kernel/testfiles/m3cctab002.tlg
@@ -32,3 +32,7 @@ l. ...  { \cctab_end: }
 LaTeX came across a \cctab_end: without a matching \cctab_begin:N. This
 command will be ignored.
 ============================================================
+============================================================
+TEST 4: Nested \cctab_begin:N 
+============================================================
+============================================================