(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)}) ] )