(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git checkout-index --temp test.\n"> <LIT_CHARS "\n"> <LIT_CHARS "With --temp flag, git checkout-index writes to temporary merge files\n"> <LIT_CHARS "rather than the tracked path.">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS setup>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tmkdir asubdir &&\n"> <LIT_CHARS "\techo tree1path0 >path0 &&\n"> <LIT_CHARS "\techo tree1path1 >path1 &&\n"> <LIT_CHARS "\techo tree1path3 >path3 &&\n"> <LIT_CHARS "\techo tree1path4 >path4 &&\n"> <LIT_CHARS "\techo tree1asubdir/path5 >asubdir/path5 &&\n"> <LIT_CHARS "\tgit update-index --add path0 path1 path3 path4 asubdir/path5 &&\n"> <LIT_CHARS "\tt1=$(git write-tree) &&\n"> <LIT_CHARS "\trm -f path* .merge_* actual .git/index &&\n"> <LIT_CHARS "\techo tree2path0 >path0 &&\n"> <LIT_CHARS "\techo tree2path1 >path1 &&\n"> <LIT_CHARS "\techo tree2path2 >path2 &&\n"> <LIT_CHARS "\techo tree2path4 >path4 &&\n"> <LIT_CHARS "\tgit update-index --add path0 path1 path2 path4 &&\n"> <LIT_CHARS "\tt2=$(git write-tree) &&\n"> <LIT_CHARS "\trm -f path* .merge_* actual .git/index &&\n"> <LIT_CHARS "\techo tree2path0 >path0 &&\n"> <LIT_CHARS "\techo tree3path1 >path1 &&\n"> <LIT_CHARS "\techo tree3path2 >path2 &&\n"> <LIT_CHARS "\techo tree3path3 >path3 &&\n"> <LIT_CHARS "\tgit update-index --add path0 path1 path2 path3 &&\n"> <LIT_CHARS "\tt3=$(git write-tree)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout one stage 0 to temporary file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual .git/index &&\n"> <LIT_CHARS "\tgit read-tree $t1 &&\n"> <LIT_CHARS "\tgit checkout-index --temp -- path1 >actual &&\n"> <LIT_CHARS "\ttest_line_count = 1 actual &&\n"> <LIT_CHARS "\ttest $(cut \"-d\t\" -f2 actual) = path1 &&\n"> <LIT_CHARS "\tp=$(cut \"-d\t\" -f1 actual) &&\n"> <LIT_CHARS "\ttest -f $p &&\n"> <LIT_CHARS "\ttest $(cat $p) = tree1path1\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout all stage 0 to temporary files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual .git/index &&\n"> <LIT_CHARS "\tgit read-tree $t1 &&\n"> <LIT_CHARS "\tgit checkout-index -a --temp >actual &&\n"> <LIT_CHARS "\ttest_line_count = 5 actual &&\n"> <LIT_CHARS "\tfor f in path0 path1 path3 path4 asubdir/path5\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\ttest $(grep $f actual | cut \"-d\t\" -f2) = $f &&\n"> <LIT_CHARS "\t\tp=$(grep $f actual | cut \"-d\t\" -f1) &&\n"> <LIT_CHARS "\t\ttest -f $p &&\n"> <LIT_CHARS "\t\ttest $(cat $p) = tree1$f\n"> <LIT_CHARS "\tdone\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup 3-way merge">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual .git/index &&\n"> <LIT_CHARS "\tgit read-tree -m $t1 $t2 $t3\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout one stage 2 to temporary file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual &&\n"> <LIT_CHARS "\tgit checkout-index --stage=2 --temp -- path1 >actual &&\n"> <LIT_CHARS "\ttest_line_count = 1 actual &&\n"> <LIT_CHARS "\ttest $(cut \"-d\t\" -f2 actual) = path1 &&\n"> <LIT_CHARS "\tp=$(cut \"-d\t\" -f1 actual) &&\n"> <LIT_CHARS "\ttest -f $p &&\n"> <LIT_CHARS "\ttest $(cat $p) = tree2path1\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout all stage 2 to temporary files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual &&\n"> <LIT_CHARS "\tgit checkout-index --all --stage=2 --temp >actual &&\n"> <LIT_CHARS "\ttest_line_count = 3 actual &&\n"> <LIT_CHARS "\tfor f in path1 path2 path4\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\ttest $(grep $f actual | cut \"-d\t\" -f2) = $f &&\n"> <LIT_CHARS "\t\tp=$(grep $f actual | cut \"-d\t\" -f1) &&\n"> <LIT_CHARS "\t\ttest -f $p &&\n"> <LIT_CHARS "\t\ttest $(cat $p) = tree2$f\n"> <LIT_CHARS "\tdone\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout all stages/one file to nothing">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual &&\n"> <LIT_CHARS "\tgit checkout-index --stage=all --temp -- path0 >actual &&\n"> <LIT_CHARS "\ttest_line_count = 0 actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout all stages/one file to temporary files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual &&\n"> <LIT_CHARS "\tgit checkout-index --stage=all --temp -- path1 >actual &&\n"> <LIT_CHARS "\ttest_line_count = 1 actual &&\n"> <LIT_CHARS "\ttest $(cut \"-d\t\" -f2 actual) = path1 &&\n"> <LIT_CHARS "\tcut \"-d\t\" -f1 actual | (read s1 s2 s3 &&\n"> <LIT_CHARS "\ttest -f $s1 &&\n"> <LIT_CHARS "\ttest -f $s2 &&\n"> <LIT_CHARS "\ttest -f $s3 &&\n"> <LIT_CHARS "\ttest $(cat $s1) = tree1path1 &&\n"> <LIT_CHARS "\ttest $(cat $s2) = tree2path1 &&\n"> <LIT_CHARS "\ttest $(cat $s3) = tree3path1)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout some stages/one file to temporary files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual &&\n"> <LIT_CHARS "\tgit checkout-index --stage=all --temp -- path2 >actual &&\n"> <LIT_CHARS "\ttest_line_count = 1 actual &&\n"> <LIT_CHARS "\ttest $(cut \"-d\t\" -f2 actual) = path2 &&\n"> <LIT_CHARS "\tcut \"-d\t\" -f1 actual | (read s1 s2 s3 &&\n"> <LIT_CHARS "\ttest $s1 = . &&\n"> <LIT_CHARS "\ttest -f $s2 &&\n"> <LIT_CHARS "\ttest -f $s3 &&\n"> <LIT_CHARS "\ttest $(cat $s2) = tree2path2 &&\n"> <LIT_CHARS "\ttest $(cat $s3) = tree3path2)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout all stages/all files to temporary files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual &&\n"> <LIT_CHARS "\tgit checkout-index -a --stage=all --temp >actual &&\n"> <LIT_CHARS "\ttest_line_count = 5 actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "-- path0: no entry">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest x$(grep path0 actual | cut \"-d\t\" -f2) = x\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "-- path1: all 3 stages">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest $(grep path1 actual | cut \"-d\t\" -f2) = path1 &&\n"> <LIT_CHARS "\tgrep path1 actual | cut \"-d\t\" -f1 | (read s1 s2 s3 &&\n"> <LIT_CHARS "\ttest -f $s1 &&\n"> <LIT_CHARS "\ttest -f $s2 &&\n"> <LIT_CHARS "\ttest -f $s3 &&\n"> <LIT_CHARS "\ttest $(cat $s1) = tree1path1 &&\n"> <LIT_CHARS "\ttest $(cat $s2) = tree2path1 &&\n"> <LIT_CHARS "\ttest $(cat $s3) = tree3path1)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "-- path2: no stage 1, have stage 2 and 3">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest $(grep path2 actual | cut \"-d\t\" -f2) = path2 &&\n"> <LIT_CHARS "\tgrep path2 actual | cut \"-d\t\" -f1 | (read s1 s2 s3 &&\n"> <LIT_CHARS "\ttest $s1 = . &&\n"> <LIT_CHARS "\ttest -f $s2 &&\n"> <LIT_CHARS "\ttest -f $s3 &&\n"> <LIT_CHARS "\ttest $(cat $s2) = tree2path2 &&\n"> <LIT_CHARS "\ttest $(cat $s3) = tree3path2)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "-- path3: no stage 2, have stage 1 and 3">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest $(grep path3 actual | cut \"-d\t\" -f2) = path3 &&\n"> <LIT_CHARS "\tgrep path3 actual | cut \"-d\t\" -f1 | (read s1 s2 s3 &&\n"> <LIT_CHARS "\ttest -f $s1 &&\n"> <LIT_CHARS "\ttest $s2 = . &&\n"> <LIT_CHARS "\ttest -f $s3 &&\n"> <LIT_CHARS "\ttest $(cat $s1) = tree1path3 &&\n"> <LIT_CHARS "\ttest $(cat $s3) = tree3path3)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "-- path4: no stage 3, have stage 1 and 3">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest $(grep path4 actual | cut \"-d\t\" -f2) = path4 &&\n"> <LIT_CHARS "\tgrep path4 actual | cut \"-d\t\" -f1 | (read s1 s2 s3 &&\n"> <LIT_CHARS "\ttest -f $s1 &&\n"> <LIT_CHARS "\ttest -f $s2 &&\n"> <LIT_CHARS "\ttest $s3 = . &&\n"> <LIT_CHARS "\ttest $(cat $s1) = tree1path4 &&\n"> <LIT_CHARS "\ttest $(cat $s2) = tree2path4)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "-- asubdir/path5: no stage 2 and 3 have stage 1">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest $(grep asubdir/path5 actual | cut \"-d\t\" -f2) = asubdir/path5 &&\n"> <LIT_CHARS "\tgrep asubdir/path5 actual | cut \"-d\t\" -f1 | (read s1 s2 s3 &&\n"> <LIT_CHARS "\ttest -f $s1 &&\n"> <LIT_CHARS "\ttest $s2 = . &&\n"> <LIT_CHARS "\ttest $s3 = . &&\n"> <LIT_CHARS "\ttest $(cat $s1) = tree1asubdir/path5)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout --temp within subdir">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd asubdir &&\n"> <LIT_CHARS "\t\tgit checkout-index -a --stage=all >actual &&\n"> <LIT_CHARS "\t\ttest_line_count = 1 actual &&\n"> <LIT_CHARS "\t\ttest $(grep path5 actual | cut \"-d\t\" -f2) = path5 &&\n"> <LIT_CHARS "\t\tgrep path5 actual | cut \"-d\t\" -f1 | (read s1 s2 s3 &&\n"> <LIT_CHARS "\t\ttest -f ../$s1 &&\n"> <LIT_CHARS "\t\ttest $s2 = . &&\n"> <LIT_CHARS "\t\ttest $s3 = . &&\n"> <LIT_CHARS "\t\ttest $(cat ../$s1) = tree1asubdir/path5)\n"> <LIT_CHARS "\t)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "checkout --temp symlink">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual .git/index &&\n"> <LIT_CHARS "\ttest_ln_s_add path7 path6 &&\n"> <LIT_CHARS "\tgit checkout-index --temp -a >actual &&\n"> <LIT_CHARS "\ttest_line_count = 1 actual &&\n"> <LIT_CHARS "\ttest $(cut \"-d\t\" -f2 actual) = path6 &&\n"> <LIT_CHARS "\tp=$(cut \"-d\t\" -f1 actual) &&\n"> <LIT_CHARS "\ttest -f $p &&\n"> <LIT_CHARS "\ttest $(cat $p) = path7\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "emit well-formed relative path">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f path* .merge_* actual .git/index &&\n"> <LIT_CHARS "\t>path0123456789 &&\n"> <LIT_CHARS "\tgit update-index --add path0123456789 &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd asubdir &&\n"> <LIT_CHARS "\t\tgit checkout-index --temp -- ../path0123456789 >actual &&\n"> <LIT_CHARS "\t\ttest_line_count = 1 actual &&\n"> <LIT_CHARS "\t\ttest $(cut \"-d\t\" -f2 actual) = ../path0123456789\n"> <LIT_CHARS "\t)\n">]})
  (Com {[LIT_CHARS test_done]})
)