[latex3-commits] [git/LaTeX3-latex3-latex3] master: A few more l3cctab tests (6451d2f75)

Phelype Oleinik phe.h.o1 at gmail.com
Tue Sep 10 01:51:32 CEST 2019


Repository : https://github.com/latex3/latex3
On branch  : master
Link       : https://github.com/latex3/latex3/commit/6451d2f757d594f119087005e9abe63d62fd59e6

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

commit 6451d2f757d594f119087005e9abe63d62fd59e6
Author: Phelype Oleinik <phe.h.o1 at gmail.com>
Date:   Mon Sep 9 20:51:32 2019 -0300

    A few more l3cctab tests


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

6451d2f757d594f119087005e9abe63d62fd59e6
 .../l3cctab/testfiles/m3cctab001.luatex.tlg        |  78 ++++++---------
 l3experimental/l3cctab/testfiles/m3cctab001.lvt    | 105 +++++++++++++++++++++
 .../l3cctab/testfiles/m3cctab001.tlg               |  27 +++---
 3 files changed, 149 insertions(+), 61 deletions(-)

diff --git a/l3kernel/testfiles/m3fp-logic003.tlg b/l3experimental/l3cctab/testfiles/m3cctab001.luatex.tlg
similarity index 63%
copy from l3kernel/testfiles/m3fp-logic003.tlg
copy to l3experimental/l3cctab/testfiles/m3cctab001.luatex.tlg
index e86916445..c6aabf0c4 100644
--- a/l3kernel/testfiles/m3fp-logic003.tlg
+++ b/l3experimental/l3cctab/testfiles/m3cctab001.luatex.tlg
@@ -1,51 +1,33 @@
 This is a generated file for the LaTeX (2e + expl3) validation system.
 Don't change this file in any respect.
-Author: Bruno Le Floch
-============================================================
-TEST 1: fp_do_until
-============================================================
-0.75
-1.5
-2.25
-3
-3.75
-4.5
-0.75
-1.5
-2.25
-3
-3.75
-4.5
-============================================================
-============================================================
-TEST 2: fp_do_while
-============================================================
-0.75
-1.5
-2.25
-0.75
-1.5
-2.25
-============================================================
-============================================================
-TEST 3: fp_until_do
-============================================================
-0.75
-1.5
-2.25
-3
-3.75
-0.75
-1.5
-2.25
-3
-3.75
-============================================================
-============================================================
-TEST 4: fp_while_do
-============================================================
-0.75
-1.5
-0.75
-1.5
+Author: Phelype Oleinik
+(l3cctab.sty
+Package: l3cctab ....-..-.. L3 Experimental category code tables
+\g__cctab_allocate_int=\count...
+\g__cctab_stack_int=\count...
+\c_initex_cctab=\catcodetable...
+\c_code_cctab=\catcodetable...
+\c_document_cctab=\catcodetable...
+\c_other_cctab=\catcodetable...
+\c_str_cctab=\catcodetable...
+)
+============================================================
+TEST 1: cctab_begin/code in iniTeX
+============================================================
+OK
+============================================================
+============================================================
+TEST 2: cctab_begin/iniTeX in code
+============================================================
+OK
+============================================================
+============================================================
+TEST 3: cctab_begin/str in document
+============================================================
+OK
+============================================================
+============================================================
+TEST 4: cctab_begin/document in str
+============================================================
+OK
 ============================================================
diff --git a/l3experimental/l3cctab/testfiles/m3cctab001.lvt b/l3experimental/l3cctab/testfiles/m3cctab001.lvt
new file mode 100644
index 000000000..90d7806cb
--- /dev/null
+++ b/l3experimental/l3cctab/testfiles/m3cctab001.lvt
@@ -0,0 +1,105 @@
+\documentclass{minimal}
+\input{regression-test}
+
+\RequirePackage[enable-debug]{expl3}
+% \ExplSyntaxOn
+% \debug_on:n { check-declarations , deprecation }
+% \ExplSyntaxOff
+
+\START
+\AUTHOR{Phelype Oleinik}
+\RequirePackage{l3cctab}
+
+\ExplSyntaxOn
+
+\OMIT
+\cctab_new:N \c_initex_cctab
+\intarray_new:Nn \TESTintarrayA { 256 }
+\intarray_new:Nn \TESTintarrayB { 256 }
+\cs_new:Npn \SAVECATCODES #1
+  {
+    \int_step_inline:nnn { 1 } { 256 }
+      {
+        \intarray_gset:Nnn #1 {##1}
+          { \char_value_catcode:n {##1-1} }
+      }
+  }
+\prg_new_conditional:Npnn \intarray_if_eq:NN #1 #2 { TF }
+  {
+    \int_step_inline:nnn { 1 } { 256 }
+      {
+        \int_compare:nNnF
+          { \intarray_item:Nn #1 {##1} }
+            =
+          { \intarray_item:Nn #2 {##1} }
+          { \prg_break:n { \use_i:nn \prg_return_false: } }
+      }
+    \prg_return_true:
+  }
+\cs_new_eq:NN \IntarrayIfEqTF \intarray_if_eq:NNTF
+\TIMO
+
+\TEST { cctab_begin / code~in~iniTeX }
+  {
+    \errorstopmode
+    \cctab_begin:N \c_code_cctab
+      \SAVECATCODES \TESTintarrayA
+    \cctab_end:
+    %
+    \cctab_begin:N \c_initex_cctab
+      \cctab_begin:N \c_code_cctab
+        \SAVECATCODES \TESTintarrayB
+      \cctab_end:
+    \cctab_end:
+    \IntarrayIfEqTF \TESTintarrayA \TESTintarrayB
+      { \TYPE { OK } } { \TYPE { Sob~T_T } }
+  }
+
+\TEST { cctab_begin / iniTeX~in~code }
+  {
+    \cctab_begin:N \c_initex_cctab
+      \SAVECATCODES \TESTintarrayA
+    \cctab_end:
+    %
+    \cctab_begin:N \c_code_cctab
+      \cctab_begin:N \c_initex_cctab
+        \SAVECATCODES \TESTintarrayB
+      \cctab_end:
+    \cctab_end:
+    \IntarrayIfEqTF \TESTintarrayA \TESTintarrayB
+      { \TYPE { OK } } { \TYPE { Sob~T_T } }
+  }
+
+\TEST { cctab_begin / str~in~document }
+  {
+    \cctab_begin:N \c_str_cctab
+      \SAVECATCODES \TESTintarrayA
+    \cctab_end:
+    %
+    \cctab_begin:N \c_document_cctab
+      \cctab_begin:N \c_str_cctab
+        \SAVECATCODES \TESTintarrayB
+      \cctab_end:
+    \cctab_end:
+    \IntarrayIfEqTF \TESTintarrayA \TESTintarrayB
+      { \TYPE { OK } } { \TYPE { Sob~T_T } }
+  }
+
+\TEST { cctab_begin / document~in~str }
+  {
+    \cctab_begin:N \c_document_cctab
+      \SAVECATCODES \TESTintarrayA
+    \cctab_end:
+    %
+    \cctab_begin:N \c_str_cctab
+      \cctab_begin:N \c_document_cctab
+        \SAVECATCODES \TESTintarrayB
+      \cctab_end:
+    \cctab_end:
+    \IntarrayIfEqTF \TESTintarrayA \TESTintarrayB
+      { \TYPE { OK } } { \TYPE { Sob~T_T } }
+  }
+
+\ExplSyntaxOff
+
+\END
diff --git a/l3kernel/testfiles/m3tl004.tlg b/l3experimental/l3cctab/testfiles/m3cctab001.tlg
similarity index 72%
copy from l3kernel/testfiles/m3tl004.tlg
copy to l3experimental/l3cctab/testfiles/m3cctab001.tlg
index 5ae75fa1c..627122237 100644
--- a/l3kernel/testfiles/m3tl004.tlg
+++ b/l3experimental/l3cctab/testfiles/m3cctab001.tlg
@@ -1,27 +1,28 @@
 This is a generated file for the LaTeX (2e + expl3) validation system.
 Don't change this file in any respect.
-Author: Will Robertson
+Author: Phelype Oleinik
+(l3cctab.sty
+Package: l3cctab ....-..-.. L3 Experimental category code tables
+\g__cctab_allocate_int=\count...
+\g__cctab_stack_int=\count...
+)
 ============================================================
-TEST 1: tl_if_single
+TEST 1: cctab_begin/code in iniTeX
 ============================================================
-FTTTTTTTTTTTT
-FFFFFFF
+OK
 ============================================================
 ============================================================
-TEST 2: bug fixes for tl_replace
+TEST 2: cctab_begin/iniTeX in code
 ============================================================
-Defining \g_my_tl on line ...
-> \g_my_tl=aabono.
-> \g_my_tl=aabono\x \x \x \x \x \x \x \x \x \x .
+OK
 ============================================================
 ============================================================
-TEST 3: Trim spaces
+TEST 3: cctab_begin/str in document
 ============================================================
-ab c
-\use:n {ab c }
+OK
 ============================================================
 ============================================================
-TEST 4: Trim spaces:N
+TEST 4: cctab_begin/document in str
 ============================================================
-{\abc ##}
+OK
 ============================================================





More information about the latex3-commits mailing list