(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "merge-recursive rename options\n"> <LIT_CHARS "\n"> <LIT_CHARS "Test rename detection by examining rename/delete conflicts.\n"> <LIT_CHARS "\n"> <LIT_CHARS "* (HEAD -> rename) rename\n"> <LIT_CHARS "| * (master) delete\n"> <LIT_CHARS "|/\n"> <LIT_CHARS "* base\n"> <LIT_CHARS "\n"> <LIT_CHARS "git diff --name-status base master\n"> <LIT_CHARS "D\t0-old\n"> <LIT_CHARS "D\t1-old\n"> <LIT_CHARS "D\t2-old\n"> <LIT_CHARS "D\t3-old\n"> <LIT_CHARS "\n"> <LIT_CHARS "git diff --name-status -M01 base rename\n"> <LIT_CHARS "R025    0-old   0-new\n"> <LIT_CHARS "R050    1-old   1-new\n"> <LIT_CHARS "R075    2-old   2-new\n"> <LIT_CHARS "R100    3-old   3-new\n"> <LIT_CHARS "\n"> <LIT_CHARS "Actual similarity indices are parsed from diff output. We rely on the fact that\n"> <LIT_CHARS "they are rounded down (see, e.g., Documentation/diff-generate-patch.txt, which\n"> <LIT_CHARS "mentions this in a different context).\n">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (FunctionDef get_expected_stages []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS git]} {[LIT_CHARS checkout]} {[LIT_CHARS rename]} {[LIT_CHARS --]} {[VarSub 1] [LIT_CHARS -new]})
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS git]} {[LIT_CHARS ls-files]} {[LIT_CHARS --stage]} {[VarSub 1] [LIT_CHARS -new]}
          <
          (FilenameRedirectNode filename={[LIT_CHARS expected-stages-undetected-] [VarSub 1]} <REDIR_GREAT ">"> 1),
          >
        )
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS sed]} {[DQ [LIT_CHARS "s/ 0\t/ 2\t/"]]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS expected-stages-undetected-] [VarSub 1]} <REDIR_LESS "<"> 0),
            (FilenameRedirectNode filename={[LIT_CHARS expected-stages-detected-] [VarSub 1]} <REDIR_GREAT ">"> 1),
            >
          )
          (Com {[LIT_CHARS git]} {[LIT_CHARS read-tree]} {[LIT_CHARS -u]} {[LIT_CHARS --reset]} {[LIT_CHARS HEAD]})
        )
      )
    )
  )
  (FunctionDef rename_detected []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS git]} {[LIT_CHARS ls-files]} {[LIT_CHARS --stage]} {[VarSub 1] [LIT_CHARS -old]} {[VarSub 1] [LIT_CHARS -new]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS stages-actual-] [VarSub 1]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS test_cmp]} {[LIT_CHARS expected-stages-detected-] [VarSub 1]} {[LIT_CHARS stages-actual-] [VarSub 1]})
    )
  )
  (FunctionDef rename_undetected []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS git]} {[LIT_CHARS ls-files]} {[LIT_CHARS --stage]} {[VarSub 1] [LIT_CHARS -old]} {[VarSub 1] [LIT_CHARS -new]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS stages-actual-] [VarSub 1]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS test_cmp]} {[LIT_CHARS expected-stages-undetected-] [VarSub 1]} {[LIT_CHARS stages-actual-] [VarSub 1]})
    )
  )
  (FunctionDef check_common []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS git]} {[LIT_CHARS ls-files]} {[LIT_CHARS --stage]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS stages-actual]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS test_line_count]} {[LIT_OTHER "="]} {[LIT_CHARS 4]} {[LIT_CHARS stages-actual]})
    )
  )
  (FunctionDef check_threshold_0 []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS check_common]})
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 0]})
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 1]})
          (AndOr OP_AND_IF
            (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 2]})
            (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 3]})
          )
        )
      )
    )
  )
  (FunctionDef check_threshold_1 []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS check_common]})
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 0]})
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 1]})
          (AndOr OP_AND_IF
            (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 2]})
            (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 3]})
          )
        )
      )
    )
  )
  (FunctionDef check_threshold_2 []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS check_common]})
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 0]})
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 1]})
          (AndOr OP_AND_IF
            (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 2]})
            (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 3]})
          )
        )
      )
    )
  )
  (FunctionDef check_exact_renames []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS check_common]})
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 0]})
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 1]})
          (AndOr OP_AND_IF
            (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 2]})
            (Com {[LIT_CHARS rename_detected]} {[LIT_CHARS 3]})
          )
        )
      )
    )
  )
  (FunctionDef check_no_renames []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS check_common]})
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 0]})
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 1]})
          (AndOr OP_AND_IF
            (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 2]})
            (Com {[LIT_CHARS rename_undetected]} {[LIT_CHARS 3]})
          )
        )
      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup repo">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcat <<-\\EOF >3-old &&\n"> <LIT_CHARS "\t33a\n"> <LIT_CHARS "\t33b\n"> <LIT_CHARS "\t33c\n"> <LIT_CHARS "\t33d\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tsed s/33/22/ <3-old >2-old &&\n"> <LIT_CHARS "\tsed s/33/11/ <3-old >1-old &&\n"> <LIT_CHARS "\tsed s/33/00/ <3-old >0-old &&\n"> <LIT_CHARS "\tgit add [0-3]-old &&\n"> <LIT_CHARS "\tgit commit -m base &&\n"> <LIT_CHARS "\tgit rm [0-3]-old &&\n"> <LIT_CHARS "\tgit commit -m delete &&\n"> <LIT_CHARS "\tgit checkout -b rename HEAD^ &&\n"> <LIT_CHARS "\tcp 3-old 3-new &&\n"> <LIT_CHARS "\tsed 1,1s/./x/ <2-old >2-new &&\n"> <LIT_CHARS "\tsed 1,2s/./x/ <1-old >1-new &&\n"> <LIT_CHARS "\tsed 1,3s/./x/ <0-old >0-new &&\n"> <LIT_CHARS "\tgit add [0-3]-new &&\n"> <LIT_CHARS "\tgit rm [0-3]-old &&\n"> <LIT_CHARS "\tgit commit -m rename &&\n"> <LIT_CHARS "\tget_expected_stages 0 &&\n"> <LIT_CHARS "\tget_expected_stages 1 &&\n"> <LIT_CHARS "\tget_expected_stages 2 &&\n"> <LIT_CHARS "\tget_expected_stages 3 &&\n"> <LIT_CHARS "\tcheck_50=\"false\" &&\n"> <LIT_CHARS "\ttail=\"HEAD^ -- HEAD master\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup thresholds">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit diff --name-status -M01 HEAD^ HEAD >diff-output &&\n"> <LIT_CHARS "\ttest_debug \"cat diff-output\" &&\n"> <LIT_CHARS "\ttest_line_count = 4 diff-output &&\n"> <LIT_CHARS "\tgrep \"R[0-9][0-9][0-9]\t\\([0-3]\\)-old\t\\1-new\" diff-output \\\n"> <LIT_CHARS "\t\t>grep-output &&\n"> <LIT_CHARS "\ttest_cmp diff-output grep-output &&\n"> <LIT_CHARS "\tth0=$(sed -n \"s/R\\(...\\)\t0-old\t0-new/\\1/p\" <diff-output) &&\n"> <LIT_CHARS "\tth1=$(sed -n \"s/R\\(...\\)\t1-old\t1-new/\\1/p\" <diff-output) &&\n"> <LIT_CHARS "\tth2=$(sed -n \"s/R\\(...\\)\t2-old\t2-new/\\1/p\" <diff-output) &&\n"> <LIT_CHARS "\tth3=$(sed -n \"s/R\\(...\\)\t3-old\t3-new/\\1/p\" <diff-output) &&\n"> <LIT_CHARS "\ttest \"$th0\" -lt \"$th1\" &&\n"> <LIT_CHARS "\ttest \"$th1\" -lt \"$th2\" &&\n"> <LIT_CHARS "\ttest \"$th2\" -lt \"$th3\" &&\n"> <LIT_CHARS "\ttest \"$th3\" = 100 &&\n"> <LIT_CHARS "\tif test 50 -le \"$th0\"\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\tcheck_50=check_threshold_0\n"> <LIT_CHARS "\telif test 50 -le \"$th1\"\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\tcheck_50=check_threshold_1\n"> <LIT_CHARS "\telif test 50 -le \"$th2\"\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\tcheck_50=check_threshold_2\n"> <LIT_CHARS "\tfi &&\n"> <LIT_CHARS "\tth0=\"$th0%\" &&\n"> <LIT_CHARS "\tth1=\"$th1%\" &&\n"> <LIT_CHARS "\tth2=\"$th2%\" &&\n"> <LIT_CHARS "\tth3=\"$th3%\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "assumption for tests: rename detection with diff">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit diff --name-status -M$th0 --diff-filter=R HEAD^ HEAD \\\n"> <LIT_CHARS "\t\t>diff-output-0 &&\n"> <LIT_CHARS "\tgit diff --name-status -M$th1 --diff-filter=R HEAD^ HEAD \\\n"> <LIT_CHARS "\t\t>diff-output-1 &&\n"> <LIT_CHARS "\tgit diff --name-status -M$th2 --diff-filter=R HEAD^ HEAD \\\n"> <LIT_CHARS "\t\t>diff-output-2 &&\n"> <LIT_CHARS "\tgit diff --name-status -M100% --diff-filter=R HEAD^ HEAD \\\n"> <LIT_CHARS "\t\t>diff-output-3 &&\n"> <LIT_CHARS "\ttest_line_count = 4 diff-output-0 &&\n"> <LIT_CHARS "\ttest_line_count = 3 diff-output-1 &&\n"> <LIT_CHARS "\ttest_line_count = 2 diff-output-2 &&\n"> <LIT_CHARS "\ttest_line_count = 1 diff-output-3\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "default similarity threshold is 50%">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive $tail &&\n"> <LIT_CHARS "\t$check_50\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "low rename threshold">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --find-renames=$th0 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_0\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "medium rename threshold">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --find-renames=$th1 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_1\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "high rename threshold">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --find-renames=$th2 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_2\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "exact renames only">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --find-renames=100% $tail &&\n"> <LIT_CHARS "\tcheck_exact_renames\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "rename threshold is truncated">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --find-renames=200% $tail &&\n"> <LIT_CHARS "\tcheck_exact_renames\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "disabled rename detection">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\tgit merge-recursive --no-renames $tail &&\n"> <LIT_CHARS "\tcheck_no_renames\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "last wins in --find-renames=<m> --find-renames=<n>">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive \\\n"> <LIT_CHARS "\t\t--find-renames=$th0 --find-renames=$th2 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_2\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--find-renames resets threshold">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive \\\n"> <LIT_CHARS "\t\t--find-renames=$th0 --find-renames $tail &&\n"> <LIT_CHARS "\t$check_50\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "last wins in --no-renames --find-renames">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --no-renames --find-renames $tail &&\n"> <LIT_CHARS "\t$check_50\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "last wins in --find-renames --no-renames">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\tgit merge-recursive --find-renames --no-renames $tail &&\n"> <LIT_CHARS "\tcheck_no_renames\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "assumption for further tests: trivial merge succeeds">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\tgit merge-recursive HEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached &&\n"> <LIT_CHARS "\tgit merge-recursive --find-renames=$th0 HEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached &&\n"> <LIT_CHARS "\tgit merge-recursive --find-renames=$th2 HEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached &&\n"> <LIT_CHARS "\tgit merge-recursive --find-renames=100% HEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached &&\n"> <LIT_CHARS "\tgit merge-recursive --no-renames HEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--find-renames rejects negative argument">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --find-renames=-25 \\\n"> <LIT_CHARS "\t\tHEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--find-renames rejects non-numbers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --find-renames=0xf \\\n"> <LIT_CHARS "\t\tHEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "rename-threshold=<n> is a synonym for find-renames=<n>">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --rename-threshold=$th0 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_0\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "last wins in --no-renames --rename-threshold=<n>">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --no-renames --rename-threshold=$th0 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_0\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "last wins in --rename-threshold=<n> --no-renames">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\tgit merge-recursive --rename-threshold=$th0 --no-renames $tail &&\n"> <LIT_CHARS "\tcheck_no_renames\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--rename-threshold=<n> rejects negative argument">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --rename-threshold=-25 \\\n"> <LIT_CHARS "\t\tHEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--rename-threshold=<n> rejects non-numbers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive --rename-threshold=0xf \\\n"> <LIT_CHARS "\t\tHEAD -- HEAD HEAD &&\n"> <LIT_CHARS "\tgit diff --quiet --cached\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "last wins in --rename-threshold=<m> --find-renames=<n>">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive \\\n"> <LIT_CHARS "\t\t--rename-threshold=$th0 --find-renames=$th2 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_2\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "last wins in --find-renames=<m> --rename-threshold=<n>">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit read-tree --reset -u HEAD &&\n"> <LIT_CHARS "\ttest_must_fail git merge-recursive \\\n"> <LIT_CHARS "\t\t--find-renames=$th2 --rename-threshold=$th0 $tail &&\n"> <LIT_CHARS "\tcheck_threshold_0\n">]})
  (Com {[LIT_CHARS test_done]})
)