(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "Tests replace refs functionality">]})])
  (Com {[LIT_CHARS exec]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_LESS "<"> 0),
    >
  )
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (Com {[LIT_CHARS .]} {[DQ [VarSub TEST_DIRECTORY][LIT_CHARS /lib-gpg.sh]]})
  (FunctionDef add_and_commit_file []
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('_file', {[DQ [VarSub 1]]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('_msg', {[DQ [VarSub 2]]})])
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS git]} {[LIT_CHARS add]} {[VarSub _file]})
        (Com {[LIT_CHARS return]} {[VarSub ?]})
      )
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS test_tick]})
        (Com {[LIT_CHARS return]} {[VarSub ?]})
      )
      (Com {[LIT_CHARS git]} {[LIT_CHARS commit]} {[LIT_CHARS --quiet]} {[LIT_CHARS -m]} {[DQ [VarSub _file][LIT_CHARS ": "][VarSub _msg]]})
    )
  )
  (FunctionDef commit_buffer_contains_parents []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS git]} {[LIT_CHARS cat-file]} {[LIT_CHARS commit]} {[DQ [VarSub 1]]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS payload]} <REDIR_GREAT ">"> 1),
        >
      )
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS sed]} {[LIT_CHARS -n]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "/^$/q">]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "/^parent /p">]}
          <
          (FilenameRedirectNode filename={[LIT_CHARS payload]} <REDIR_LESS "<"> 0),
          (FilenameRedirectNode filename={[LIT_CHARS actual]} <REDIR_GREAT ">"> 1),
          >
        )
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS shift]})
          (AndOr OP_AND_IF
            (For _parent do_arg_iter)
              (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "parent "][VarSub _parent]]})
            )
            (Com {[LIT_CHARS test_cmp]} {[LIT_CHARS expected]} {[LIT_CHARS actual]})
          )
        )
      )
    )
  )
  (FunctionDef commit_peeling_shows_parents []
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('_parent_number', {[LIT_CHARS 1]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('_commit', {[DQ [VarSub 1]]})])
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS shift]})
        (AndOr OP_AND_IF
          (For _parent do_arg_iter)
            (List
              (AndOr OP_OR_IF
                (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('_found', {[ComSub (Com {[LIT_CHARS git]} {[LIT_CHARS rev-parse]} {[LIT_CHARS --verify]} {[VarSub _commit] [LIT_OTHER "^"] [VarSub _parent_number]})]})])
                (Com {[LIT_CHARS return]} {[LIT_CHARS 1]})
              )
              (AndOr OP_OR_IF
                (Com {[LIT_CHARS test]} {[DQ [VarSub _found]]} {[LIT_OTHER "="]} {[DQ [VarSub _parent]]})
                (Com {[LIT_CHARS return]} {[LIT_CHARS 1]})
              )
              (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('_parent_number', {[ArithSub {A2 AS_OP_PLUS {A Atom NODE_ARITH_WORD {[VarSub _parent_number]}} {A Atom NODE_ARITH_WORD {[AS_NUM_LITERAL 1]}}}]})])
            )
          )
          (Com {[LIT_CHARS test_must_fail]} {[LIT_CHARS git]} {[LIT_CHARS rev-parse]} {[LIT_CHARS --verify]} {[VarSub _commit] [LIT_OTHER "^"] [VarSub _parent_number]})
        )
      )
    )
  )
  (FunctionDef commit_has_parents []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS commit_buffer_contains_parents]} {[DQ [VarSub @]]})
      (Com {[LIT_CHARS commit_peeling_shows_parents]} {[DQ [VarSub @]]})
    )
  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HASH1', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HASH2', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HASH3', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HASH4', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HASH5', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HASH6', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HASH7', {[SQ ]})])
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "set up buggy branch">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     echo \"line 1\" >>hello &&\n"> <LIT_CHARS "     echo \"line 2\" >>hello &&\n"> <LIT_CHARS "     echo \"line 3\" >>hello &&\n"> <LIT_CHARS "     echo \"line 4\" >>hello &&\n"> <LIT_CHARS "     add_and_commit_file hello \"4 lines\" &&\n"> <LIT_CHARS "     HASH1=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     echo \"line BUG\" >>hello &&\n"> <LIT_CHARS "     echo \"line 6\" >>hello &&\n"> <LIT_CHARS "     echo \"line 7\" >>hello &&\n"> <LIT_CHARS "     echo \"line 8\" >>hello &&\n"> <LIT_CHARS "     add_and_commit_file hello \"4 more lines with a BUG\" &&\n"> <LIT_CHARS "     HASH2=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     echo \"line 9\" >>hello &&\n"> <LIT_CHARS "     echo \"line 10\" >>hello &&\n"> <LIT_CHARS "     add_and_commit_file hello \"2 more lines\" &&\n"> <LIT_CHARS "     HASH3=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     echo \"line 11\" >>hello &&\n"> <LIT_CHARS "     add_and_commit_file hello \"1 more line\" &&\n"> <LIT_CHARS "     HASH4=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     sed -e \"s/BUG/5/\" hello >hello.new &&\n"> <LIT_CHARS "     mv hello.new hello &&\n"> <LIT_CHARS "     add_and_commit_file hello \"BUG fixed\" &&\n"> <LIT_CHARS "     HASH5=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     echo \"line 12\" >>hello &&\n"> <LIT_CHARS "     echo \"line 13\" >>hello &&\n"> <LIT_CHARS "     add_and_commit_file hello \"2 more lines\" &&\n"> <LIT_CHARS "     HASH6=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     echo \"line 14\" >>hello &&\n"> <LIT_CHARS "     echo \"line 15\" >>hello &&\n"> <LIT_CHARS "     echo \"line 16\" >>hello &&\n"> <LIT_CHARS "     add_and_commit_file hello \"again 3 more lines\" &&\n"> <LIT_CHARS "     HASH7=$(git rev-parse --verify HEAD)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "replace the author">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git cat-file commit $HASH2 | grep \"author A U Thor\" &&\n"> <LIT_CHARS "     R=$(git cat-file commit $HASH2 | sed -e \"s/A U/O/\" | git hash-object -t commit --stdin -w) &&\n"> <LIT_CHARS "     git cat-file commit $R | grep \"author O Thor\" &&\n"> <LIT_CHARS "     git update-ref refs/replace/$HASH2 $R &&\n"> <LIT_CHARS "     git show HEAD~5 | grep \"O Thor\" &&\n"> <LIT_CHARS "     git show $HASH2 | grep \"O Thor\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "test --no-replace-objects option">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git cat-file commit $HASH2 | grep \"author O Thor\" &&\n"> <LIT_CHARS "     git --no-replace-objects cat-file commit $HASH2 | grep \"author A U Thor\" &&\n"> <LIT_CHARS "     git show $HASH2 | grep \"O Thor\" &&\n"> <LIT_CHARS "     git --no-replace-objects show $HASH2 | grep \"A U Thor\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "test GIT_NO_REPLACE_OBJECTS env variable">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     GIT_NO_REPLACE_OBJECTS=1 git cat-file commit $HASH2 | grep \"author A U Thor\" &&\n"> <LIT_CHARS "     GIT_NO_REPLACE_OBJECTS=1 git show $HASH2 | grep \"A U Thor\"\n">]})
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS tag.sig]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "object "][VarSub HASH2][LIT_CHARS "\n"][LIT_CHARS "type commit\n"][LIT_CHARS "tag mytag\n"][LIT_CHARS "tagger T A Gger <> 0 +0000\n"][LIT_CHARS "\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "tag replaced commit">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git mktag <tag.sig >.git/refs/tags/mytag 2>message\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"git fsck\" works">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git fsck master >fsck_master.out &&\n"> <LIT_CHARS "     grep \"dangling commit $R\" fsck_master.out &&\n"> <LIT_CHARS "     grep \"dangling tag $(cat .git/refs/tags/mytag)\" fsck_master.out &&\n"> <LIT_CHARS "     test -z \"$(git fsck)\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "repack, clone and fetch work">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git repack -a -d &&\n"> <LIT_CHARS "     git clone --no-hardlinks . clone_dir &&\n"> <LIT_CHARS "     (\n"> <LIT_CHARS "\t  cd clone_dir &&\n"> <LIT_CHARS "\t  git show HEAD~5 | grep \"A U Thor\" &&\n"> <LIT_CHARS "\t  git show $HASH2 | grep \"A U Thor\" &&\n"> <LIT_CHARS "\t  git cat-file commit $R &&\n"> <LIT_CHARS "\t  git repack -a -d &&\n"> <LIT_CHARS "\t  test_must_fail git cat-file commit $R &&\n"> <LIT_CHARS "\t  git fetch ../ \"refs/replace/*:refs/replace/*\" &&\n"> <LIT_CHARS "\t  git show HEAD~5 | grep \"O Thor\" &&\n"> <LIT_CHARS "\t  git show $HASH2 | grep \"O Thor\" &&\n"> <LIT_CHARS "\t  git cat-file commit $R\n"> <LIT_CHARS "     )\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"git replace\" listing and deleting">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     test \"$HASH2\" = \"$(git replace -l)\" &&\n"> <LIT_CHARS "     test \"$HASH2\" = \"$(git replace)\" &&\n"> <LIT_CHARS "     aa=${HASH2%??????????????????????????????????????} &&\n"> <LIT_CHARS "     test \"$HASH2\" = \"$(git replace --list \"$aa*\")\" &&\n"> <LIT_CHARS "     test_must_fail git replace -d $R &&\n"> <LIT_CHARS "     test_must_fail git replace --delete &&\n"> <LIT_CHARS "     test_must_fail git replace -l -d $HASH2 &&\n"> <LIT_CHARS "     git replace -d $HASH2 &&\n"> <LIT_CHARS "     git show $HASH2 | grep \"A U Thor\" &&\n"> <LIT_CHARS "     test -z \"$(git replace -l)\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"git replace\" replacing">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git replace $HASH2 $R &&\n"> <LIT_CHARS "     git show $HASH2 | grep \"O Thor\" &&\n"> <LIT_CHARS "     test_must_fail git replace $HASH2 $R &&\n"> <LIT_CHARS "     git replace -f $HASH2 $R &&\n"> <LIT_CHARS "     test_must_fail git replace -f &&\n"> <LIT_CHARS "     test \"$HASH2\" = \"$(git replace)\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"git replace\" resolves sha1">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     SHORTHASH2=$(git rev-parse --short=8 $HASH2) &&\n"> <LIT_CHARS "     git replace -d $SHORTHASH2 &&\n"> <LIT_CHARS "     git replace $SHORTHASH2 $R &&\n"> <LIT_CHARS "     git show $HASH2 | grep \"O Thor\" &&\n"> <LIT_CHARS "     test_must_fail git replace $HASH2 $R &&\n"> <LIT_CHARS "     git replace -f $HASH2 $R &&\n"> <LIT_CHARS "     test_must_fail git replace --force &&\n"> <LIT_CHARS "     test \"$HASH2\" = \"$(git replace)\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "create parallel branch without the bug">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git replace -d $HASH2 &&\n"> <LIT_CHARS "     git show $HASH2 | grep \"A U Thor\" &&\n"> <LIT_CHARS "     git checkout $HASH1 &&\n"> <LIT_CHARS "     git cherry-pick $HASH2 &&\n"> <LIT_CHARS "     git show $HASH5 | git apply &&\n"> <LIT_CHARS "     git commit --amend -m \"hello: 4 more lines WITHOUT the bug\" hello &&\n"> <LIT_CHARS "     PARA2=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     git cherry-pick $HASH3 &&\n"> <LIT_CHARS "     PARA3=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     git cherry-pick $HASH4 &&\n"> <LIT_CHARS "     PARA4=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     git cherry-pick $HASH6 &&\n"> <LIT_CHARS "     PARA6=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     git replace $HASH6 $PARA6 &&\n"> <LIT_CHARS "     git checkout master &&\n"> <LIT_CHARS "     cur=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "     test \"$cur\" = \"$HASH7\" &&\n"> <LIT_CHARS "     git log --pretty=oneline | grep $PARA2 &&\n"> <LIT_CHARS "     git remote add cloned ./clone_dir\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "push to cloned repo">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git push cloned $HASH6^:refs/heads/parallel &&\n"> <LIT_CHARS "     (\n"> <LIT_CHARS "\t  cd clone_dir &&\n"> <LIT_CHARS "\t  git checkout parallel &&\n"> <LIT_CHARS "\t  git log --pretty=oneline | grep $PARA2\n"> <LIT_CHARS "     )\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "push branch with replacement">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git cat-file commit $PARA3 | grep \"author A U Thor\" &&\n"> <LIT_CHARS "     S=$(git cat-file commit $PARA3 | sed -e \"s/A U/O/\" | git hash-object -t commit --stdin -w) &&\n"> <LIT_CHARS "     git cat-file commit $S | grep \"author O Thor\" &&\n"> <LIT_CHARS "     git replace $PARA3 $S &&\n"> <LIT_CHARS "     git show $HASH6~2 | grep \"O Thor\" &&\n"> <LIT_CHARS "     git show $PARA3 | grep \"O Thor\" &&\n"> <LIT_CHARS "     git push cloned $HASH6^:refs/heads/parallel2 &&\n"> <LIT_CHARS "     (\n"> <LIT_CHARS "\t  cd clone_dir &&\n"> <LIT_CHARS "\t  git checkout parallel2 &&\n"> <LIT_CHARS "\t  git log --pretty=oneline | grep $PARA3 &&\n"> <LIT_CHARS "\t  git show $PARA3 | grep \"A U Thor\"\n"> <LIT_CHARS "     )\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "fetch branch with replacement">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git branch tofetch $HASH6 &&\n"> <LIT_CHARS "     (\n"> <LIT_CHARS "\t  cd clone_dir &&\n"> <LIT_CHARS "\t  git fetch origin refs/heads/tofetch:refs/heads/parallel3 &&\n"> <LIT_CHARS "\t  git log --pretty=oneline parallel3 >output.txt &&\n"> <LIT_CHARS "\t  ! grep $PARA3 output.txt &&\n"> <LIT_CHARS "\t  git show $PARA3 >para3.txt &&\n"> <LIT_CHARS "\t  grep \"A U Thor\" para3.txt &&\n"> <LIT_CHARS "\t  git fetch origin \"refs/replace/*:refs/replace/*\" &&\n"> <LIT_CHARS "\t  git log --pretty=oneline parallel3 >output.txt &&\n"> <LIT_CHARS "\t  grep $PARA3 output.txt &&\n"> <LIT_CHARS "\t  git show $PARA3 >para3.txt &&\n"> <LIT_CHARS "\t  grep \"O Thor\" para3.txt\n"> <LIT_CHARS "     )\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "bisect and replacements">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "     git bisect start $HASH7 $HASH1 &&\n"> <LIT_CHARS "     test \"$PARA3\" = \"$(git rev-parse --verify HEAD)\" &&\n"> <LIT_CHARS "     git bisect reset &&\n"> <LIT_CHARS "     GIT_NO_REPLACE_OBJECTS=1 git bisect start $HASH7 $HASH1 &&\n"> <LIT_CHARS "     test \"$HASH4\" = \"$(git rev-parse --verify HEAD)\" &&\n"> <LIT_CHARS "     git bisect reset &&\n"> <LIT_CHARS "     git --no-replace-objects bisect start $HASH7 $HASH1 &&\n"> <LIT_CHARS "     test \"$HASH4\" = \"$(git rev-parse --verify HEAD)\" &&\n"> <LIT_CHARS "     git bisect reset\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "index-pack and replacements">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit --no-replace-objects rev-list --objects HEAD |\n"> <LIT_CHARS "\tgit --no-replace-objects pack-objects test- &&\n"> <LIT_CHARS "\tgit index-pack test-*.pack\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "not just commits">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo replaced >file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tREPLACED=$(git rev-parse :file) &&\n"> <LIT_CHARS "\tmv file file.replaced &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\techo original >file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tORIGINAL=$(git rev-parse :file) &&\n"> <LIT_CHARS "\tgit update-ref refs/replace/$ORIGINAL $REPLACED &&\n"> <LIT_CHARS "\tmv file file.original &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout file &&\n"> <LIT_CHARS "\ttest_cmp file.replaced file\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "replaced and replacement objects must be of the same type">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git replace mytag $HASH1 &&\n"> <LIT_CHARS "\ttest_must_fail git replace HEAD^{tree} HEAD~1 &&\n"> <LIT_CHARS "\tBLOB=$(git rev-parse :file) &&\n"> <LIT_CHARS "\ttest_must_fail git replace HEAD^ $BLOB\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "-f option bypasses the type check">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit replace -f mytag $HASH1 &&\n"> <LIT_CHARS "\tgit replace --force HEAD^{tree} HEAD~1 &&\n"> <LIT_CHARS "\tgit replace -f HEAD^ $BLOB\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git cat-file --batch works on replace objects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit replace | grep $PARA3 &&\n"> <LIT_CHARS "\techo $PARA3 | git cat-file --batch\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "test --format bogus">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git replace --format bogus >/dev/null 2>&1\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "test --format short">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit replace --format=short >actual &&\n"> <LIT_CHARS "\tgit replace >expected &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "test --format medium">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tH1=$(git --no-replace-objects rev-parse HEAD~1) &&\n"> <LIT_CHARS "\tHT=$(git --no-replace-objects rev-parse HEAD^{tree}) &&\n"> <LIT_CHARS "\tMYTAG=$(git --no-replace-objects rev-parse mytag) &&\n"> <LIT_CHARS "\t{\n"> <LIT_CHARS "\t\techo \"$H1 -> $BLOB\" &&\n"> <LIT_CHARS "\t\techo \"$BLOB -> $REPLACED\" &&\n"> <LIT_CHARS "\t\techo \"$HT -> $H1\" &&\n"> <LIT_CHARS "\t\techo \"$PARA3 -> $S\" &&\n"> <LIT_CHARS "\t\techo \"$MYTAG -> $HASH1\"\n"> <LIT_CHARS "\t} | sort >expected &&\n"> <LIT_CHARS "\tgit replace -l --format medium | sort >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "test --format long">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{\n"> <LIT_CHARS "\t\techo \"$H1 (commit) -> $BLOB (blob)\" &&\n"> <LIT_CHARS "\t\techo \"$BLOB (blob) -> $REPLACED (blob)\" &&\n"> <LIT_CHARS "\t\techo \"$HT (tree) -> $H1 (commit)\" &&\n"> <LIT_CHARS "\t\techo \"$PARA3 (commit) -> $S (commit)\" &&\n"> <LIT_CHARS "\t\techo \"$MYTAG (tag) -> $HASH1 (commit)\"\n"> <LIT_CHARS "\t} | sort >expected &&\n"> <LIT_CHARS "\tgit replace --format=long | sort >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup fake editors">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twrite_script fakeeditor <<-\\EOF &&\n"> <LIT_CHARS "\t\tsed -e \"s/A U Thor/A fake Thor/\" \"$1\" >\"$1.new\"\n"> <LIT_CHARS "\t\tmv \"$1.new\" \"$1\"\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\twrite_script failingfakeeditor <<-\\EOF\n"> <LIT_CHARS "\t\t./fakeeditor \"$@\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\tEOF\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--edit with and without already replaced object">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail env GIT_EDITOR=./fakeeditor git replace --edit \"$PARA3\" &&\n"> <LIT_CHARS "\tGIT_EDITOR=./fakeeditor git replace --force --edit \"$PARA3\" &&\n"> <LIT_CHARS "\tgit replace -l | grep \"$PARA3\" &&\n"> <LIT_CHARS "\tgit cat-file commit \"$PARA3\" | grep \"A fake Thor\" &&\n"> <LIT_CHARS "\tgit replace -d \"$PARA3\" &&\n"> <LIT_CHARS "\tGIT_EDITOR=./fakeeditor git replace --edit \"$PARA3\" &&\n"> <LIT_CHARS "\tgit replace -l | grep \"$PARA3\" &&\n"> <LIT_CHARS "\tgit cat-file commit \"$PARA3\" | grep \"A fake Thor\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--edit and change nothing or command failed">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit replace -d \"$PARA3\" &&\n"> <LIT_CHARS "\ttest_must_fail env GIT_EDITOR=true git replace --edit \"$PARA3\" &&\n"> <LIT_CHARS "\ttest_must_fail env GIT_EDITOR=\"./failingfakeeditor\" git replace --edit \"$PARA3\" &&\n"> <LIT_CHARS "\tGIT_EDITOR=./fakeeditor git replace --edit \"$PARA3\" &&\n"> <LIT_CHARS "\tgit replace -l | grep \"$PARA3\" &&\n"> <LIT_CHARS "\tgit cat-file commit \"$PARA3\" | grep \"A fake Thor\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "replace ref cleanup">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest -n \"$(git replace)\" &&\n"> <LIT_CHARS "\tgit replace -d $(git replace) &&\n"> <LIT_CHARS "\ttest -z \"$(git replace)\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--graft with and without already replaced object">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest $(git log --oneline | wc -l) = 7 &&\n"> <LIT_CHARS "\tgit replace --graft $HASH5 &&\n"> <LIT_CHARS "\ttest $(git log --oneline | wc -l) = 3 &&\n"> <LIT_CHARS "\tcommit_has_parents $HASH5 &&\n"> <LIT_CHARS "\ttest_must_fail git replace --graft $HASH5 $HASH4 $HASH3 &&\n"> <LIT_CHARS "\tgit replace --force -g $HASH5 $HASH4 $HASH3 &&\n"> <LIT_CHARS "\tcommit_has_parents $HASH5 $HASH4 $HASH3 &&\n"> <LIT_CHARS "\tgit replace -d $HASH5\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GPG]} {[SQ <LIT_CHARS "set up a signed commit">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"line 17\" >>hello &&\n"> <LIT_CHARS "\techo \"line 18\" >>hello &&\n"> <LIT_CHARS "\tgit add hello &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit --quiet -S -m \"hello: 2 more lines in a signed commit\" &&\n"> <LIT_CHARS "\tHASH8=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "\tgit verify-commit $HASH8\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GPG]} {[SQ <LIT_CHARS "--graft with a signed commit">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit cat-file commit $HASH8 >orig &&\n"> <LIT_CHARS "\tgit replace --graft $HASH8 &&\n"> <LIT_CHARS "\tgit cat-file commit $HASH8 >repl &&\n"> <LIT_CHARS "\tcommit_has_parents $HASH8 &&\n"> <LIT_CHARS "\ttest_must_fail git verify-commit $HASH8 &&\n"> <LIT_CHARS "\tsed -n -e \"/^tree /p\" -e \"/^author /p\" -e \"/^committer /p\" orig >expected &&\n"> <LIT_CHARS "\techo >>expected &&\n"> <LIT_CHARS "\tsed -e \"/^$/q\" repl >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual &&\n"> <LIT_CHARS "\tgit replace -d $HASH8\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GPG]} {[SQ <LIT_CHARS "set up a merge commit with a mergetag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit reset --hard HEAD &&\n"> <LIT_CHARS "\tgit checkout -b test_branch HEAD~2 &&\n"> <LIT_CHARS "\techo \"line 1 from test branch\" >>hello &&\n"> <LIT_CHARS "\techo \"line 2 from test branch\" >>hello &&\n"> <LIT_CHARS "\tgit add hello &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m \"hello: 2 more lines from a test branch\" &&\n"> <LIT_CHARS "\tHASH9=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "\tgit tag -s -m \"tag for testing with a mergetag\" test_tag HEAD &&\n"> <LIT_CHARS "\tgit checkout master &&\n"> <LIT_CHARS "\tgit merge -s ours test_tag &&\n"> <LIT_CHARS "\tHASH10=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "\tgit cat-file commit $HASH10 | grep \"^mergetag object\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GPG]} {[SQ <LIT_CHARS "--graft on a commit with a mergetag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git replace --graft $HASH10 $HASH8^1 &&\n"> <LIT_CHARS "\tgit replace --graft $HASH10 $HASH8^1 $HASH9 &&\n"> <LIT_CHARS "\tgit replace -d $HASH10\n">]})
  (Com {[LIT_CHARS test_done]})
)