Add complex nesting to let test.

diff --git a/test/context-coloring-test.el b/test/context-coloring-test.el
index f98d935a975da600330bc6661f9ea1de00d8e799..234084c0a050793ca002e410e463b25f0e801f0b 100644 (file)
--- a/test/context-coloring-test.el
+++ b/test/context-coloring-test.el
@@ -1141,7 +1141,11 @@ see that function."
     (context-coloring-test-assert-coloring "
 1111 11
       11 01
-      11 000011
+      11 00001
+      11 2222 22
+               22 02
+               22 000022
+           2222 2 2 2 00002211
   1111 1 1 1 000011")))
 
 (context-coloring-test-deftest-emacs-lisp-mode let*

diff --git a/test/fixtures/let.el b/test/fixtures/let.el
index 3b869ce1f777a33ff8d68d8f9ab071d2f05b2340..11637b1337c2b7557009a38d9acb45d9b489f64b 100644 (file)
--- a/test/fixtures/let.el
+++ b/test/fixtures/let.el
@@ -1,4 +1,8 @@
 (let (a
       (b a)
-      (c free))
+      (c free)
+      (d (let (a
+               (b a)
+               (c free))
+           (and a b c free))))
   (and a b c free))