(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git add -u\n"> <LIT_CHARS "\n"> <LIT_CHARS "This test creates a working tree state with three files:\n"> <LIT_CHARS "\n"> <LIT_CHARS "  top (previously committed, modified)\n"> <LIT_CHARS "  dir/sub (previously committed, modified)\n"> <LIT_CHARS "  dir/other (untracked)\n"> <LIT_CHARS "\n"> <LIT_CHARS "and issues a git add -u with path limiting on \"dir\" to add\n"> <LIT_CHARS "only the updates to dir/sub.\n"> <LIT_CHARS "\n"> <LIT_CHARS "Also tested are \"git add -u\" without limiting, and \"git add -u\"\n"> <LIT_CHARS "without contents changes, and other conditions">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo initial >check &&\n"> <LIT_CHARS "\techo initial >top &&\n"> <LIT_CHARS "\techo initial >foo &&\n"> <LIT_CHARS "\tmkdir dir1 dir2 &&\n"> <LIT_CHARS "\techo initial >dir1/sub1 &&\n"> <LIT_CHARS "\techo initial >dir1/sub2 &&\n"> <LIT_CHARS "\techo initial >dir2/sub3 &&\n"> <LIT_CHARS "\tgit add check dir1 dir2 top foo &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m initial &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\techo changed >check &&\n"> <LIT_CHARS "\techo changed >top &&\n"> <LIT_CHARS "\techo changed >dir2/sub3 &&\n"> <LIT_CHARS "\trm -f dir1/sub1 &&\n"> <LIT_CHARS "\techo other >dir2/other\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS update]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit add -u dir1 dir2\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update noticed a removal">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest \"$(git ls-files dir1/sub1)\" = \"\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update touched correct path">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest \"$(git diff-files --name-status dir2/sub3)\" = \"\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update did not touch other tracked files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest \"$(git diff-files --name-status check)\" = \"M\tcheck\" &&\n"> <LIT_CHARS "\ttest \"$(git diff-files --name-status top)\" = \"M\ttop\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update did not touch untracked files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest \"$(git ls-files dir2/other)\" = \"\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cache tree has not been corrupted">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-files -s |\n"> <LIT_CHARS "\tsed -e \"s/ 0\t/\t/\" >expect &&\n"> <LIT_CHARS "\tgit ls-tree -r $(git write-tree) |\n"> <LIT_CHARS "\tsed -e \"s/ blob / /\" >current &&\n"> <LIT_CHARS "\ttest_cmp expect current\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update from a subdirectory">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd dir1 &&\n"> <LIT_CHARS "\t\techo more >sub2 &&\n"> <LIT_CHARS "\t\tgit add -u sub2\n"> <LIT_CHARS "\t)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "change gets noticed">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\ttest \"$(git diff-files --name-status dir1)\" = \"\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "non-qualified update in subdir updates from the root">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd dir1 &&\n"> <LIT_CHARS "\t\techo even more >>sub2 &&\n"> <LIT_CHARS "\t\tgit --literal-pathspecs add -u &&\n"> <LIT_CHARS "\t\techo even more >>sub2 &&\n"> <LIT_CHARS "\t\tgit add -u\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\t: >expect &&\n"> <LIT_CHARS "\tgit diff-files --name-only >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "replace a file with a symlink">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\trm foo &&\n"> <LIT_CHARS "\ttest_ln_s_add top foo\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add everything changed">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit add -u &&\n"> <LIT_CHARS "\ttest -z \"$(git diff-files)\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "touch and then add -u">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\ttouch check &&\n"> <LIT_CHARS "\tgit add -u &&\n"> <LIT_CHARS "\ttest -z \"$(git diff-files)\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "touch and then add explicitly">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\ttouch check &&\n"> <LIT_CHARS "\tgit add check &&\n"> <LIT_CHARS "\ttest -z \"$(git diff-files)\"\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add -n -u should not add but just report">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\techo \"add ">] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS check>] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS "\" &&\n"> <LIT_CHARS "\t\techo \"remove ">] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS top>] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS "\"\n"> <LIT_CHARS "\t) >expect &&\n"> <LIT_CHARS "\tbefore=$(git ls-files -s check top) &&\n"> <LIT_CHARS "\techo changed >>check &&\n"> <LIT_CHARS "\trm -f top &&\n"> <LIT_CHARS "\tgit add -n -u >actual &&\n"> <LIT_CHARS "\tafter=$(git ls-files -s check top) &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\ttest \"$before\" = \"$after\" &&\n"> <LIT_CHARS "\ttest_i18ncmp expect actual\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add -u resolves unmerged paths">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tone=$(echo 1 | git hash-object -w --stdin) &&\n"> <LIT_CHARS "\ttwo=$(echo 2 | git hash-object -w --stdin) &&\n"> <LIT_CHARS "\tthree=$(echo 3 | git hash-object -w --stdin) &&\n"> <LIT_CHARS "\t{\n"> <LIT_CHARS "\t\tfor path in path1 path2\n"> <LIT_CHARS "\t\tdo\n"> <LIT_CHARS "\t\t\techo \"100644 $one 1\t$path\"\n"> <LIT_CHARS "\t\t\techo \"100644 $two 2\t$path\"\n"> <LIT_CHARS "\t\t\techo \"100644 $three 3\t$path\"\n"> <LIT_CHARS "\t\tdone\n"> <LIT_CHARS "\t\techo \"100644 $one 1\tpath3\"\n"> <LIT_CHARS "\t\techo \"100644 $one 1\tpath4\"\n"> <LIT_CHARS "\t\techo \"100644 $one 3\tpath5\"\n"> <LIT_CHARS "\t\techo \"100644 $one 3\tpath6\"\n"> <LIT_CHARS "\t} |\n"> <LIT_CHARS "\tgit update-index --index-info &&\n"> <LIT_CHARS "\techo 3 >path1 &&\n"> <LIT_CHARS "\techo 2 >path3 &&\n"> <LIT_CHARS "\techo 2 >path5 &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# Fail to explicitly resolve removed paths with \"git add\"\n"> <LIT_CHARS "\ttest_must_fail git add --no-all path4 &&\n"> <LIT_CHARS "\ttest_must_fail git add --no-all path6 &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# \"add -u\" should notice removals no matter what stages\n"> <LIT_CHARS "\t# the index entries are in.\n"> <LIT_CHARS "\tgit add -u &&\n"> <LIT_CHARS "\tgit ls-files -s path1 path2 path3 path4 path5 path6 >actual &&\n"> <LIT_CHARS "\t{\n"> <LIT_CHARS "\t\techo \"100644 $three 0\tpath1\"\n"> <LIT_CHARS "\t\techo \"100644 $two 0\tpath3\"\n"> <LIT_CHARS "\t\techo \"100644 $two 0\tpath5\"\n"> <LIT_CHARS "\t} >expect &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"add -u non-existent\" should fail">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git add -u non-existent &&\n"> <LIT_CHARS "\t! (git ls-files | grep \"non-existent\")\n">]})
  (Com {[LIT_CHARS test_done]})
)