(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "Test mode change diffs.\n"> <LIT_CHARS "\n">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('sed_script', {[SQ <LIT_CHARS "s/\\(:100644 100755\\) \\(">] [DQ [VarSub _x40]] [SQ <LIT_CHARS "\\) \\2 /\\1 X X /">]})])
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS setup>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo frotz >rezrov &&\n"> <LIT_CHARS "\tgit update-index --add rezrov &&\n"> <LIT_CHARS "\ttree=`git write-tree` &&\n"> <LIT_CHARS "\techo $tree\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS chmod>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_chmod +x rezrov &&\n"> <LIT_CHARS "\tgit diff-index $tree >current &&\n"> <LIT_CHARS "\tsed -e \"$sed_script\" <current >check &&\n"> <LIT_CHARS "\techo \":100644 100755 X X M\trezrov\" >expected &&\n"> <LIT_CHARS "\ttest_cmp expected check\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "prepare binary file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit commit -m rezrov &&\n"> <LIT_CHARS "\tprintf \"\\00\\01\\02\\03\\04\\05\\06\" >binbin &&\n"> <LIT_CHARS "\tgit add binbin &&\n"> <LIT_CHARS "\tgit commit -m binbin\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--stat output after text chmod">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_chmod -x rezrov &&\n"> <LIT_CHARS "\techo \" 0 files changed\" >expect &&\n"> <LIT_CHARS "\tgit diff HEAD --stat >actual &&\n"> <LIT_CHARS "\ttest_i18ncmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--shortstat output after text chmod">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit diff HEAD --shortstat >actual &&\n"> <LIT_CHARS "\ttest_i18ncmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--stat output after binary chmod">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_chmod +x binbin &&\n"> <LIT_CHARS "\techo \" 0 files changed\" >expect &&\n"> <LIT_CHARS "\tgit diff HEAD --stat >actual &&\n"> <LIT_CHARS "\ttest_i18ncmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--shortstat output after binary chmod">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit diff HEAD --shortstat >actual &&\n"> <LIT_CHARS "\ttest_i18ncmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)