(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "Test handling of ref names that check-ref-format rejects">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_commit one &&\n"> <LIT_CHARS "\ttest_commit two\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "fast-import: fail on invalid branch name \".badbranchname\"">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/objects/pack_* .git/objects/index_*\" &&\n"> <LIT_CHARS "\tcat >input <<-INPUT_END &&\n"> <LIT_CHARS "\t\tcommit .badbranchname\n"> <LIT_CHARS "\t\tcommitter $GIT_COMMITTER_NAME <$GIT_COMMITTER_EMAIL> $GIT_COMMITTER_DATE\n"> <LIT_CHARS "\t\tdata <<COMMIT\n"> <LIT_CHARS "\t\tcorrupt\n"> <LIT_CHARS "\t\tCOMMIT\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t\tfrom refs/heads/master\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tINPUT_END\n"> <LIT_CHARS "\ttest_must_fail git fast-import <input\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "fast-import: fail on invalid branch name \"bad[branch]name\"">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/objects/pack_* .git/objects/index_*\" &&\n"> <LIT_CHARS "\tcat >input <<-INPUT_END &&\n"> <LIT_CHARS "\t\tcommit bad[branch]name\n"> <LIT_CHARS "\t\tcommitter $GIT_COMMITTER_NAME <$GIT_COMMITTER_EMAIL> $GIT_COMMITTER_DATE\n"> <LIT_CHARS "\t\tdata <<COMMIT\n"> <LIT_CHARS "\t\tcorrupt\n"> <LIT_CHARS "\t\tCOMMIT\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t\tfrom refs/heads/master\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tINPUT_END\n"> <LIT_CHARS "\ttest_must_fail git fast-import <input\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git branch shows badly named ref as warning">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\ttest_i18ngrep -e \"ignoring ref with broken name refs/heads/broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -d can delete badly named ref">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tgit branch -d broken...ref &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -D can delete badly named ref">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tgit branch -D broken...ref &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -D cannot delete non-ref in .git dir">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo precious >.git/my-private-file &&\n"> <LIT_CHARS "\techo precious >expect &&\n"> <LIT_CHARS "\ttest_must_fail git branch -D ../../my-private-file &&\n"> <LIT_CHARS "\ttest_cmp expect .git/my-private-file\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -D cannot delete ref in .git dir">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit rev-parse HEAD >.git/my-private-file &&\n"> <LIT_CHARS "\tgit rev-parse HEAD >expect &&\n"> <LIT_CHARS "\tgit branch foo/legit &&\n"> <LIT_CHARS "\ttest_must_fail git branch -D foo////./././../../../my-private-file &&\n"> <LIT_CHARS "\ttest_cmp expect .git/my-private-file\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -D cannot delete absolute path">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit branch -f extra &&\n"> <LIT_CHARS "\ttest_must_fail git branch -D \"$(pwd)/.git/refs/heads/extra\" &&\n"> <LIT_CHARS "\ttest_cmp_rev HEAD extra\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git branch cannot create a badly named ref">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\ttest_must_fail git branch broken...ref &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -m cannot rename to a bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\ttest_might_fail git branch -D goodref &&\n"> <LIT_CHARS "\tgit branch goodref &&\n"> <LIT_CHARS "\ttest_must_fail git branch -m goodref broken...ref &&\n"> <LIT_CHARS "\ttest_cmp_rev master goodref &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "branch -m can rename from a bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tgit branch -m broken...ref renamed &&\n"> <LIT_CHARS "\ttest_cmp_rev master renamed &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "push cannot create a badly named ref">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\ttest_must_fail git push \"file://$(pwd)\" HEAD:refs/heads/broken...ref &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "push --mirror can delete badly named ref">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttop=$(pwd) &&\n"> <LIT_CHARS "\tgit init src &&\n"> <LIT_CHARS "\tgit init dest &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd src &&\n"> <LIT_CHARS "\t\ttest_commit one\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd dest &&\n"> <LIT_CHARS "\t\ttest_commit two &&\n"> <LIT_CHARS "\t\tgit checkout --detach &&\n"> <LIT_CHARS "\t\tcp .git/refs/heads/master .git/refs/heads/broken...ref\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\tgit -C src push --mirror \"file://$top/dest\" &&\n"> <LIT_CHARS "\tgit -C dest branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "rev-parse skips symref pointing to broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tgit branch shadow one &&\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/broken...ref\\n\" >.git/refs/tags/shadow &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/tags/shadow\" &&\n"> <LIT_CHARS "\tgit rev-parse --verify one >expect &&\n"> <LIT_CHARS "\tgit rev-parse --verify shadow >actual 2>err &&\n"> <LIT_CHARS "\ttest_cmp expect actual &&\n"> <LIT_CHARS "\ttest_i18ngrep \"ignoring dangling symref refs/tags/shadow\" err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "for-each-ref emits warnings for broken names">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/broken...ref\\n\" >.git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/badname\" &&\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/master\\n\" >.git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...symref\" &&\n"> <LIT_CHARS "\tgit for-each-ref >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output &&\n"> <LIT_CHARS "\t! grep -e \"badname\" output &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.symref\" output &&\n"> <LIT_CHARS "\ttest_i18ngrep \"ignoring ref with broken name refs/heads/broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\ttest_i18ngrep \"ignoring broken ref refs/heads/badname\" error &&\n"> <LIT_CHARS "\ttest_i18ngrep \"ignoring ref with broken name refs/heads/broken\\.\\.\\.symref\" error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref -d can delete broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tgit update-ref -d refs/heads/broken...ref >output 2>error &&\n"> <LIT_CHARS "\ttest_must_be_empty output &&\n"> <LIT_CHARS "\ttest_must_be_empty error &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -d can delete broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tgit branch -d broken...ref >output 2>error &&\n"> <LIT_CHARS "\ttest_i18ngrep \"Deleted branch broken...ref (was broken)\" output &&\n"> <LIT_CHARS "\ttest_must_be_empty error &&\n"> <LIT_CHARS "\tgit branch >output 2>error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" error &&\n"> <LIT_CHARS "\t! grep -e \"broken\\.\\.\\.ref\" output\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --no-deref -d can delete symref to broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/broken...ref\\n\" >.git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/badname\" &&\n"> <LIT_CHARS "\tgit update-ref --no-deref -d refs/heads/badname >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_must_be_empty output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -d can delete symref to broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/broken...ref\\n\" >.git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/badname\" &&\n"> <LIT_CHARS "\tgit branch -d badname >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_i18ngrep \"Deleted branch badname (was refs/heads/broken\\.\\.\\.ref)\" output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --no-deref -d can delete dangling symref to broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/broken...ref\\n\" >.git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/badname\" &&\n"> <LIT_CHARS "\tgit update-ref --no-deref -d refs/heads/badname >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_must_be_empty output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -d can delete dangling symref to broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/broken...ref\\n\" >.git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/badname\" &&\n"> <LIT_CHARS "\tgit branch -d badname >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_i18ngrep \"Deleted branch badname (was refs/heads/broken\\.\\.\\.ref)\" output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref -d can delete broken name through symref">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp .git/refs/heads/master .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...ref\" &&\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/broken...ref\\n\" >.git/refs/heads/badname &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/badname\" &&\n"> <LIT_CHARS "\tgit update-ref -d refs/heads/badname >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/broken...ref &&\n"> <LIT_CHARS "\ttest_must_be_empty output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --no-deref -d can delete symref with broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/master\\n\" >.git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...symref\" &&\n"> <LIT_CHARS "\tgit update-ref --no-deref -d refs/heads/broken...symref >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_must_be_empty output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -d can delete symref with broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/master\\n\" >.git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...symref\" &&\n"> <LIT_CHARS "\tgit branch -d broken...symref >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_i18ngrep \"Deleted branch broken...symref (was refs/heads/master)\" output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --no-deref -d can delete dangling symref with broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/idonotexist\\n\" >.git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...symref\" &&\n"> <LIT_CHARS "\tgit update-ref --no-deref -d refs/heads/broken...symref >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_must_be_empty output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "branch -d can delete dangling symref with broken name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"ref: refs/heads/idonotexist\\n\" >.git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_when_finished \"rm -f .git/refs/heads/broken...symref\" &&\n"> <LIT_CHARS "\tgit branch -d broken...symref >output 2>error &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/refs/heads/broken...symref &&\n"> <LIT_CHARS "\ttest_i18ngrep \"Deleted branch broken...symref (was refs/heads/idonotexist)\" output &&\n"> <LIT_CHARS "\ttest_must_be_empty error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref -d cannot delete non-ref in .git dir">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo precious >.git/my-private-file &&\n"> <LIT_CHARS "\techo precious >expect &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref -d my-private-file >output 2>error &&\n"> <LIT_CHARS "\ttest_must_be_empty output &&\n"> <LIT_CHARS "\ttest_i18ngrep -e \"refusing to update ref with bad name\" error &&\n"> <LIT_CHARS "\ttest_cmp expect .git/my-private-file\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref -d cannot delete absolute path">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit branch -f extra &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref -d \"$(pwd)/.git/refs/heads/extra\" &&\n"> <LIT_CHARS "\ttest_cmp_rev HEAD extra\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --stdin fails create with bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"create ~a refs/heads/master\" >stdin &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin <stdin 2>err &&\n"> <LIT_CHARS "\tgrep \"fatal: invalid ref format: ~a\" err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --stdin fails update with bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"update ~a refs/heads/master\" >stdin &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin <stdin 2>err &&\n"> <LIT_CHARS "\tgrep \"fatal: invalid ref format: ~a\" err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --stdin fails delete with bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"delete ~a refs/heads/master\" >stdin &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref --stdin <stdin 2>err &&\n"> <LIT_CHARS "\tgrep \"fatal: invalid ref format: ~a\" err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --stdin -z fails create with bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"%s\\0\" \"create ~a \" refs/heads/master >stdin &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref -z --stdin <stdin 2>err &&\n"> <LIT_CHARS "\tgrep \"fatal: invalid ref format: ~a \" err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --stdin -z fails update with bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"%s\\0\" \"update ~a\" refs/heads/master \"\" >stdin &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref -z --stdin <stdin 2>err &&\n"> <LIT_CHARS "\tgrep \"fatal: invalid ref format: ~a\" err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update-ref --stdin -z fails delete with bad ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"%s\\0\" \"delete ~a\" refs/heads/master >stdin &&\n"> <LIT_CHARS "\ttest_must_fail git update-ref -z --stdin <stdin 2>err &&\n"> <LIT_CHARS "\tgrep \"fatal: invalid ref format: ~a\" err\n">]})
  (Com {[LIT_CHARS test_done]})
)