(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git apply boundary tests\n"> <LIT_CHARS "\n">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('L', {[DQ [LIT_CHARS "c d e f g h i j k l m n o p q r s t u v w x"]]})])
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tfor i in b ">] [DQ [VarSub L]] [SQ <LIT_CHARS " y\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >original &&\n"> <LIT_CHARS "\tgit update-index --add victim &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# add to the head\n"> <LIT_CHARS "\tfor i in a b ">] [DQ [VarSub L]] [SQ <LIT_CHARS " y\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >add-a-expect &&\n"> <LIT_CHARS "\tgit diff victim >add-a-patch.with &&\n"> <LIT_CHARS "\tgit diff --unified=0 >add-a-patch.without &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# insert at line two\n"> <LIT_CHARS "\tfor i in b a ">] [DQ [VarSub L]] [SQ <LIT_CHARS " y\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >insert-a-expect &&\n"> <LIT_CHARS "\tgit diff victim >insert-a-patch.with &&\n"> <LIT_CHARS "\tgit diff --unified=0 >insert-a-patch.without &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# modify at the head\n"> <LIT_CHARS "\tfor i in a ">] [DQ [VarSub L]] [SQ <LIT_CHARS " y\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >mod-a-expect &&\n"> <LIT_CHARS "\tgit diff victim >mod-a-patch.with &&\n"> <LIT_CHARS "\tgit diff --unified=0 >mod-a-patch.without &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# remove from the head\n"> <LIT_CHARS "\tfor i in ">] [DQ [VarSub L]] [SQ <LIT_CHARS " y\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >del-a-expect &&\n"> <LIT_CHARS "\tgit diff victim >del-a-patch.with &&\n"> <LIT_CHARS "\tgit diff --unified=0 >del-a-patch.without &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# add to the tail\n"> <LIT_CHARS "\tfor i in b ">] [DQ [VarSub L]] [SQ <LIT_CHARS " y z\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >add-z-expect &&\n"> <LIT_CHARS "\tgit diff victim >add-z-patch.with &&\n"> <LIT_CHARS "\tgit diff --unified=0 >add-z-patch.without &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# modify at the tail\n"> <LIT_CHARS "\tfor i in b ">] [DQ [VarSub L]] [SQ <LIT_CHARS " z\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >mod-z-expect &&\n"> <LIT_CHARS "\tgit diff victim >mod-z-patch.with &&\n"> <LIT_CHARS "\tgit diff --unified=0 >mod-z-patch.without &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# remove from the tail\n"> <LIT_CHARS "\tfor i in b ">] [DQ [VarSub L]] [SQ <LIT_CHARS "\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\techo $i\n"> <LIT_CHARS "\tdone >victim &&\n"> <LIT_CHARS "\tcat victim >del-z-expect &&\n"> <LIT_CHARS "\tgit diff victim >del-z-patch.with &&\n"> <LIT_CHARS "\tgit diff --unified=0 >del-z-patch.without\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# done\n">]})
  (For with [{[LIT_CHARS with]}, {[LIT_CHARS without]}])
    (List
      (Case to_match={[DQ [VarSub with]]}, pat_word_list=[[{[LIT_CHARS with]}], [{[LIT_CHARS without]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('u', {[SQ ]})])
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('u', {[SQ <LIT_CHARS "--unidiff-zero ">]})])
      )
      (For kind [{[LIT_CHARS add-a]}, {[LIT_CHARS add-z]}, {[LIT_CHARS insert-a]}, {[LIT_CHARS mod-a]}, {[LIT_CHARS mod-z]}, {[LIT_CHARS del-a]}, {[LIT_CHARS del-z]}])
        (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "apply "][VarSub kind][LIT_CHARS "-patch "][VarSub with][LIT_CHARS " context"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\t\tcat original >victim &&\n"> <LIT_CHARS "\t\t\tgit update-index victim &&\n"> <LIT_CHARS "\t\t\tgit apply --index ">] [DQ [VarSub u][VarSub kind][LIT_CHARS -patch.][VarSub with]] [SQ <LIT_CHARS " &&\n"> <LIT_CHARS "\t\t\ttest_cmp ">] [DQ [VarSub kind]] [SQ <LIT_CHARS "-expect victim\n"> <LIT_CHARS "\t\t">]})
      )
    )
  )
  (For kind [{[LIT_CHARS add-a]}, {[LIT_CHARS add-z]}, {[LIT_CHARS insert-a]}, {[LIT_CHARS mod-a]}, {[LIT_CHARS mod-z]}, {[LIT_CHARS del-a]}, {[LIT_CHARS del-z]}])
    (List
      (Com {[LIT_CHARS rm]} {[LIT_CHARS -f]} {[VarSub kind] [LIT_CHARS -ng.without]})
      (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "s/^diff --git /diff /"]]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "/^index /d">]}
        <
        (FilenameRedirectNode filename={[VarSub kind] [LIT_CHARS -patch.without]} <REDIR_LESS "<"> 0),
        (FilenameRedirectNode filename={[VarSub kind] [LIT_CHARS -ng.without]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "apply non-git "][VarSub kind][LIT_CHARS "-patch without context"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\tcat original >victim &&\n"> <LIT_CHARS "\t\tgit update-index victim &&\n"> <LIT_CHARS "\t\tgit apply --unidiff-zero --index ">] [DQ [VarSub kind][LIT_CHARS -ng.without]] [SQ <LIT_CHARS " &&\n"> <LIT_CHARS "\t\ttest_cmp ">] [DQ [VarSub kind]] [SQ <LIT_CHARS "-expect victim\n"> <LIT_CHARS "\t">]})
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "two lines">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t>file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\techo aaa >file &&\n"> <LIT_CHARS "\tgit diff >patch &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\techo bbb >file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\ttest_must_fail git apply --check patch\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "apply patch with 3 context lines matching at end">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; echo d; } >file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\techo e >>file &&\n"> <LIT_CHARS "\tgit diff >patch &&\n"> <LIT_CHARS "\t>file &&\n"> <LIT_CHARS "\ttest_must_fail git apply patch\n">]})
  (Com {[LIT_CHARS test_done]})
)