(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git svn refuses to dcommit non-UTF8 messages">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./lib-git-svn.sh]})
  (For H [{[LIT_CHARS ISO8859-1]}, {[LIT_CHARS eucJP]}])
    (Com {[LIT_CHARS test_expect_success]} {[DQ [VarSub H][LIT_CHARS " setup"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\tmkdir $H &&\n"> <LIT_CHARS "\t\tsvn_cmd import -m \"$H test\" $H \"$svnrepo\"/$H &&\n"> <LIT_CHARS "\t\tgit svn clone \"$svnrepo\"/$H $H\n"> <LIT_CHARS "\t">]})
  )
  (For H [{[LIT_CHARS ISO8859-1]}, {[LIT_CHARS eucJP]}])
    (Com {[LIT_CHARS test_expect_success]} {[DQ [VarSub H][LIT_CHARS " commit on git side"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd $H &&\n"> <LIT_CHARS "\t\tgit config i18n.commitencoding $H &&\n"> <LIT_CHARS "\t\tgit checkout -b t refs/remotes/git-svn &&\n"> <LIT_CHARS "\t\techo $H >F &&\n"> <LIT_CHARS "\t\tgit add F &&\n"> <LIT_CHARS "\t\tgit commit -a -F \"$TEST_DIRECTORY\"/t3900/$H.txt &&\n"> <LIT_CHARS "\t\tE=$(git cat-file commit HEAD | sed -ne \"s/^encoding //p\") &&\n"> <LIT_CHARS "\t\ttest \"z$E\" = \"z$H\"\n"> <LIT_CHARS "\t)\n"> <LIT_CHARS "\t">]})
  )
  (For H [{[LIT_CHARS ISO8859-1]}, {[LIT_CHARS eucJP]}])
    (Com {[LIT_CHARS test_expect_success]} {[DQ [VarSub H][LIT_CHARS " dcommit to svn"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd $H &&\n"> <LIT_CHARS "\t\tgit config --unset i18n.commitencoding &&\n"> <LIT_CHARS "\t\ttest_must_fail git svn dcommit\n"> <LIT_CHARS "\t)\n"> <LIT_CHARS "\t">]})
  )
  (Com {[LIT_CHARS test_done]})
)