(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(SQ (Token id:Id.Lit_Chars val:'git am with corrupt input' span_id:6))}
          spids: [4]
        )
      ]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(test_expect_success)} {(setup)} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:19) 
          (Token id:Id.Lit_Chars val:'\t# Note the missing "+++" line:\n' span_id:20) (Token id:Id.Lit_Chars val:'\tcat >bad-patch.diff <<-\\EOF &&\n' span_id:21) 
          (Token id:Id.Lit_Chars val:'\tFrom: A U Thor <au.thor@example.com>\n' span_id:22) (Token id:Id.Lit_Chars val:'\tdiff --git a/f b/f\n' span_id:23) 
          (Token id:Id.Lit_Chars val:'\tindex 7898192..6178079 100644\n' span_id:24) (Token id:Id.Lit_Chars val:'\t--- a/f\n' span_id:25) 
          (Token id:Id.Lit_Chars val:'\t@@ -1 +1 @@\n' span_id:26) (Token id:Id.Lit_Chars val:'\t-a\n' span_id:27) (Token id:Id.Lit_Chars val:'\t+b\n' span_id:28) 
          (Token id:Id.Lit_Chars val:'\tEOF\n' span_id:29) (Token id:Id.Lit_Chars val:'\n' span_id:30) (Token id:Id.Lit_Chars val:'\techo a >f &&\n' span_id:31) 
          (Token id:Id.Lit_Chars val:'\tgit add f &&\n' span_id:32) (Token id:Id.Lit_Chars val:'\ttest_tick &&\n' span_id:33) 
          (Token id:Id.Lit_Chars val:'\tgit commit -m initial\n' span_id:34)
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'try to apply corrupted patch' span_id:50))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:54) 
          (Token
            id: Id.Lit_Chars
            val: '\ttest_must_fail git am bad-patch.diff 2>actual\n'
            span_id: 55
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'compare diagnostic; ensure file is still here' span_id:62))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:66) 
          (Token
            id: Id.Lit_Chars
            val: 
'\techo "error: git diff header lacks filename information (line 4)" >expected &&\n'
            span_id: 67
          ) (Token id:Id.Lit_Chars val:'\ttest_path_is_file f &&\n' span_id:68) 
          (Token id:Id.Lit_Chars val:'\ttest_i18ncmp expected actual\n' span_id:69)
        )
      }
    )
    (C {(test_done)})
  ]
)