(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <"apply a patch that is larger than the preimage">)}
          spids: [4]
        )
      ]
      spids: [4]
    )
    (C {(.)} {(./test-lib.sh)})
    (SimpleCommand
      words: [{(cat)}]
      redirects: [
        (Redir op_id:Redir_Great fd:-1 arg_word:{(F)} spids:[17])
        (HereDoc
          op_id: Redir_DLess
          fd: -1
          body: 
            {("1\n") ("2\n") ("3\n") ("4\n") ("5\n") ("6\n") ("7\n") ("8\n") ("999999\n") ("A\n") ("B\n") 
              ("C\n") ("D\n") ("E\n") ("F\n") ("G\n") ("H\n") ("I\n") ("J\n") ("\n")
            }
          do_expansion: False
          here_end: EOF
          was_filled: True
          spids: [20]
        )
      ]
    )
    (C {(test_expect_success)} {(setup)} 
      {
        (SQ <"\n"> <"\n"> <"\tgit add F &&\n"> <"\tmv F G &&\n"> 
          <"\tsed -e \"s/1/11/\" -e \"s/999999/9/\" -e \"s/H/HH/\" <G >F &&\n"> <"\tgit diff >patch &&\n"> <"\tsed -e \"/^\\$/d\" <G >F &&\n"> <"\tgit add F\n"> <"\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"apply should fail gracefully">)} 
      {
        (SQ <"\n"> <"\n"> <"\tif git apply --index patch\n"> <"\tthen\n"> 
          <"\t\techo Oops, should not have succeeded\n"> <"\t\tfalse\n"> <"\telse\n"> <"\t\tstatus=$?\n"> <"\t\techo \"Status was $status\"\n"> 
          <"\t\tif test -f .git/index.lock\n"> <"\t\tthen\n"> <"\t\t\techo Oops, should not have crashed\n"> <"\t\t\tfalse\n"> <"\t\tfi\n"> <"\tfi\n">
        )
      }
    )
    (C {(test_done)})
  ]
)