From 09be0f22d415e5d91e6ccaef9303a7bc8156e40a Mon Sep 17 00:00:00 2001
From: Joseph Wright <joseph.wright@morningstar2.co.uk>
Date: Sun, 8 Dec 2019 00:21:19 +0000
Subject: [PATCH] Add test for expanding implicit chars

---
 l3kernel/testfiles/m3text001.lvt | 14 ++++++++++++++
 l3kernel/testfiles/m3text001.tlg |  5 +++++
 2 files changed, 19 insertions(+)

diff --git a/l3kernel/testfiles/m3text001.lvt b/l3kernel/testfiles/m3text001.lvt
index 4031cb9bbe..f9376a3c30 100644
--- a/l3kernel/testfiles/m3text001.lvt
+++ b/l3kernel/testfiles/m3text001.lvt
@@ -62,4 +62,18 @@
     \text_expand:n { \"{a} \u{e} \H{i} \v{o} \.{u} }
   }
 
+\OMIT
+\tex_let:D \AAA = A
+\tex_chardef:D \BBB = `B
+\tex_mathchardef:D \CCC = `C
+\use:n { \tex_let:D \SPACEA = ~ } ~ %
+\tex_chardef:D \SPACEB = `\  %
+\tex_mathchardef:D \SPACEC = `\  %
+\TIMO
+
+\TESTEXP { Implicit~tokens }
+  {
+    \text_expand:n { " \AAA " \BBB " \CCC " \SPACEA " \SPACEB " \SPACEC " }
+  }
+
 \END
diff --git a/l3kernel/testfiles/m3text001.tlg b/l3kernel/testfiles/m3text001.tlg
index 66b9aba64d..f9405a7a30 100644
--- a/l3kernel/testfiles/m3text001.tlg
+++ b/l3kernel/testfiles/m3text001.tlg
@@ -38,3 +38,8 @@ TEST 6: Accents
 ============================================================
 \"{a}\u {e}\H {i}\v {o}\.{u}
 ============================================================
+============================================================
+TEST 7: Implicit tokens
+============================================================
+"A"B"C" " " "
+============================================================