]> code.delx.au - gnu-emacs-elpa/blobdiff - packages/context-coloring/test/fixtures/quote.el
Merge commit '40f67bf039c143758ac070f9693bb0af87b98aba' from context-coloring
[gnu-emacs-elpa] / packages / context-coloring / test / fixtures / quote.el
index 654bc705b1518d81536a03a44ef44e0917dba6fe..5fc126d0a68f5433f8906255810035601b626951 100644 (file)
@@ -1,4 +1,15 @@
+(quote (lambda () free))
+(let () (backquote (,free)))
+
 (defun a (a)
   (or (eq a 'b)
       (equal a '(a b))
-      (equal a `(,(append () `(a b ,(+ 1 free) ,free b) free) b ,free))))
+      (equal a `(,(append () `(a b ,(+ 1 free) ,free b) free) b ,free
+                 "s" ; c
+                 ))))
+
+(append '("a" ; b
+          "b" ; a
+          ))
+
+(lambda () '((?\" ?\")))