(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git svn dcommit clobber series">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./lib-git-svn.sh]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "initialize repo">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tmkdir import &&\n"> <LIT_CHARS "\t(cd import &&\n"> <LIT_CHARS "\tawk \"BEGIN { for (i = 1; i < 64; i++) { print i } }\" > file\n"> <LIT_CHARS "\tsvn_cmd import -m \"initial\" . \"$svnrepo\"\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\tgit svn init \"$svnrepo\" &&\n"> <LIT_CHARS "\tgit svn fetch &&\n"> <LIT_CHARS "\ttest -e file\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "(supposedly) non-conflicting change from SVN">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest x\"$(sed -n -e 58p < file)\" = x58 &&\n"> <LIT_CHARS "\ttest x\"$(sed -n -e 61p < file)\" = x61 &&\n"> <LIT_CHARS "\tsvn_cmd co \"$svnrepo\" tmp &&\n"> <LIT_CHARS "\t(cd tmp &&\n"> <LIT_CHARS "\t\tperl -i.bak -p -e \"s/^58$/5588/\" file &&\n"> <LIT_CHARS "\t\tperl -i.bak -p -e \"s/^61$/6611/\" file &&\n"> <LIT_CHARS "\t\tpoke file &&\n"> <LIT_CHARS "\t\ttest x\"$(sed -n -e 58p < file)\" = x5588 &&\n"> <LIT_CHARS "\t\ttest x\"$(sed -n -e 61p < file)\" = x6611 &&\n"> <LIT_CHARS "\t\tsvn_cmd commit -m \"58 => 5588, 61 => 6611\"\n"> <LIT_CHARS "\t)\n"> <LIT_CHARS "\t">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "some unrelated changes to git">]} {[DQ [LIT_CHARS "\n"][LIT_CHARS "\techo hi > life &&\n"][LIT_CHARS "\tgit update-index --add life &&\n"][LIT_CHARS "\tgit commit -m hi-life &&\n"][LIT_CHARS "\techo bye >> life &&\n"][LIT_CHARS "\tgit commit -m bye-life life\n"][LIT_CHARS "\t"]]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "change file but in unrelated area">]} {[DQ [LIT_CHARS "\n"][LIT_CHARS "\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 4p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x4 &&\n"][LIT_CHARS "\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 7p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x7 &&\n"][LIT_CHARS "\tperl -i.bak -p -e 's/^4"][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "/4444/' file &&\n"][LIT_CHARS "\tperl -i.bak -p -e 's/^7"][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "/7777/' file &&\n"][LIT_CHARS "\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 4p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x4444 &&\n"][LIT_CHARS "\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 7p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x7777 &&\n"][LIT_CHARS "\tgit commit -m '4 => 4444, 7 => 7777' file &&\n"][LIT_CHARS "\tgit svn dcommit &&\n"][LIT_CHARS "\tsvn_cmd up tmp &&\n"][LIT_CHARS "\tcd tmp &&\n"][LIT_CHARS "\t\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 4p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x4444 &&\n"][LIT_CHARS "\t\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 7p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x7777 &&\n"][LIT_CHARS "\t\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 58p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x5588 &&\n"][LIT_CHARS "\t\ttest x"][\ LIT_ESCAPED_CHAR "\\\""][\ LIT_ESCAPED_CHAR "\\$"][LIT_CHARS "(sed -n -e 61p < file)"][\ LIT_ESCAPED_CHAR "\\\""][LIT_CHARS " = x6611\n"][LIT_CHARS "\t"]]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "attempt to dcommit with a dirty index">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo foo >>file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\ttest_must_fail git svn dcommit\n">]})
  (Com {[LIT_CHARS test_done]})
)