(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "Test pretty formats">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_encoding', {[DQ [LIT_CHARS ISO8859-1]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('sample_utf8_part', {[ComSub (Com {[LIT_CHARS printf]} {[DQ [LIT_CHARS f][\ LIT_ESCAPED_CHAR "\\3"][LIT_CHARS 03][\ LIT_ESCAPED_CHAR "\\2"][LIT_CHARS 44ng]]})]})])
  (FunctionDef commit_msg []
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('msg', {[DQ [LIT_CHARS "initial. an"][VarSub sample_utf8_part][LIT_CHARS lich][\ LIT_ESCAPED_CHAR "\\n"]]})])
      (If
        (Com {[LIT_CHARS test]} {[LIT_CHARS -n]} {[DQ [VarSub 1]]})
        (Pipeline
          (Com {[LIT_CHARS printf]} {[DQ [VarSub msg]]})
          (Com {[LIT_CHARS iconv]} {[LIT_CHARS -f]} {[LIT_CHARS utf-8]} {[LIT_CHARS -t]} {[DQ [VarSub 1]]})
        )
        (ElseTrue)
        (Com {[LIT_CHARS printf]} {[DQ [VarSub msg]]})
      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "set up basic repos">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t>foo &&\n"> <LIT_CHARS "\t>bar &&\n"> <LIT_CHARS "\tgit add foo &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit config i18n.commitEncoding $test_encoding &&\n"> <LIT_CHARS "\tcommit_msg $test_encoding | git commit -F - &&\n"> <LIT_CHARS "\tgit add bar &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m \"add bar\" &&\n"> <LIT_CHARS "\tgit config --unset i18n.commitEncoding\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias builtin format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=oneline >expected &&\n"> <LIT_CHARS "\tgit config pretty.test-alias oneline &&\n"> <LIT_CHARS "\tgit log --pretty=test-alias >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias masking builtin format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=oneline >expected &&\n"> <LIT_CHARS "\tgit config pretty.oneline \"%H\" &&\n"> <LIT_CHARS "\tgit log --pretty=oneline >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias user-defined format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"format:%h\" >expected &&\n"> <LIT_CHARS "\tgit config pretty.test-alias \"format:%h\" &&\n"> <LIT_CHARS "\tgit log --pretty=test-alias >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias user-defined tformat with %s (ISO8859-1 encoding)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config i18n.logOutputEncoding $test_encoding &&\n"> <LIT_CHARS "\tgit log --oneline >expected-s &&\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%h %s\" >actual-s &&\n"> <LIT_CHARS "\tgit config --unset i18n.logOutputEncoding &&\n"> <LIT_CHARS "\ttest_cmp expected-s actual-s\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias user-defined tformat with %s (utf-8 encoding)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --oneline >expected-s &&\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%h %s\" >actual-s &&\n"> <LIT_CHARS "\ttest_cmp expected-s actual-s\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias user-defined tformat">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%h\" >expected &&\n"> <LIT_CHARS "\tgit config pretty.test-alias \"tformat:%h\" &&\n"> <LIT_CHARS "\tgit log --pretty=test-alias >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias non-existent format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config pretty.test-alias format-that-will-never-exist &&\n"> <LIT_CHARS "\ttest_must_fail git log --pretty=test-alias\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias of an alias">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%h\" >expected &&\n"> <LIT_CHARS "\tgit config pretty.test-foo \"tformat:%h\" &&\n"> <LIT_CHARS "\tgit config pretty.test-bar test-foo &&\n"> <LIT_CHARS "\tgit log --pretty=test-bar >actual && test_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias masking an alias">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=format:\"Two %H\" >expected &&\n"> <LIT_CHARS "\tgit config pretty.duplicate \"format:One %H\" &&\n"> <LIT_CHARS "\tgit config --add pretty.duplicate \"format:Two %H\" &&\n"> <LIT_CHARS "\tgit log --pretty=duplicate >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "alias loop">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config pretty.test-foo test-bar &&\n"> <LIT_CHARS "\tgit config pretty.test-bar test-foo &&\n"> <LIT_CHARS "\ttest_must_fail git log --pretty=test-foo\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "NUL separation">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"add bar\\0$(commit_msg)\" >expected &&\n"> <LIT_CHARS "\tgit log -z --pretty=\"format:%s\" >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "NUL termination">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tprintf \"add bar\\0$(commit_msg)\\0\" >expected &&\n"> <LIT_CHARS "\tgit log -z --pretty=\"tformat:%s\" >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "NUL separation with --stat">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tstat0_part=$(git diff --stat HEAD^ HEAD) &&\n"> <LIT_CHARS "\tstat1_part=$(git diff-tree --no-commit-id --stat --root HEAD^) &&\n"> <LIT_CHARS "\tprintf \"add bar\\n$stat0_part\\n\\0$(commit_msg)\\n$stat1_part\\n\" >expected &&\n"> <LIT_CHARS "\tgit log -z --stat --pretty=\"format:%s\" >actual &&\n"> <LIT_CHARS "\ttest_i18ncmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "NUL termination with --stat">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tstat0_part=$(git diff --stat HEAD^ HEAD) &&\n"> <LIT_CHARS "\tstat1_part=$(git diff-tree --no-commit-id --stat --root HEAD^) &&\n"> <LIT_CHARS "\tprintf \"add bar\\n$stat0_part\\n\\0$(commit_msg)\\n$stat1_part\\n0\" >expected &&\n"> <LIT_CHARS "\tgit log -z --stat --pretty=\"tformat:%s\" >actual &&\n"> <LIT_CHARS "\ttest_i18ncmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup more commits">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_commit \"message one\" one one message-one &&\n"> <LIT_CHARS "\ttest_commit \"message two\" two two message-two &&\n"> <LIT_CHARS "\thead1=$(git rev-parse --verify --short HEAD~0) &&\n"> <LIT_CHARS "\thead2=$(git rev-parse --verify --short HEAD~1) &&\n"> <LIT_CHARS "\thead3=$(git rev-parse --verify --short HEAD~2) &&\n"> <LIT_CHARS "\thead4=$(git rev-parse --verify --short HEAD~3)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%<(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\tmessage two                            Z\n"> <LIT_CHARS "\tmessage one                            Z\n"> <LIT_CHARS "\tadd bar                                Z\n"> <LIT_CHARS "\t$(commit_msg)                    Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%<(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tmessage two                            Z\n"> <LIT_CHARS "\tmessage one                            Z\n"> <LIT_CHARS "\tadd bar                                Z\n"> <LIT_CHARS "\t$(commit_msg)                    Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting at the nth column">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%h %<|(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\t$head1 message two                    Z\n"> <LIT_CHARS "\t$head2 message one                    Z\n"> <LIT_CHARS "\t$head3 add bar                        Z\n"> <LIT_CHARS "\t$head4 $(commit_msg)            Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting at the nth column">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tCOLUMNS=50 git log --pretty=\"tformat:%h %<|(-10)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\t$head1 message two                    Z\n"> <LIT_CHARS "\t$head2 message one                    Z\n"> <LIT_CHARS "\t$head3 add bar                        Z\n"> <LIT_CHARS "\t$head4 $(commit_msg)            Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting at the nth column. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%h %<|(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\t$head1 message two                    Z\n"> <LIT_CHARS "\t$head2 message one                    Z\n"> <LIT_CHARS "\t$head3 add bar                        Z\n"> <LIT_CHARS "\t$head4 $(commit_msg)            Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with no padding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%<(1)%s\" >actual &&\n"> <LIT_CHARS "\tcat <<-EOF >expected &&\n"> <LIT_CHARS "\tmessage two\n"> <LIT_CHARS "\tmessage one\n"> <LIT_CHARS "\tadd bar\n"> <LIT_CHARS "\t$(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with no padding. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%<(1)%s\" >actual &&\n"> <LIT_CHARS "\tcat <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tmessage two\n"> <LIT_CHARS "\tmessage one\n"> <LIT_CHARS "\tadd bar\n"> <LIT_CHARS "\t$(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with trunc">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%<(10,trunc)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-\\EOF >expected &&\n"> <LIT_CHARS "\tmessage ..\n"> <LIT_CHARS "\tmessage ..\n"> <LIT_CHARS "\tadd bar  Z\n"> <LIT_CHARS "\tinitial...\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with trunc. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%<(10,trunc)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-\\EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tmessage ..\n"> <LIT_CHARS "\tmessage ..\n"> <LIT_CHARS "\tadd bar  Z\n"> <LIT_CHARS "\tinitial...\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with ltrunc">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%<(10,ltrunc)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\t..sage two\n"> <LIT_CHARS "\t..sage one\n"> <LIT_CHARS "\tadd bar  Z\n"> <LIT_CHARS "\t..${sample_utf8_part}lich\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with ltrunc. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%<(10,ltrunc)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\t..sage two\n"> <LIT_CHARS "\t..sage one\n"> <LIT_CHARS "\tadd bar  Z\n"> <LIT_CHARS "\t..${sample_utf8_part}lich\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with mtrunc">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%<(10,mtrunc)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-\\EOF >expected &&\n"> <LIT_CHARS "\tmess.. two\n"> <LIT_CHARS "\tmess.. one\n"> <LIT_CHARS "\tadd bar  Z\n"> <LIT_CHARS "\tinit..lich\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left alignment formatting with mtrunc. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%<(10,mtrunc)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-\\EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tmess.. two\n"> <LIT_CHARS "\tmess.. one\n"> <LIT_CHARS "\tadd bar  Z\n"> <LIT_CHARS "\tinit..lich\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%>(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\tZ                            message two\n"> <LIT_CHARS "\tZ                            message one\n"> <LIT_CHARS "\tZ                                add bar\n"> <LIT_CHARS "\tZ                    $(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%>(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tZ                            message two\n"> <LIT_CHARS "\tZ                            message one\n"> <LIT_CHARS "\tZ                                add bar\n"> <LIT_CHARS "\tZ                    $(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting at the nth column">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%h %>|(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\t$head1                      message two\n"> <LIT_CHARS "\t$head2                      message one\n"> <LIT_CHARS "\t$head3                          add bar\n"> <LIT_CHARS "\t$head4              $(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting at the nth column">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tCOLUMNS=50 git log --pretty=\"tformat:%h %>|(-10)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\t$head1                      message two\n"> <LIT_CHARS "\t$head2                      message one\n"> <LIT_CHARS "\t$head3                          add bar\n"> <LIT_CHARS "\t$head4              $(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting at the nth column. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%h %>|(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\t$head1                      message two\n"> <LIT_CHARS "\t$head2                      message one\n"> <LIT_CHARS "\t$head3                          add bar\n"> <LIT_CHARS "\t$head4              $(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting at the nth column with --graph. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --graph --pretty=\"tformat:%h %>|(40)%s\" >actual &&\n"> <LIT_CHARS "\ticonv -f utf-8 -t $test_encoding >expected <<-EOF &&\n"> <LIT_CHARS "\t* $head1                    message two\n"> <LIT_CHARS "\t* $head2                    message one\n"> <LIT_CHARS "\t* $head3                        add bar\n"> <LIT_CHARS "\t* $head4            $(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting with no padding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%>(1)%s\" >actual &&\n"> <LIT_CHARS "\tcat <<-EOF >expected &&\n"> <LIT_CHARS "\tmessage two\n"> <LIT_CHARS "\tmessage one\n"> <LIT_CHARS "\tadd bar\n"> <LIT_CHARS "\t$(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting with no padding and with --graph">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --graph --pretty=\"tformat:%>(1)%s\" >actual &&\n"> <LIT_CHARS "\tcat <<-EOF >expected &&\n"> <LIT_CHARS "\t* message two\n"> <LIT_CHARS "\t* message one\n"> <LIT_CHARS "\t* add bar\n"> <LIT_CHARS "\t* $(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "right alignment formatting with no padding. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%>(1)%s\" >actual &&\n"> <LIT_CHARS "\tcat <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tmessage two\n"> <LIT_CHARS "\tmessage one\n"> <LIT_CHARS "\tadd bar\n"> <LIT_CHARS "\t$(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "center alignment formatting">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%><(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\tZ             message two              Z\n"> <LIT_CHARS "\tZ             message one              Z\n"> <LIT_CHARS "\tZ               add bar                Z\n"> <LIT_CHARS "\tZ         $(commit_msg)          Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "center alignment formatting. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%><(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tZ             message two              Z\n"> <LIT_CHARS "\tZ             message one              Z\n"> <LIT_CHARS "\tZ               add bar                Z\n"> <LIT_CHARS "\tZ         $(commit_msg)          Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "center alignment formatting at the nth column">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%h %><|(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\t$head1           message two          Z\n"> <LIT_CHARS "\t$head2           message one          Z\n"> <LIT_CHARS "\t$head3             add bar            Z\n"> <LIT_CHARS "\t$head4       $(commit_msg)      Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "center alignment formatting at the nth column">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tCOLUMNS=70 git log --pretty=\"tformat:%h %><|(-30)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF >expected &&\n"> <LIT_CHARS "\t$head1           message two          Z\n"> <LIT_CHARS "\t$head2           message one          Z\n"> <LIT_CHARS "\t$head3             add bar            Z\n"> <LIT_CHARS "\t$head4       $(commit_msg)      Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "center alignment formatting at the nth column. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%h %><|(40)%s\" >actual &&\n"> <LIT_CHARS "\tqz_to_tab_space <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\t$head1           message two          Z\n"> <LIT_CHARS "\t$head2           message one          Z\n"> <LIT_CHARS "\t$head3             add bar            Z\n"> <LIT_CHARS "\t$head4       $(commit_msg)      Z\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "center alignment formatting with no padding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%><(1)%s\" >actual &&\n"> <LIT_CHARS "\tcat <<-EOF >expected &&\n"> <LIT_CHARS "\tmessage two\n"> <LIT_CHARS "\tmessage one\n"> <LIT_CHARS "\tadd bar\n"> <LIT_CHARS "\t$(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('old_head1', {[ComSub (Com {[LIT_CHARS git]} {[LIT_CHARS rev-parse]} {[LIT_CHARS --verify]} {[LIT_CHARS HEAD] [LIT_TILDE "~"] [LIT_CHARS 0]})]})])
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "center alignment formatting with no padding. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%><(1)%s\" >actual &&\n"> <LIT_CHARS "\tcat <<-EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tmessage two\n"> <LIT_CHARS "\tmessage one\n"> <LIT_CHARS "\tadd bar\n"> <LIT_CHARS "\t$(commit_msg)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left/right alignment formatting with stealing">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit commit --amend -m short --author \"long long long <long@me.com>\" &&\n"> <LIT_CHARS "\tgit log --pretty=\"tformat:%<(10,trunc)%s%>>(10,ltrunc)% an\" >actual &&\n"> <LIT_CHARS "\tcat <<-\\EOF >expected &&\n"> <LIT_CHARS "\tshort long  long long\n"> <LIT_CHARS "\tmessage ..   A U Thor\n"> <LIT_CHARS "\tadd bar      A U Thor\n"> <LIT_CHARS "\tinitial...   A U Thor\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "left/right alignment formatting with stealing. i18n.logOutputEncoding">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -c i18n.logOutputEncoding=$test_encoding log --pretty=\"tformat:%<(10,trunc)%s%>>(10,ltrunc)% an\" >actual &&\n"> <LIT_CHARS "\tcat <<-\\EOF | iconv -f utf-8 -t $test_encoding >expected &&\n"> <LIT_CHARS "\tshort long  long long\n"> <LIT_CHARS "\tmessage ..   A U Thor\n"> <LIT_CHARS "\tadd bar      A U Thor\n"> <LIT_CHARS "\tinitial...   A U Thor\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "strbuf_utf8_replace() not producing NUL">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --color --pretty=\"tformat:%<(10,trunc)%s%>>(10,ltrunc)%C(auto)%d\" |\n"> <LIT_CHARS "\t\ttest_decode_color |\n"> <LIT_CHARS "\t\tnul_to_q >actual &&\n"> <LIT_CHARS "\t! grep Q actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ISO and ISO-strict date formats display the same values">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --format=%ai%n%ci |\n"> <LIT_CHARS "\tsed -e \"s/ /T/; s/ //; s/..\\$/:&/\" >expected &&\n"> <LIT_CHARS "\tgit log --format=%aI%n%cI >actual &&\n"> <LIT_CHARS "\ttest_cmp expected actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "set up log decoration tests">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\thead1=$(git rev-parse --verify HEAD~0) &&\n"> <LIT_CHARS "\thead2=$(git rev-parse --verify HEAD~1)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "log decoration properly follows tag chain">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit tag -a tag1 -m tag1 &&\n"> <LIT_CHARS "\tgit tag -a tag2 -m tag2 tag1 &&\n"> <LIT_CHARS "\tgit tag -d tag1 &&\n"> <LIT_CHARS "\tgit commit --amend -m shorter &&\n"> <LIT_CHARS "\tgit log --no-walk --tags --pretty=\"%H %d\" --decorate=full >actual &&\n"> <LIT_CHARS "\tcat <<-EOF >expected &&\n"> <LIT_CHARS "\t$head1  (tag: refs/tags/tag2)\n"> <LIT_CHARS "\t$head2  (tag: refs/tags/message-one)\n"> <LIT_CHARS "\t$old_head1  (tag: refs/tags/message-two)\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tsort actual >actual1 &&\n"> <LIT_CHARS "\ttest_cmp expected actual1\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clean log decoration">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log --no-walk --tags --pretty=\"%H %D\" --decorate=full >actual &&\n"> <LIT_CHARS "\tcat >expected <<-EOF &&\n"> <LIT_CHARS "\t$head1 tag: refs/tags/tag2\n"> <LIT_CHARS "\t$head2 tag: refs/tags/message-one\n"> <LIT_CHARS "\t$old_head1 tag: refs/tags/message-two\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tsort actual >actual1 &&\n"> <LIT_CHARS "\ttest_cmp expected actual1\n">]})
  (Com {[LIT_CHARS test_done]})
)