From fc01cfc82db3878570373d31f80e486f9f33ecff Mon Sep 17 00:00:00 2001 From: Mark Oteiza Date: Fri, 25 Nov 2016 14:14:41 -0500 Subject: [PATCH] Add "using" to cl-loop debug spec (Bug#24750) * lisp/emacs-lisp/cl-macs.el (cl-loop): Add element to account for "using" hash table clause. --- lisp/emacs-lisp/cl-macs.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 2ebb824e707..210a2083727 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -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 -- 2.39.5