]> git.eshelyaron.com Git - emacs.git/commitdiff
Add "using" to cl-loop debug spec (Bug#24750)
authorMark Oteiza <mvoteiza@udel.edu>
Fri, 25 Nov 2016 19:14:41 +0000 (14:14 -0500)
committerMark Oteiza <mvoteiza@udel.edu>
Fri, 25 Nov 2016 19:17:35 +0000 (14:17 -0500)
* lisp/emacs-lisp/cl-macs.el (cl-loop): Add element to account for
"using" hash table clause.

lisp/emacs-lisp/cl-macs.el

index 2ebb824e7073aed41b8aa18e8c053d3d2b62cf53..210a2083727989d2ae47c83e60d5d48735ac6c21 100644 (file)
@@ -923,6 +923,7 @@ For more details, see Info node `(cl)Loop Facility'.
                                "count" "maximize" "minimize" "if" "unless"
                                "return"]
                           form]
+                         ["using" (symbolp symbolp)]
                          ;; Simple default, which covers 99% of the cases.
                          symbolp form)))
   (if (not (memq t (mapcar #'symbolp