emacs-27 1e09364 4/5: ; Mark Bug#29799 tests as failing since we reverted the fix

[Noam Postavsky]

branch: emacs-27
commit 1e09364d677b0fb57efd18369c55e8c2d0e826f5
Author: Noam Postavsky <address@hidden>
Commit: Noam Postavsky <address@hidden>

    ; 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.
---
 test/lisp/emacs-lisp/cl-macs-tests.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/test/lisp/emacs-lisp/cl-macs-tests.el 
b/test/lisp/emacs-lisp/cl-macs-tests.el
index 9ca84f1..c357ecd 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