diff options
| author | Noam Postavsky <npostavs@gmail.com> | 2020-04-30 19:35:45 -0400 |
|---|---|---|
| committer | Noam Postavsky <npostavs@gmail.com> | 2020-05-05 21:07:58 -0400 |
| commit | 1e09364d677b0fb57efd18369c55e8c2d0e826f5 (patch) | |
| tree | e9a71de9b52a451fcbfacf3df7c345e005e7be35 /test/lisp/emacs-lisp/cl-macs-tests.el | |
| parent | de1b33f5a8c6ceee9be59285f70370c3cb2efd34 (diff) | |
| download | emacs-1e09364d677b0fb57efd18369c55e8c2d0e826f5.tar.gz emacs-1e09364d677b0fb57efd18369c55e8c2d0e826f5.tar.bz2 emacs-1e09364d677b0fb57efd18369c55e8c2d0e826f5.zip | |
; Mark Bug#29799 tests as failing since we reverted the fix
* test/lisp/emacs-lisp/cl-macs-tests.el (cl-macs-loop-for-as-equals-and)
(cl-macs-loop-conditional-step-clauses): Set :expected-result to
:failed.
Don't merge to master. The mentioned reverts are a safe-for-release
fix for Bug#40727.
Diffstat (limited to 'test/lisp/emacs-lisp/cl-macs-tests.el')
| -rw-r--r-- | test/lisp/emacs-lisp/cl-macs-tests.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/test/lisp/emacs-lisp/cl-macs-tests.el b/test/lisp/emacs-lisp/cl-macs-tests.el index 9ca84f156a0..c357ecde951 100644 --- a/test/lisp/emacs-lisp/cl-macs-tests.el +++ b/test/lisp/emacs-lisp/cl-macs-tests.el @@ -498,6 +498,7 @@ collection clause." (ert-deftest cl-macs-loop-for-as-equals-and () "Test for https://debbugs.gnu.org/29799 ." + :expected-result :failed (let ((arr (make-vector 3 0))) (should (equal '((0 0) (1 1) (2 2)) (cl-loop for k below 3 for x = k and z = (elt arr k) @@ -531,6 +532,7 @@ collection clause." (ert-deftest cl-macs-loop-conditional-step-clauses () "These tests failed under the initial fixes in #bug#29799." + :expected-result :failed (should (cl-loop for i from 1 upto 100 and j = 1 then (1+ j) if (not (= i j)) return nil |