branch: master
commit 29328afbbf67a618a2e670671693ec2c48c8a717
Author: Jackson Ray Hamilton <jack...@jacksonrayhamilton.com>
Commit: Jackson Ray Hamilton <jack...@jacksonrayhamilton.com>
Add let test.
---
test/context-coloring-test.el | 8 ++++++++
test/fixtures/let.el | 4 ++++
2 files changed, 12 insertions(+), 0 deletions(-)
diff --git a/test/context-coloring-test.el b/test/context-coloring-test.el
index 1d154e2..f98d935 100644
--- a/test/context-coloring-test.el
+++ b/test/context-coloring-test.el
@@ -1136,6 +1136,14 @@ see that function."
(xxxxx x ()
(x x 1 11 11 111 11 1 111))")))
+(context-coloring-test-deftest-emacs-lisp-mode let
+ (lambda ()
+ (context-coloring-test-assert-coloring "
+1111 11
+ 11 01
+ 11 000011
+ 1111 1 1 1 000011")))
+
(context-coloring-test-deftest-emacs-lisp-mode let*
(lambda ()
(context-coloring-test-assert-coloring "
diff --git a/test/fixtures/let.el b/test/fixtures/let.el
new file mode 100644
index 0000000..3b869ce
--- /dev/null
+++ b/test/fixtures/let.el
@@ -0,0 +1,4 @@
+(let (a
+ (b a)
+ (c free))
+ (and a b c free))
