(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 shallow clone' span_id:15))} spids: [13] ) ] ) (C {(.)} {(./lib-git-svn.sh)}) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'setup test repository' span_id:26))} { (SQ (Token id:Id.Lit_Chars val:'\n' span_id:30) (Token id: Id.Lit_Chars val: '\tsvn_cmd mkdir -m "create standard layout" \\\n' span_id: 31 ) (Token id: Id.Lit_Chars val: '\t "$svnrepo"/trunk "$svnrepo"/branches "$svnrepo"/tags &&\n' span_id: 32 ) (Token id:Id.Lit_Chars val:'\tsvn_cmd cp -m "branch off trunk" \\\n' span_id:33) (Token id: Id.Lit_Chars val: '\t "$svnrepo"/trunk "$svnrepo"/branches/a &&\n' span_id: 34 ) (Token id:Id.Lit_Chars val:'\tsvn_cmd co "$svnrepo"/branches/a &&\n' span_id:35) (Token id:Id.Lit_Chars val:'\t(\n' span_id:36) (Token id:Id.Lit_Chars val:'\t\tcd a &&\n' span_id:37) (Token id:Id.Lit_Chars val:'\t\t> foo &&\n' span_id:38) (Token id:Id.Lit_Chars val:'\t\tsvn_cmd add foo &&\n' span_id:39) (Token id:Id.Lit_Chars val:'\t\tsvn_cmd commit -m "add foo"\n' span_id:40) (Token id:Id.Lit_Chars val:'\t) &&\n' span_id:41) (Token id:Id.Lit_Chars val:'\tmaybe_start_httpd\n' span_id:42) ) } ) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'clone trunk with "-r HEAD"' span_id:49))} { (SQ (Token id:Id.Lit_Chars val:'\n' span_id:53) (Token id: Id.Lit_Chars val: '\tgit svn clone -r HEAD "$svnrepo/trunk" g &&\n' span_id: 54 ) (Token id:Id.Lit_Chars val:'\t( cd g && git rev-parse --symbolic --verify HEAD )\n' span_id:55) ) } ) (C {(stop_httpd)}) (C {(test_done)}) ] )