diff options
Diffstat (limited to 'test/lisp/emacs-lisp/cl-macs-tests.el')
| -rw-r--r-- | test/lisp/emacs-lisp/cl-macs-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/cl-macs-tests.el b/test/lisp/emacs-lisp/cl-macs-tests.el index 85230447148..d3b9732b74d 100644 --- a/test/lisp/emacs-lisp/cl-macs-tests.el +++ b/test/lisp/emacs-lisp/cl-macs-tests.el @@ -569,14 +569,14 @@ collection clause." finally return result) '(2 1 0))) - ;; this nonintuitive result is replicated by clisp + ;; this unintuitive result is replicated by clisp (should (equal (cl-loop with result for x below 3 and y = (progn (push x result)) finally return result) '(2 1 0 0))) - ;; this nonintuitive result is replicated by clisp + ;; this unintuitive result is replicated by clisp (should (equal (cl-loop with result for x below 3 and y = (progn (push x result)) then (progn (push (1+ x) result)) |