emacs-31 c7947191675: Disable failing SCCS tests on the release branch

branch: emacs-31
commit c79471916757aa34808ab056a4a02b319b0787f0
Author: Sean Whitton <[email protected]>
Commit: Sean Whitton <[email protected]>

    Disable failing SCCS tests on the release branch
    
    These are broken and we don't have an SCCS expert to fix them at
    present.  This shouldn't block the Emacs 31 release because SCCS
    is a relatively obscure VCS.
    
    * test/lisp/vc/vc-tests/vc-tests.el (vc-test-sccs05-rename-file)
    (vc-test-sccs10-rename-directory): Mark as expected to fail.
    Do not merge to master.
---
 test/lisp/vc/vc-tests/vc-tests.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/test/lisp/vc/vc-tests/vc-tests.el b/test/lisp/vc/vc-tests/vc-tests.el
index f190db103d5..0e34e571a12 100644
--- a/test/lisp/vc/vc-tests/vc-tests.el
+++ b/test/lisp/vc/vc-tests/vc-tests.el
@@ -1167,6 +1167,7 @@ This checks also `vc-backend' and `vc-responsible-backend'."
             ,(intern (format "vc-test-%s05-rename-file" backend-string)) ()
           ,(format "Check `vc-rename-file' for the %s backend."
                    backend-string)
+          ,@(and (eq backend 'SCCS) '(:expected-result :failed))
           (skip-unless
            (ert-test-passed-p
             (ert-test-most-recent-result
@@ -1252,6 +1253,7 @@ This checks also `vc-backend' and `vc-responsible-backend'."
             ,(intern (format "vc-test-%s10-rename-directory" backend-string)) ()
           ,(format "Check `vc-rename-file' with directories for the %s backend."
                    backend-string)
+          ,@(and (eq backend 'SCCS) '(:expected-result :failed))
           (skip-unless
            (ert-test-passed-p
             (ert-test-most-recent-result