(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "core.whitespace rules and git apply">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (FunctionDef prepare_test_file []
    (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "s/_/ /g"]]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "s/>/\t/"]]}
      <
      (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "An_SP in an ordinary line>and a HT.\n"] [LIT_CHARS ">A HT (%).\n"] [LIT_CHARS "_>A SP and a HT (@%).\n"] [LIT_CHARS "_>_A SP, a HT and a SP (@%).\n"] [LIT_CHARS "_______Seven SP.\n"] [LIT_CHARS "________Eight SP (#).\n"] [LIT_CHARS "_______>Seven SP and a HT (@%).\n"] [LIT_CHARS "________>Eight SP and a HT (@#%).\n"] [LIT_CHARS "_______>_Seven SP, a HT and a SP (@%).\n"] [LIT_CHARS "________>_Eight SP, a HT and a SP (@#%).\n"] [LIT_CHARS "_______________Fifteen SP (#).\n"] [LIT_CHARS "_______________>Fifteen SP and a HT (@#%).\n"] [LIT_CHARS "________________Sixteen SP (#=).\n"] [LIT_CHARS "________________>Sixteen SP and a HT (@#%=).\n"] [LIT_CHARS "_____a__Five SP, a non WS, two SP.\n"] [LIT_CHARS "A line with a (!) trailing SP_\n"] [LIT_CHARS "A line with a (!) trailing HT>\n"]} <REDIR_DLESSDASH "<<-"> 0),
      >
    )
  )
  (FunctionDef apply_patch []
    (AndOr OP_AND_IF
      (Com 
        <
        (FilenameRedirectNode filename={[LIT_CHARS target]} <REDIR_GREAT ">"> 1),
        >
      )
      (Pipeline
        (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "s|"][\ LIT_ESCAPED_CHAR "\\("][LIT_CHARS "[ab]"][\ LIT_ESCAPED_CHAR "\\)"][LIT_CHARS "/file|"][\ LIT_ESCAPED_CHAR "\\1"][LIT_CHARS "/target|"]]}
          <
          (FilenameRedirectNode filename={[LIT_CHARS patch]} <REDIR_LESS "<"> 0),
          >
        )
        (Com {[LIT_CHARS git]} {[LIT_CHARS apply]} {[DQ [VarSub @]]})
      )
    )
  )
  (FunctionDef test_fix []
    (List
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS apply_patch]} {[LIT_CHARS --whitespace] [LIT_OTHER "="] [LIT_CHARS fix]})
        (Com {[LIT_CHARS return]} {[LIT_CHARS 1]})
      )
      (Pipeline
        (Com {[VarSub DIFF]} {[LIT_CHARS file]} {[LIT_CHARS target]})
        (Com {[LIT_CHARS sed]} {[LIT_CHARS -n]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "s/^> //p"]]}
          <
          (FilenameRedirectNode filename={[LIT_CHARS fixed]} <REDIR_GREAT ">"> 1),
          >
        )
      )
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('fixed_cnt', {[ComSub (Com redirects=[(FilenameRedirectNode filename={[LIT_CHARS fixed]} <REDIR_LESS "<"> 0)]{[LIT_CHARS wc]} {[LIT_CHARS -l]})]})])
      (Case to_match={[DQ [VarSub 1]]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "?"] [LIT_OTHER "*"]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('expect_cnt', {[VarSub fixed_cnt]})])
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('expect_cnt', {[ComSub (Pipeline (Com redirects=[(FilenameRedirectNode filename={[LIT_CHARS fixed]} <REDIR_LESS "<"> 0)]{[LIT_CHARS grep]} {[DQ [LIT_CHARS "["][VarSub 1][LIT_CHARS "]"]]}) (Com {[LIT_CHARS wc]} {[LIT_CHARS -l]}) )]})])
      )
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS test]} {[VarSub fixed_cnt]} {[LIT_CHARS -eq]} {[VarSub expect_cnt]})
        (Com {[LIT_CHARS return]} {[LIT_CHARS 1]})
      )
      (Case to_match={[DQ [VarSub 1]]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "?"] [LIT_OTHER "*"]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('expect_cnt', {[LIT_CHARS 0]})])
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('expect_cnt', {[ComSub (Pipeline (Com redirects=[(FilenameRedirectNode filename={[LIT_CHARS file]} <REDIR_LESS "<"> 0)]{[LIT_CHARS grep]} {[DQ [LIT_CHARS "["][VarSub 1][LIT_CHARS "]"]]}) (Com {[LIT_CHARS wc]} {[LIT_CHARS -l]}) )]})])
      )
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS test]} {[VarSub fixed_cnt]} {[LIT_CHARS -eq]} {[VarSub expect_cnt]})
        (Com {[LIT_CHARS return]} {[LIT_CHARS 1]})
      )
      (Com {[LIT_CHARS git]} {[LIT_CHARS diff-files]} {[LIT_CHARS -p]} {[LIT_CHARS target]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS fixed-patch]} <REDIR_GREAT ">"> 1),
        >
      )
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS test]} {[LIT_CHARS -s]} {[LIT_CHARS fixed-patch]})
        (Com {[LIT_CHARS return]} {[LIT_CHARS 0]})
      )
      (Com 
        <
        (FilenameRedirectNode filename={[LIT_CHARS target]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS git]} {[LIT_CHARS apply]} {[LIT_CHARS --whitespace] [LIT_OTHER "="] [LIT_CHARS error-all]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS fixed-patch]} <REDIR_LESS "<"> 0),
        >
      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t>file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tprepare_test_file >file &&\n"> <LIT_CHARS "\tgit diff-files -p >patch &&\n"> <LIT_CHARS "\t>target &&\n"> <LIT_CHARS "\tgit add target\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "whitespace=nowarn, default rule">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tapply_patch --whitespace=nowarn &&\n"> <LIT_CHARS "\ttest_cmp file target\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "whitespace=warn, default rule">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tapply_patch --whitespace=warn &&\n"> <LIT_CHARS "\ttest_cmp file target\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "whitespace=error-all, default rule">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail apply_patch --whitespace=error-all &&\n"> <LIT_CHARS "\t! test -s target\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "whitespace=error-all, no rule">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config core.whitespace -trailing,-space-before,-indent &&\n"> <LIT_CHARS "\tapply_patch --whitespace=error-all &&\n"> <LIT_CHARS "\ttest_cmp file target\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "whitespace=error-all, no rule (attribute)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --unset core.whitespace &&\n"> <LIT_CHARS "\techo \"target -whitespace\" >.gitattributes &&\n"> <LIT_CHARS "\tapply_patch --whitespace=error-all &&\n"> <LIT_CHARS "\ttest_cmp file target\n"> <LIT_CHARS "\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "spaces inserted by tab-in-indent">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config core.whitespace -trailing,-space,-indent,tab &&\n"> <LIT_CHARS "\trm -f .gitattributes &&\n"> <LIT_CHARS "\ttest_fix % &&\n"> <LIT_CHARS "\tsed -e \"s/_/ /g\" -e \"s/>/\t/\" <<-\\EOF >expect &&\n"> <LIT_CHARS "\t\tAn_SP in an ordinary line>and a HT.\n"> <LIT_CHARS "\t\t________A HT (%).\n"> <LIT_CHARS "\t\t________A SP and a HT (@%).\n"> <LIT_CHARS "\t\t_________A SP, a HT and a SP (@%).\n"> <LIT_CHARS "\t\t_______Seven SP.\n"> <LIT_CHARS "\t\t________Eight SP (#).\n"> <LIT_CHARS "\t\t________Seven SP and a HT (@%).\n"> <LIT_CHARS "\t\t________________Eight SP and a HT (@#%).\n"> <LIT_CHARS "\t\t_________Seven SP, a HT and a SP (@%).\n"> <LIT_CHARS "\t\t_________________Eight SP, a HT and a SP (@#%).\n"> <LIT_CHARS "\t\t_______________Fifteen SP (#).\n"> <LIT_CHARS "\t\t________________Fifteen SP and a HT (@#%).\n"> <LIT_CHARS "\t\t________________Sixteen SP (#=).\n"> <LIT_CHARS "\t\t________________________Sixteen SP and a HT (@#%=).\n"> <LIT_CHARS "\t\t_____a__Five SP, a non WS, two SP.\n"> <LIT_CHARS "\t\tA line with a (!) trailing SP_\n"> <LIT_CHARS "\t\tA line with a (!) trailing HT>\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_cmp expect target\n"> <LIT_CHARS "\n">]})
  (For t [{[LIT_CHARS -]}, {[SQ ]}])
    (List
      (Case to_match={[DQ [VarSub t]]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('tt', {[SQ <LIT_CHARS "!">]})])
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('tt', {[SQ ]})])
      )
      (For s [{[LIT_CHARS -]}, {[SQ ]}])
        (List
          (Case to_match={[DQ [VarSub s]]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
            (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('ts', {[SQ <LIT_CHARS "@">]})])
            (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('ts', {[SQ ]})])
          )
          (For i [{[LIT_CHARS -]}, {[SQ ]}])
            (List
              (Case to_match={[DQ [VarSub i]]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
                (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('ti', {[SQ <LIT_CHARS "#">]}), ('ti16', {[SQ <LIT_CHARS "=">]})])
                (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('ti', {[SQ ]}), ('ti16', {[SQ ]})])
              )
              (For h [{[LIT_CHARS -]}, {[SQ ]}])
                (List
                  (AndOr OP_AND_IF
                    (Com {[LIT_OTHER "["]} {[LIT_CHARS -z]} {[DQ [VarSub h][VarSub i]]} {[LIT_OTHER "]"]})
                    (Com {[LIT_CHARS continue]})
                  )
                  (Case to_match={[DQ [VarSub h]]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
                    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('th', {[SQ <LIT_CHARS "%">]})])
                    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('th', {[SQ ]})])
                  )
                  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('rule', {[VarSub t] [LIT_CHARS trailing] [LIT_COMMA ","] [VarSub s] [LIT_CHARS space] [LIT_COMMA ","] [VarSub i] [LIT_CHARS indent] [LIT_COMMA ","] [VarSub h] [LIT_CHARS tab]})])
                  (Com {[LIT_CHARS rm]} {[LIT_CHARS -f]} {[LIT_CHARS .gitattributes]})
                  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "rule="][VarSub rule]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\t\t\t\tgit config core.whitespace \"$rule\" &&\n"> <LIT_CHARS "\t\t\t\t\ttest_fix \"$tt$ts$ti$th\"\n"> <LIT_CHARS "\t\t\t\t">]})
                  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "rule="][VarSub rule][LIT_CHARS ",tabwidth=16"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\t\t\t\tgit config core.whitespace \"$rule,tabwidth=16\" &&\n"> <LIT_CHARS "\t\t\t\t\ttest_fix \"$tt$ts$ti16$th\"\n"> <LIT_CHARS "\t\t\t\t">]})
                  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "rule="][VarSub rule][LIT_CHARS " (attributes)"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\t\t\t\tgit config --unset core.whitespace &&\n"> <LIT_CHARS "\t\t\t\t\techo \"target whitespace=$rule\" >.gitattributes &&\n"> <LIT_CHARS "\t\t\t\t\ttest_fix \"$tt$ts$ti$th\"\n"> <LIT_CHARS "\t\t\t\t">]})
                  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "rule="][VarSub rule][LIT_CHARS ",tabwidth=16 (attributes)"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\t\t\t\techo \"target whitespace=$rule,tabwidth=16\" >.gitattributes &&\n"> <LIT_CHARS "\t\t\t\t\ttest_fix \"$tt$ts$ti16$th\"\n"> <LIT_CHARS "\t\t\t\t">]})
                )
              )
            )
          )
        )
      )
    )
  )
  (FunctionDef create_patch []
    (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "s/_/ /"]]}
      <
      (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "diff --git a/target b/target\n"] [LIT_CHARS "index e69de29..8bd6648 100644\n"] [LIT_CHARS "--- a/target\n"] [LIT_CHARS "+++ b/target\n"] [LIT_CHARS "@@ -0,0 +1,3 @@\n"] [LIT_CHARS "+An empty line follows\n"] [LIT_CHARS "+\n"] [LIT_CHARS "+A line with trailing whitespace and no newline_\n"] [LIT_CHARS "\\ No newline at end of file\n"]} <REDIR_DLESSDASH "<<-"> 0),
      >
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "trailing whitespace & no newline at the end of file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t>target &&\n"> <LIT_CHARS "\tcreate_patch >patch-file &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch-file &&\n"> <LIT_CHARS "\tgrep \"newline$\" target &&\n"> <LIT_CHARS "\tgrep \"^$\" target\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "blank at EOF with --whitespace=fix (1)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_might_fail git config --unset core.whitespace &&\n"> <LIT_CHARS "\trm -f .gitattributes &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >expect &&\n"> <LIT_CHARS "\t{ cat expect; echo; } >one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp expect one\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "blank at EOF with --whitespace=fix (2)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\t{ echo a; echo c; } >expect &&\n"> <LIT_CHARS "\t{ cat expect; echo; echo; } >one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp expect one\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "blank at EOF with --whitespace=fix (3)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\t{ echo a; echo c; echo; } >expect &&\n"> <LIT_CHARS "\t{ cat expect; echo; echo; } >one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp expect one\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "blank at end of hunk, not at EOF with --whitespace=fix">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo; echo; echo; echo; echo; echo d; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\t{ echo a; echo c; echo; echo; echo; echo; echo; echo; echo d; } >expect &&\n"> <LIT_CHARS "\tcp expect one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp expect one\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "blank at EOF with --whitespace=warn">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo >>one &&\n"> <LIT_CHARS "\tcat one >expect &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\tgit apply --whitespace=warn patch 2>error &&\n"> <LIT_CHARS "\ttest_cmp expect one &&\n"> <LIT_CHARS "\tgrep \"new blank line at EOF\" error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "blank at EOF with --whitespace=error">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\tcat one >expect &&\n"> <LIT_CHARS "\techo >>one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\ttest_must_fail git apply --whitespace=error patch 2>error &&\n"> <LIT_CHARS "\ttest_cmp expect one &&\n"> <LIT_CHARS "\tgrep \"new blank line at EOF\" error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "blank but not empty at EOF">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo \"   \" >>one &&\n"> <LIT_CHARS "\tcat one >expect &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\tgit apply --whitespace=warn patch 2>error &&\n"> <LIT_CHARS "\ttest_cmp expect one &&\n"> <LIT_CHARS "\tgrep \"new blank line at EOF\" error\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "applying beyond EOF requires one non-blank context line">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo; echo; echo; echo; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\t{ echo b; } >>one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout one &&\n"> <LIT_CHARS "\t{ echo a; echo; } >one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\ttest_must_fail git apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect &&\n"> <LIT_CHARS "\ttest_must_fail git apply --ignore-space-change --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "tons of blanks at EOF should not apply">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tfor i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16; do\n"> <LIT_CHARS "\t\techo; echo; echo; echo;\n"> <LIT_CHARS "\tdone >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo a >>one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t>one &&\n"> <LIT_CHARS "\ttest_must_fail git apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_must_fail git apply --ignore-space-change --whitespace=fix patch\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "missing blank line at end with --whitespace=fix">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo a >one &&\n"> <LIT_CHARS "\techo >>one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo b >>one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\techo a >one &&\n"> <LIT_CHARS "\tcp one saved-one &&\n"> <LIT_CHARS "\ttest_must_fail git apply patch &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect &&\n"> <LIT_CHARS "\tmv saved-one one &&\n"> <LIT_CHARS "\tgit apply --ignore-space-change --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "two missing blank lines at end with --whitespace=fix">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tcp one no-blank-lines &&\n"> <LIT_CHARS "\t{ echo; echo; } >>one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo d >>one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\techo >>one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\tcp no-blank-lines one &&\n"> <LIT_CHARS "\ttest_must_fail git apply patch &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect &&\n"> <LIT_CHARS "\tmv no-blank-lines one &&\n"> <LIT_CHARS "\ttest_must_fail git apply patch &&\n"> <LIT_CHARS "\tgit apply --ignore-space-change --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "missing blank line at end, insert before end, --whitespace=fix">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\t{ echo b; echo a; echo; } >one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\techo a >one &&\n"> <LIT_CHARS "\ttest_must_fail git apply patch &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "shrink file with tons of missing blanks at end of file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tcp one no-blank-lines &&\n"> <LIT_CHARS "\tfor i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16; do\n"> <LIT_CHARS "\t\techo; echo; echo; echo;\n"> <LIT_CHARS "\tdone >>one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo a >one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\tcp no-blank-lines one &&\n"> <LIT_CHARS "\ttest_must_fail git apply patch &&\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect &&\n"> <LIT_CHARS "\tmv no-blank-lines one &&\n"> <LIT_CHARS "\tgit apply --ignore-space-change --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "missing blanks at EOF must only match blank lines">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t{ echo a; echo b; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\t{ echo c; echo d; } >>one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\techo a >one &&\n"> <LIT_CHARS "\ttest_must_fail git apply patch &&\n"> <LIT_CHARS "\ttest_must_fail git apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_must_fail git apply --ignore-space-change --whitespace=fix patch\n">]})
  (Com {[LIT_CHARS sed]} {[LIT_CHARS -e] [SQ <LIT_CHARS s/Z//>]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS one]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "a\n"][LIT_CHARS "b\n"][LIT_CHARS "c\n"][LIT_CHARS "\t\t      Z\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "missing blank line should match context line with spaces">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo d >>one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\t{ echo; echo d; } >>expect &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit apply --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS sed]} {[LIT_CHARS -e] [SQ <LIT_CHARS s/Z//>]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS one]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "a\n"][LIT_CHARS "b\n"][LIT_CHARS "c\n"][LIT_CHARS "\t\t      Z\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "same, but with the --ignore-space-option">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\techo d >>one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\t{ echo a; echo b; echo c; } >one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout-index -f one &&\n"> <LIT_CHARS "\tgit apply --ignore-space-change --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "same, but with CR-LF line endings && cr-at-eol set">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config core.whitespace cr-at-eol &&\n"> <LIT_CHARS "\tprintf \"a\\r\\n\" >one &&\n"> <LIT_CHARS "\tprintf \"b\\r\\n\" >>one &&\n"> <LIT_CHARS "\tprintf \"c\\r\\n\" >>one &&\n"> <LIT_CHARS "\tcp one save-one &&\n"> <LIT_CHARS "\tprintf \"                 \\r\\n\" >>one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\tprintf \"d\\r\\n\" >>one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\tmv save-one one &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit apply --ignore-space-change --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "same, but with CR-LF line endings && cr-at-eol unset">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --unset core.whitespace &&\n"> <LIT_CHARS "\tprintf \"a\\r\\n\" >one &&\n"> <LIT_CHARS "\tprintf \"b\\r\\n\" >>one &&\n"> <LIT_CHARS "\tprintf \"c\\r\\n\" >>one &&\n"> <LIT_CHARS "\tcp one save-one &&\n"> <LIT_CHARS "\tprintf \"                 \\r\\n\" >>one &&\n"> <LIT_CHARS "\tgit add one &&\n"> <LIT_CHARS "\tcp one expect &&\n"> <LIT_CHARS "\tprintf \"d\\r\\n\" >>one &&\n"> <LIT_CHARS "\tgit diff -- one >patch &&\n"> <LIT_CHARS "\tmv save-one one &&\n"> <LIT_CHARS "\techo d >>expect &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit apply --ignore-space-change --whitespace=fix patch &&\n"> <LIT_CHARS "\ttest_cmp one expect\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "whitespace=fix to expand">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tqz_to_tab_space >preimage <<-\\EOF &&\n"> <LIT_CHARS "\tQQa\n"> <LIT_CHARS "\tQQb\n"> <LIT_CHARS "\tQQc\n"> <LIT_CHARS "\tZZZZZZZZZZZZZZZZd\n"> <LIT_CHARS "\tQQe\n"> <LIT_CHARS "\tQQf\n"> <LIT_CHARS "\tQQg\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tqz_to_tab_space >patch <<-\\EOF &&\n"> <LIT_CHARS "\tdiff --git a/preimage b/preimage\n"> <LIT_CHARS "\t--- a/preimage\n"> <LIT_CHARS "\t+++ b/preimage\n"> <LIT_CHARS "\t@@ -1,7 +1,6 @@\n"> <LIT_CHARS "\t QQa\n"> <LIT_CHARS "\t QQb\n"> <LIT_CHARS "\t QQc\n"> <LIT_CHARS "\t-QQd\n"> <LIT_CHARS "\t QQe\n"> <LIT_CHARS "\t QQf\n"> <LIT_CHARS "\t QQg\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\tgit -c core.whitespace=tab-in-indent apply --whitespace=fix patch\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "whitespace check skipped for excluded paths">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config core.whitespace blank-at-eol &&\n"> <LIT_CHARS "\t>used &&\n"> <LIT_CHARS "\t>unused &&\n"> <LIT_CHARS "\tgit add used unused &&\n"> <LIT_CHARS "\techo \"used\" >used &&\n"> <LIT_CHARS "\techo \"unused \" >unused &&\n"> <LIT_CHARS "\tgit diff-files -p used unused >patch &&\n"> <LIT_CHARS "\tgit apply --include=used --stat --whitespace=error <patch\n">]})
  (Com {[LIT_CHARS test_done]})
)