(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "Test git update-ref error handling">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (FunctionDef test_update_rejected []
    (AndOr OP_AND_IF
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('before', {[DQ [VarSub 1]]})])
      (AndOr OP_AND_IF
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('pack', {[DQ [VarSub 2]]})])
        (AndOr OP_AND_IF
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('create', {[DQ [VarSub 3]]})])
          (AndOr OP_AND_IF
            (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('error', {[DQ [VarSub 4]]})])
            (AndOr OP_AND_IF
              (Pipeline
                (Com {[LIT_CHARS printf]} {[DQ [LIT_CHARS "create "][VarSub prefix][LIT_CHARS "/%s "][VarSub C][\ LIT_ESCAPED_CHAR "\\n"]]} {[VarSub before]})
                (Com {[LIT_CHARS git]} {[LIT_CHARS update-ref]} {[LIT_CHARS --stdin]})
              )
              (AndOr OP_AND_IF
                (Com {[LIT_CHARS git]} {[LIT_CHARS for-each-ref]} {[VarSub prefix]}
                  <
                  (FilenameRedirectNode filename={[LIT_CHARS unchanged]} <REDIR_GREAT ">"> 1),
                  >
                )
                (AndOr OP_AND_IF
                  (If
                    (Com {[VarSub pack]})
                    (Com {[LIT_CHARS git]} {[LIT_CHARS pack-refs]} {[LIT_CHARS --all]})
                  )
                  (AndOr OP_AND_IF
                    (Com {[LIT_CHARS printf]} {[DQ [LIT_CHARS "create "][VarSub prefix][LIT_CHARS "/%s "][VarSub C][\ LIT_ESCAPED_CHAR "\\n"]]} {[VarSub create]}
                      <
                      (FilenameRedirectNode filename={[LIT_CHARS input]} <REDIR_GREAT ">"> 1),
                      >
                    )
                    (AndOr OP_AND_IF
                      (Com {[LIT_CHARS test_must_fail]} {[LIT_CHARS git]} {[LIT_CHARS update-ref]} {[LIT_CHARS --stdin]}
                        <
                        (FilenameRedirectNode filename={[LIT_CHARS input]} <REDIR_LESS "<"> 0),
                        (FilenameRedirectNode filename={[LIT_CHARS output.err]} <REDIR_GREAT "2>"> 2),
                        >
                      )
                      (AndOr OP_AND_IF
                        (Com {[LIT_CHARS grep]} {[LIT_CHARS -F]} {[DQ [VarSub error]]} {[LIT_CHARS output.err]})
                        (AndOr OP_AND_IF
                          (Com {[LIT_CHARS git]} {[LIT_CHARS for-each-ref]} {[VarSub prefix]}
                            <
                            (FilenameRedirectNode filename={[LIT_CHARS actual]} <REDIR_GREAT ">"> 1),
                            >
                          )
                          (Com {[LIT_CHARS test_cmp]} {[LIT_CHARS unchanged]} {[LIT_CHARS actual]})
                        )
                      )
                    )
                  )
                )
              )
            )
          )
        )
      )
    )
  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('Q', {[DQ [LIT_CHARS "'"]]})])
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS setup>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit commit --allow-empty -m Initial &&\n"> <LIT_CHARS "\tC=$(git rev-parse HEAD) &&\n"> <LIT_CHARS "\tgit commit --allow-empty -m Second &&\n"> <LIT_CHARS "\tD=$(git rev-parse HEAD) &&\n"> <LIT_CHARS "\tgit commit --allow-empty -m Third &&\n"> <LIT_CHARS "\tE=$(git rev-parse HEAD)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "existing loose ref is a simple prefix of new">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/1l &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c e\" false \"b c/x d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c$Q exists; cannot create $Q$prefix/c/x$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "existing packed ref is a simple prefix of new">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/1p &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c e\" true \"b c/x d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c$Q exists; cannot create $Q$prefix/c/x$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "existing loose ref is a deeper prefix of new">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/2l &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c e\" false \"b c/x/y d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c$Q exists; cannot create $Q$prefix/c/x/y$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "existing packed ref is a deeper prefix of new">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/2p &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c e\" true \"b c/x/y d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c$Q exists; cannot create $Q$prefix/c/x/y$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "new ref is a simple prefix of existing loose">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/3l &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c/x e\" false \"b c d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c/x$Q exists; cannot create $Q$prefix/c$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "new ref is a simple prefix of existing packed">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/3p &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c/x e\" true \"b c d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c/x$Q exists; cannot create $Q$prefix/c$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "new ref is a deeper prefix of existing loose">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/4l &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c/x/y e\" false \"b c d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c/x/y$Q exists; cannot create $Q$prefix/c$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "new ref is a deeper prefix of existing packed">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/4p &&\n"> <LIT_CHARS "\ttest_update_rejected \"a c/x/y e\" true \"b c d\" \\\n"> <LIT_CHARS "\t\t\"$Q$prefix/c/x/y$Q exists; cannot create $Q$prefix/c$Q\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "one new ref is a simple prefix of another">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/5 &&\n"> <LIT_CHARS "\ttest_update_rejected \"a e\" false \"b c c/x d\" \\\n"> <LIT_CHARS "\t\t\"cannot process $Q$prefix/c$Q and $Q$prefix/c/x$Q at the same time\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool rev-parse">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-rev-parse &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tgit pack-refs --all &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\techo \"$C\" >expected &&\n"> <LIT_CHARS "\tgit rev-parse $prefix/foo >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool for-each-ref">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-for-each-ref &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tgit for-each-ref $prefix >expected &&\n"> <LIT_CHARS "\tgit pack-refs --all &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\tgit for-each-ref $prefix >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-create &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\tprintf \"create %s $C\\n\" $prefix/foo |\n"> <LIT_CHARS "\tgit update-ref --stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool verify">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-verify &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tgit pack-refs --all &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\tprintf \"verify %s $C\\n\" $prefix/foo |\n"> <LIT_CHARS "\tgit update-ref --stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool 1-arg update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-update-1 &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tgit pack-refs --all &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\tprintf \"update %s $D\\n\" $prefix/foo |\n"> <LIT_CHARS "\tgit update-ref --stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool 2-arg update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-update-2 &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tgit pack-refs --all &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\tprintf \"update %s $D $C\\n\" $prefix/foo |\n"> <LIT_CHARS "\tgit update-ref --stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool 0-arg delete">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-delete-0 &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tgit pack-refs --all &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\tprintf \"delete %s\\n\" $prefix/foo |\n"> <LIT_CHARS "\tgit update-ref --stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty directory should not fool 1-arg delete">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/e-delete-1 &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tgit pack-refs --all &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar/baz &&\n"> <LIT_CHARS "\tprintf \"delete %s $C\\n\" $prefix/foo |\n"> <LIT_CHARS "\tgit update-ref --stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "missing old value blocks update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/missing-update &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: unable to resolve reference $Q$prefix/foo$Q\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/foo $E $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "incorrect old value blocks update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/incorrect-update &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: is at $C but expected $D\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/foo $E $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "existing old value blocks create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/existing-create &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: reference already exists\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"create $prefix/foo $E\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "incorrect old value blocks delete">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/incorrect-delete &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: is at $C but expected $D\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"delete $prefix/foo $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "missing old value blocks indirect update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/missing-indirect-update &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: unable to resolve reference $Q$prefix/foo$Q\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/symref $E $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "incorrect old value blocks indirect update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/incorrect-indirect-update &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: is at $C but expected $D\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/symref $E $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "existing old value blocks indirect create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/existing-indirect-create &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: reference already exists\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"create $prefix/symref $E\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "incorrect old value blocks indirect delete">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/incorrect-indirect-delete &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: is at $C but expected $D\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"delete $prefix/symref $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "missing old value blocks indirect no-deref update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/missing-noderef-update &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: reference is missing but expected $D\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"option no-deref\" \"update $prefix/symref $E $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "incorrect old value blocks indirect no-deref update">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/incorrect-noderef-update &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: is at $C but expected $D\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"option no-deref\" \"update $prefix/symref $E $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "existing old value blocks indirect no-deref create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/existing-noderef-create &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: reference already exists\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"option no-deref\" \"create $prefix/symref $E\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "incorrect old value blocks indirect no-deref delete">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/incorrect-noderef-delete &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tgit update-ref $prefix/foo $C &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: is at $C but expected $D\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"option no-deref\" \"delete $prefix/symref $D\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "non-empty directory blocks create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/ne-create &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar &&\n"> <LIT_CHARS "\t: >.git/$prefix/foo/bar/baz.lock &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/$prefix/foo/bar/baz.lock\" &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: there is a non-empty directory $Q.git/$prefix/foo$Q blocking reference $Q$prefix/foo$Q\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/foo $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: unable to resolve reference $Q$prefix/foo$Q\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/foo $D $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "broken reference blocks create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/broken-create &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix &&\n"> <LIT_CHARS "\techo \"gobbledigook\" >.git/$prefix/foo &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/$prefix/foo\" &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: unable to resolve reference $Q$prefix/foo$Q: reference broken\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/foo $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/foo$Q: unable to resolve reference $Q$prefix/foo$Q: reference broken\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/foo $D $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "non-empty directory blocks indirect create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/ne-indirect-create &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\tmkdir -p .git/$prefix/foo/bar &&\n"> <LIT_CHARS "\t: >.git/$prefix/foo/bar/baz.lock &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/$prefix/foo/bar/baz.lock\" &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: there is a non-empty directory $Q.git/$prefix/foo$Q blocking reference $Q$prefix/foo$Q\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/symref $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: unable to resolve reference $Q$prefix/foo$Q\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/symref $D $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "broken reference blocks indirect create">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprefix=refs/broken-indirect-create &&\n"> <LIT_CHARS "\tgit symbolic-ref $prefix/symref $prefix/foo &&\n"> <LIT_CHARS "\techo \"gobbledigook\" >.git/$prefix/foo &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/$prefix/foo\" &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: unable to resolve reference $Q$prefix/foo$Q: reference broken\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/symref $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\tfatal: cannot lock ref $Q$prefix/symref$Q: unable to resolve reference $Q$prefix/foo$Q: reference broken\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tprintf \"%s\\n\" \"update $prefix/symref $D $C\" |\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin 2>output.err &&\n"> <LIT_CHARS "\ttest_cmp expected output.err\n">]})
  (Com {[LIT_CHARS test_done]})
)