(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git apply should not get confused with type changes.\n"> <LIT_CHARS "\n">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup repository and commits">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"hello world\" > foo &&\n"> <LIT_CHARS "\techo \"hi planet\" > bar &&\n"> <LIT_CHARS "\tgit update-index --add foo bar &&\n"> <LIT_CHARS "\tgit commit -m initial &&\n"> <LIT_CHARS "\tgit branch initial &&\n"> <LIT_CHARS "\trm -f foo &&\n"> <LIT_CHARS "\ttest_ln_s_add bar foo &&\n"> <LIT_CHARS "\tgit commit -m \"foo symlinked to bar\" &&\n"> <LIT_CHARS "\tgit branch foo-symlinked-to-bar &&\n"> <LIT_CHARS "\tgit rm -f foo &&\n"> <LIT_CHARS "\techo \"how far is the sun?\" > foo &&\n"> <LIT_CHARS "\tgit update-index --add foo &&\n"> <LIT_CHARS "\tgit commit -m \"foo back to file\" &&\n"> <LIT_CHARS "\tgit branch foo-back-to-file &&\n"> <LIT_CHARS "\tprintf \"\\0\" > foo &&\n"> <LIT_CHARS "\tgit update-index foo &&\n"> <LIT_CHARS "\tgit commit -m \"foo becomes binary\" &&\n"> <LIT_CHARS "\tgit branch foo-becomes-binary &&\n"> <LIT_CHARS "\trm -f foo &&\n"> <LIT_CHARS "\tgit update-index --remove foo &&\n"> <LIT_CHARS "\tmkdir foo &&\n"> <LIT_CHARS "\techo \"if only I knew\" > foo/baz &&\n"> <LIT_CHARS "\tgit update-index --add foo/baz &&\n"> <LIT_CHARS "\tgit commit -m \"foo becomes a directory\" &&\n"> <LIT_CHARS "\tgit branch \"foo-becomes-a-directory\" &&\n"> <LIT_CHARS "\techo \"hello world\" > foo/baz &&\n"> <LIT_CHARS "\tgit update-index foo/baz &&\n"> <LIT_CHARS "\tgit commit -m \"foo/baz is the original foo\" &&\n"> <LIT_CHARS "\tgit branch foo-baz-renamed-from-foo\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "file renamed from foo to foo/baz">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f initial &&\n"> <LIT_CHARS "\tgit diff-tree -M -p HEAD foo-baz-renamed-from-foo > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "file renamed from foo/baz to foo">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f foo-baz-renamed-from-foo &&\n"> <LIT_CHARS "\tgit diff-tree -M -p HEAD initial > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "directory becomes file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f foo-becomes-a-directory &&\n"> <LIT_CHARS "\tgit diff-tree -p HEAD initial > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "file becomes directory">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f initial &&\n"> <LIT_CHARS "\tgit diff-tree -p HEAD foo-becomes-a-directory > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "file becomes symlink">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f initial &&\n"> <LIT_CHARS "\tgit diff-tree -p HEAD foo-symlinked-to-bar > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "symlink becomes file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f foo-symlinked-to-bar &&\n"> <LIT_CHARS "\tgit diff-tree -p HEAD foo-back-to-file > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "binary file becomes symlink">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f foo-becomes-binary &&\n"> <LIT_CHARS "\tgit diff-tree -p --binary HEAD foo-symlinked-to-bar > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "symlink becomes binary file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f foo-symlinked-to-bar &&\n"> <LIT_CHARS "\tgit diff-tree -p --binary HEAD foo-becomes-binary > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "symlink becomes directory">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f foo-symlinked-to-bar &&\n"> <LIT_CHARS "\tgit diff-tree -p HEAD foo-becomes-a-directory > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "directory becomes symlink">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -f foo-becomes-a-directory &&\n"> <LIT_CHARS "\tgit diff-tree -p HEAD foo-symlinked-to-bar > patch &&\n"> <LIT_CHARS "\tgit apply --index < patch\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_debug]} {[SQ <LIT_CHARS "cat patch">]})
  (Com {[LIT_CHARS test_done]})
)