(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:test_description) op: assign_op.Equal rhs: {(SQ (Token id:Id.Lit_Chars val:'git svn dcommit new files over svn:// test' span_id:28))} spids: [26] ) ] ) (C {(.)} {(./lib-git-svn.sh)}) (C {(require_svnserve)}) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'start tracking an empty repo' span_id:43))} { (SQ (Token id:Id.Lit_Chars val:'\n' span_id:47) (Token id: Id.Lit_Chars val: '\tsvn_cmd mkdir -m "empty dir" "$svnrepo"/empty-dir &&\n' span_id: 48 ) (Token id:Id.Lit_Chars val:'\techo "[general]" > "$rawsvnrepo"/conf/svnserve.conf &&\n' span_id:49) (Token id: Id.Lit_Chars val: '\techo anon-access = write >> "$rawsvnrepo"/conf/svnserve.conf &&\n' span_id: 50 ) (Token id:Id.Lit_Chars val:'\tstart_svnserve &&\n' span_id:51) (Token id: Id.Lit_Chars val: '\tgit svn init svn://127.0.0.1:$SVNSERVE_PORT &&\n' span_id: 52 ) (Token id:Id.Lit_Chars val:'\tgit svn fetch\n' span_id:53) (Token id:Id.Lit_Chars val:'\t' span_id:54) ) } ) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'create files in new directory with dcommit' span_id:61))} { (DQ ('\n') ('\tmkdir git-new-dir &&\n') ('\techo hello > git-new-dir/world &&\n') ('\tgit update-index --add git-new-dir/world &&\n') ('\tgit commit -m hello &&\n') ('\tstart_svnserve &&\n') ('\tgit svn dcommit\n') ('\t') ) } ) (C {(test_done)}) ] )