(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git rev-list --pretty=format test">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (Com {[LIT_CHARS test_tick]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS setup>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "touch foo && git add foo && git commit -m \"added foo\" &&\n"> <LIT_CHARS "  echo changed >foo && git commit -a -m \"changed foo\"\n">]}  )
  (FunctionDef test_format []
    (List
      (Com {[LIT_CHARS cat]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS expect.] [VarSub 1]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "format "][VarSub 1]]} {[DQ [LIT_CHARS "\n"][LIT_CHARS "git rev-list --pretty=format:'"][VarSub 2][LIT_CHARS "' master >output."][VarSub 1][LIT_CHARS " &&\n"][LIT_CHARS "test_cmp expect."][VarSub 1][LIT_CHARS " output."][VarSub 1][LIT_CHARS "\n"]]}      )
    )
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS percent]} {[LIT_OTHER "%"] [LIT_OTHER "%"] [LIT_CHARS h]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "%h\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "%h\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS hash]} {[LIT_OTHER "%"] [LIT_CHARS H] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS h]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "131a310\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "86c75cf\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS tree]} {[LIT_OTHER "%"] [LIT_CHARS T] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS t]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "fe722612f26da5064c32ca3843aa154bdb0b08a0\n"] [LIT_CHARS "fe72261\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "4d5fcadc293a348e88f777dc0920f11e7d71441c\n"] [LIT_CHARS "4d5fcad\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS parents]} {[LIT_OTHER "%"] [LIT_CHARS P] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS p]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "86c75cf\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "\n"] [LIT_CHARS "\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS author]} {[LIT_OTHER "%"] [LIT_CHARS an] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS ae] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS ad] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS aD] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS at]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "A U Thor\n"] [LIT_CHARS "author@example.com\n"] [LIT_CHARS "Thu Apr 7 15:13:13 2005 -0700\n"] [LIT_CHARS "Thu, 7 Apr 2005 15:13:13 -0700\n"] [LIT_CHARS "1112911993\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "A U Thor\n"] [LIT_CHARS "author@example.com\n"] [LIT_CHARS "Thu Apr 7 15:13:13 2005 -0700\n"] [LIT_CHARS "Thu, 7 Apr 2005 15:13:13 -0700\n"] [LIT_CHARS "1112911993\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS committer]} {[LIT_OTHER "%"] [LIT_CHARS cn] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS ce] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS cd] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS cD] [LIT_OTHER "%"] [LIT_CHARS n] [LIT_OTHER "%"] [LIT_CHARS ct]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "C O Mitter\n"] [LIT_CHARS "committer@example.com\n"] [LIT_CHARS "Thu Apr 7 15:13:13 2005 -0700\n"] [LIT_CHARS "Thu, 7 Apr 2005 15:13:13 -0700\n"] [LIT_CHARS "1112911993\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "C O Mitter\n"] [LIT_CHARS "committer@example.com\n"] [LIT_CHARS "Thu Apr 7 15:13:13 2005 -0700\n"] [LIT_CHARS "Thu, 7 Apr 2005 15:13:13 -0700\n"] [LIT_CHARS "1112911993\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS encoding]} {[LIT_OTHER "%"] [LIT_CHARS e]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS subject]} {[LIT_OTHER "%"] [LIT_CHARS s]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "changed foo\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "added foo\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS body]} {[LIT_OTHER "%"] [LIT_CHARS b]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS raw-body]} {[LIT_OTHER "%"] [LIT_CHARS B]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "changed foo\n"] [LIT_CHARS "\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "added foo\n"] [LIT_CHARS "\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS colors]} {[LIT_OTHER "%"] [LIT_CHARS Credfoo] [LIT_OTHER "%"] [LIT_CHARS Cgreenbar] [LIT_OTHER "%"] [LIT_CHARS Cbluebaz] [LIT_OTHER "%"] [LIT_CHARS Cresetxyzzy]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "\u001b[31mfoo\u001b[32mbar\u001b[34mbaz\u001b[mxyzzy\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "\u001b[31mfoo\u001b[32mbar\u001b[34mbaz\u001b[mxyzzy\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS advanced-colors]} {[SQ <LIT_CHARS "%C(red yellow bold)foo%C(reset)">]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "\u001b[1;31;43mfoo\u001b[m\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "\u001b[1;31;43mfoo\u001b[m\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS commit-msg]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "Test printing of complex bodies\n"] [LIT_CHARS "\n"] [LIT_CHARS "This commit message is much longer than the others,\n"] [LIT_CHARS "and it will be encoded in iso8859-1. We should therefore\n"] [LIT_CHARS "include an iso8859 character: \u00a1bueno!\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup complex body">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "git config i18n.commitencoding iso8859-1 &&\n"> <LIT_CHARS "  echo change2 >foo && git commit -a -F commit-msg\n">]}  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS complex-encoding]} {[LIT_OTHER "%"] [LIT_CHARS e]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit f58db70b055c5718631e5c61528b28b12090cdea\n"] [LIT_CHARS "iso8859-1\n"] [LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS complex-subject]} {[LIT_OTHER "%"] [LIT_CHARS s]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit f58db70b055c5718631e5c61528b28b12090cdea\n"] [LIT_CHARS "Test printing of complex bodies\n"] [LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "changed foo\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"] [LIT_CHARS "added foo\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_format]} {[LIT_CHARS complex-body]} {[LIT_OTHER "%"] [LIT_CHARS b]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "commit f58db70b055c5718631e5c61528b28b12090cdea\n"] [LIT_CHARS "This commit message is much longer than the others,\n"] [LIT_CHARS "and it will be encoded in iso8859-1. We should therefore\n"] [LIT_CHARS "include an iso8859 character: \u00a1bueno!\n"] [LIT_CHARS "\n"] [LIT_CHARS "commit 131a310eb913d107dd3c09a65d1651175898735d\n"] [LIT_CHARS "commit 86c75cfd708a0e5868dc876ed5b8bb66c80b4873\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "%x00 shows NUL">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo  >expect commit f58db70b055c5718631e5c61528b28b12090cdea &&\n"> <LIT_CHARS "\techo >>expect fooQbar &&\n"> <LIT_CHARS "\tgit rev-list -1 --format=foo%x00bar HEAD >actual.nul &&\n"> <LIT_CHARS "\tnul_to_q <actual.nul >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "%ad respects --date=">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo 2005-04-07 >expect.ad-short &&\n"> <LIT_CHARS "\tgit log -1 --date=short --pretty=tformat:%ad >output.ad-short master &&\n"> <LIT_CHARS "\ttest_cmp expect.ad-short output.ad-short\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty email">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tC=$(GIT_AUTHOR_EMAIL= git commit-tree HEAD^{tree} </dev/null) &&\n"> <LIT_CHARS "\tA=$(git show --pretty=format:%an,%ae,%ad%n -s $C) &&\n"> <LIT_CHARS "\ttest \"$A\" = \"A U Thor,,Thu Apr 7 15:14:13 2005 -0700\" || {\n"> <LIT_CHARS "\t\techo \"Eh? $A\" >failure\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\t}\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "del LF before empty (1)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit show -s --pretty=format:\"%s%n%-b%nThanks%n\" HEAD^^ >actual &&\n"> <LIT_CHARS "\ttest_line_count = 2 actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "del LF before empty (2)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit show -s --pretty=format:\"%s%n%-b%nThanks%n\" HEAD >actual &&\n"> <LIT_CHARS "\ttest_line_count = 6 actual &&\n"> <LIT_CHARS "\tgrep \"^$\" actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add LF before non-empty (1)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit show -s --pretty=format:\"%s%+b%nThanks%n\" HEAD^^ >actual &&\n"> <LIT_CHARS "\ttest_line_count = 2 actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add LF before non-empty (2)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit show -s --pretty=format:\"%s%+b%nThanks%n\" HEAD >actual &&\n"> <LIT_CHARS "\ttest_line_count = 6 actual &&\n"> <LIT_CHARS "\tgrep \"^$\" actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add SP before non-empty (1)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit show -s --pretty=format:\"%s% bThanks\" HEAD^^ >actual &&\n"> <LIT_CHARS "\ttest $(wc -w <actual) = 2\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add SP before non-empty (2)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit show -s --pretty=format:\"%s% sThanks\" HEAD^^ >actual &&\n"> <LIT_CHARS "\ttest $(wc -w <actual) = 4\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS --abbrev>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo SHORT SHORT SHORT >expect2 &&\n"> <LIT_CHARS "\techo LONG LONG LONG >expect3 &&\n"> <LIT_CHARS "\tgit log -1 --format=\"%h %h %h\" HEAD >actual1 &&\n"> <LIT_CHARS "\tgit log -1 --abbrev=5 --format=\"%h %h %h\" HEAD >actual2 &&\n"> <LIT_CHARS "\tgit log -1 --abbrev=5 --format=\"%H %H %H\" HEAD >actual3 &&\n"> <LIT_CHARS "\tsed -e \"s/$_x40/LONG/g\" -e \"s/$_x05/SHORT/g\" <actual2 >fuzzy2 &&\n"> <LIT_CHARS "\tsed -e \"s/$_x40/LONG/g\" -e \"s/$_x05/SHORT/g\" <actual3 >fuzzy3 &&\n"> <LIT_CHARS "\ttest_cmp expect2 fuzzy2 &&\n"> <LIT_CHARS "\ttest_cmp expect3 fuzzy3 &&\n"> <LIT_CHARS "\t! test_cmp actual1 actual2\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "%H is not affected by --abbrev-commit">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log -1 --format=%H --abbrev-commit --abbrev=20 HEAD >actual &&\n"> <LIT_CHARS "\tlen=$(wc -c <actual) &&\n"> <LIT_CHARS "\ttest $len = 41\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "%h is not affected by --abbrev-commit">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit log -1 --format=%h --abbrev-commit --abbrev=20 HEAD >actual &&\n"> <LIT_CHARS "\tlen=$(wc -c <actual) &&\n"> <LIT_CHARS "\ttest $len = 21\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"%h %gD: %gs\" is same as git-reflog">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit reflog >expect &&\n"> <LIT_CHARS "\tgit log -g --format=\"%h %gD: %gs\" >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"%h %gD: %gs\" is same as git-reflog (with date)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit reflog --date=raw >expect &&\n"> <LIT_CHARS "\tgit log -g --format=\"%h %gD: %gs\" --date=raw >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "\"%h %gD: %gs\" is same as git-reflog (with --abbrev)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit reflog --abbrev=13 --date=raw >expect &&\n"> <LIT_CHARS "\tgit log -g --abbrev=13 --format=\"%h %gD: %gs\" --date=raw >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "%gd shortens ref name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"master@{0}\" >expect.gd-short &&\n"> <LIT_CHARS "\tgit log -g -1 --format=%gd refs/heads/master >actual.gd-short &&\n"> <LIT_CHARS "\ttest_cmp expect.gd-short actual.gd-short\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "reflog identity">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"C O Mitter:committer@example.com\" >expect &&\n"> <LIT_CHARS "\tgit log -g -1 --format=\"%gn:%ge\" >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "oneline with empty message">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit commit -m \"dummy\" --allow-empty &&\n"> <LIT_CHARS "\tgit commit -m \"dummy\" --allow-empty &&\n"> <LIT_CHARS "\tgit filter-branch --msg-filter \"sed -e s/dummy//\" HEAD^^.. &&\n"> <LIT_CHARS "\tgit rev-list --oneline HEAD >test.txt &&\n"> <LIT_CHARS "\ttest_line_count = 5 test.txt &&\n"> <LIT_CHARS "\tgit rev-list --oneline --graph HEAD >testg.txt &&\n"> <LIT_CHARS "\ttest_line_count = 5 testg.txt\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "single-character name is parsed correctly">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit commit --author=\"a <a@example.com>\" --allow-empty -m foo &&\n"> <LIT_CHARS "\techo \"a <a@example.com>\" >expect &&\n"> <LIT_CHARS "\tgit log -1 --format=\"%an <%ae>\" >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)