(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(SQ <'format-patch -s should force MIME encoding as needed'>)}
          spids: [4]
        )
      ]
    )
    (C {<.>} {<'./test-lib.sh'>})
    (C {<test_expect_success>} {<setup>} 
      {
        (SQ <'\n'> <'\n'> <'\t>F &&\n'> <'\tgit add F &&\n'> <'\tgit commit -m initial &&\n'> 
          <'\techo new line >F &&\n'> <'\n'> <'\ttest_tick &&\n'> <'\tgit commit -m "This adds some lines to F" F\n'> <'\n'>
        )
      }
    )
    (C {<test_expect_success>} {(SQ <'format normally'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit format-patch --stdout -1 >output &&\n'> 
          <'\t! grep Content-Type output\n'> <'\n'>
        )
      }
    )
    (C {<test_expect_success>} {(SQ <'format with signoff without funny signer name'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit format-patch -s --stdout -1 >output &&\n'> 
          <'\t! grep Content-Type output\n'> <'\n'>
        )
      }
    )
    (C {<test_expect_success>} {(SQ <'format with non ASCII signer name'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tGIT_COMMITTER_NAME="はまの ふにおう" \\\n'> 
          <'\tgit format-patch -s --stdout -1 >output &&\n'> <'\tgrep Content-Type output\n'> <'\n'>
        )
      }
    )
    (C {<test_expect_success>} {(SQ <'attach and signoff do not duplicate mime headers'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tGIT_COMMITTER_NAME="はまの ふにおう" \\\n'> 
          <'\tgit format-patch -s --stdout -1 --attach >output &&\n'> <'\ttest $(grep -ci ^MIME-Version: output) = 1\n'> <'\n'>
        )
      }
    )
    (C {<test_done>})
  ]
)