(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git apply --3way">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (FunctionDef create_file []
    (For i do_arg_iter)
      (Com {[LIT_CHARS echo]} {[DQ [VarSub i]]}      )
    )
  )
  (FunctionDef sanitize_conflicted_diff []
    (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\t/^index /d\n"> <LIT_CHARS "\t\ts/^\\(+[<>][<>][<>][<>]*\\) .*/\\1/\n"> <LIT_CHARS "\t">]}    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tcreate_file >one 1 2 3 4 5 6 7 &&\n"> <LIT_CHARS "\tcat one >two &&\n"> <LIT_CHARS "\tgit add one two &&\n"> <LIT_CHARS "\tgit commit -m initial &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit branch side &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tcreate_file >one 1 two 3 4 5 six 7 &&\n"> <LIT_CHARS "\tcreate_file >two 1 two 3 4 5 6 7 &&\n"> <LIT_CHARS "\tgit commit -a -m master &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout side &&\n"> <LIT_CHARS "\tcreate_file >one 1 2 3 4 five 6 7 &&\n"> <LIT_CHARS "\tcreate_file >two 1 2 3 4 five 6 7 &&\n"> <LIT_CHARS "\tgit commit -a -m side &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout master\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "apply without --3way">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit diff side^ side >P.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# should fail to apply\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tgit checkout master^0 &&\n"> <LIT_CHARS "\ttest_must_fail git apply --index P.diff &&\n"> <LIT_CHARS "\t# should leave things intact\n"> <LIT_CHARS "\tgit diff-files --exit-code &&\n"> <LIT_CHARS "\tgit diff-index --exit-code --cached HEAD\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "apply with --3way">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t# Merging side should be similar to applying this patch\n"> <LIT_CHARS "\tgit diff ...side >P.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# The corresponding conflicted merge\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tgit checkout master^0 &&\n"> <LIT_CHARS "\ttest_must_fail git merge --no-commit side &&\n"> <LIT_CHARS "\tgit ls-files -s >expect.ls &&\n"> <LIT_CHARS "\tgit diff HEAD | sanitize_conflicted_diff >expect.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# should fail to apply\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tgit checkout master^0 &&\n"> <LIT_CHARS "\ttest_must_fail git apply --index --3way P.diff &&\n"> <LIT_CHARS "\tgit ls-files -s >actual.ls &&\n"> <LIT_CHARS "\tgit diff HEAD | sanitize_conflicted_diff >actual.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# The result should resemble the corresponding merge\n"> <LIT_CHARS "\ttest_cmp expect.ls actual.ls &&\n"> <LIT_CHARS "\ttest_cmp expect.diff actual.diff\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "apply with --3way with rerere enabled">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config rerere.enabled true &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# Merging side should be similar to applying this patch\n"> <LIT_CHARS "\tgit diff ...side >P.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# The corresponding conflicted merge\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tgit checkout master^0 &&\n"> <LIT_CHARS "\ttest_must_fail git merge --no-commit side &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# Manually resolve and record the resolution\n"> <LIT_CHARS "\tcreate_file 1 two 3 4 five six 7 >one &&\n"> <LIT_CHARS "\tgit rerere &&\n"> <LIT_CHARS "\tcat one >expect &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# should fail to apply\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tgit checkout master^0 &&\n"> <LIT_CHARS "\ttest_must_fail git apply --index --3way P.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# but rerere should have replayed the recorded resolution\n"> <LIT_CHARS "\ttest_cmp expect one\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "apply -3 with add/add conflict setup">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -b adder &&\n"> <LIT_CHARS "\tcreate_file 1 2 3 4 5 6 7 >three &&\n"> <LIT_CHARS "\tcreate_file 1 2 3 4 5 6 7 >four &&\n"> <LIT_CHARS "\tgit add three four &&\n"> <LIT_CHARS "\tgit commit -m \"add three and four\" &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -b another adder^ &&\n"> <LIT_CHARS "\tcreate_file 1 2 3 4 5 6 7 >three &&\n"> <LIT_CHARS "\tcreate_file 1 2 3 four 5 6 7 >four &&\n"> <LIT_CHARS "\tgit add three four &&\n"> <LIT_CHARS "\tgit commit -m \"add three and four\" &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# Merging another should be similar to applying this patch\n"> <LIT_CHARS "\tgit diff adder...another >P.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout adder^0 &&\n"> <LIT_CHARS "\ttest_must_fail git merge --no-commit another &&\n"> <LIT_CHARS "\tgit ls-files -s >expect.ls &&\n"> <LIT_CHARS "\tgit diff HEAD | sanitize_conflicted_diff >expect.diff\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "apply -3 with add/add conflict">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t# should fail to apply ...\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tgit checkout adder^0 &&\n"> <LIT_CHARS "\ttest_must_fail git apply --index --3way P.diff &&\n"> <LIT_CHARS "\t# ... and leave conflicts in the index and in the working tree\n"> <LIT_CHARS "\tgit ls-files -s >actual.ls &&\n"> <LIT_CHARS "\tgit diff HEAD | sanitize_conflicted_diff >actual.diff &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# The result should resemble the corresponding merge\n"> <LIT_CHARS "\ttest_cmp expect.ls actual.ls &&\n"> <LIT_CHARS "\ttest_cmp expect.diff actual.diff\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "apply -3 with add/add conflict (dirty working tree)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t# should fail to apply ...\n"> <LIT_CHARS "\tgit reset --hard &&\n"> <LIT_CHARS "\tgit checkout adder^0 &&\n"> <LIT_CHARS "\techo >>four &&\n"> <LIT_CHARS "\tcat four >four.save &&\n"> <LIT_CHARS "\tcat three >three.save &&\n"> <LIT_CHARS "\tgit ls-files -s >expect.ls &&\n"> <LIT_CHARS "\ttest_must_fail git apply --index --3way P.diff &&\n"> <LIT_CHARS "\t# ... and should not touch anything\n"> <LIT_CHARS "\tgit ls-files -s >actual.ls &&\n"> <LIT_CHARS "\ttest_cmp expect.ls actual.ls &&\n"> <LIT_CHARS "\ttest_cmp four.save four &&\n"> <LIT_CHARS "\ttest_cmp three.save three\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)