(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(SQ <'Test am with auto.crlf'>)}
          spids: [4]
        )
      ]
    )
    (C {<.>} {<'./test-lib.sh'>})
    (command.Simple
      words: [{<cat>}]
      redirects: [
        (redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<patchfile>})
        (redir
          op: <Id.Redir_DLess '<<'>
          loc: (redir_loc.Fd fd:0)
          arg: 
            (redir_param.HereDoc
              here_begin: {(word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\E'>) <OF>}
              here_end_span_id: 41
              stdin_parts: [
                <'From 38be10072e45dd6b08ce40851e3fca60a31a340b Mon Sep 17 00:00:00 2001\n'>
                <'From: Marius Storm-Olsen <x@y.com>\n'>
                <'Date: Thu, 23 Aug 2007 13:00:00 +0200\n'>
                <'Subject: test1\n'>
                <'\n'>
                <'---\n'>
                <' foo | 1 +\n'>
                <' 1 files changed, 1 insertions(+), 0 deletions(-)\n'>
                <' create mode 100644 foo\n'>
                <'\n'>
                <'diff --git a/foo b/foo\n'>
                <'new file mode 100644\n'>
                <
'index 0000000000000000000000000000000000000000..5716ca5987cbf97d6bb54920bea6adde242d87e6\n'
                >
                <'--- /dev/null\n'>
                <'+++ b/foo\n'>
                <'@@ -0,0 +1 @@\n'>
                <'+bar\n'>
              ]
            )
        )
      ]
      do_fork: T
    )
    (C {<test_expect_success>} {(SQ <setup>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit config core.autocrlf true &&\n'> <'\techo foo >bar &&\n'> 
          <'\tgit add bar &&\n'> <'\ttest_tick &&\n'> <'\tgit commit -m initial\n'> <'\n'>
        )
      }
    )
    (C {<test_expect_success>} {(SQ <am>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit am -3 <patchfile &&\n'> 
          <'\tgit diff-files --name-status --exit-code\n'> <'\n'>
        )
      }
    )
    (C {<test_done>})
  ]
)