(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 fancy glob test' span_id:15))} spids: [13] ) ] ) (C {(.)} {(./lib-git-svn.sh)}) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'load svn repo' span_id:27))} { (DQ ('\n') ("\tsvnadmin load -q '") ($ Id.VSub_DollarName '$rawsvnrepo') ("' < '") ($ Id.VSub_DollarName '$TEST_DIRECTORY') ("/t9154/svn.dump' &&\n") ("\tgit svn init --minimize-url -T trunk '") ($ Id.VSub_DollarName '$svnrepo') ("' &&\n") ('\tgit svn fetch\n') ('\t') ) } ) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'add red branch' span_id:48))} { (DQ ('\n') ("\tgit config svn-remote.svn.branches 'branches/{red}:refs/remotes/*' &&\n") ('\tgit svn fetch &&\n') ('\tgit rev-parse refs/remotes/red &&\n') ('\ttest_must_fail git rev-parse refs/remotes/green &&\n') ('\ttest_must_fail git rev-parse refs/remotes/blue\n') ('\t') ) } ) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'add gre branch' span_id:65))} { (DQ ('\n') ('\tgit config --file=.git/svn/.metadata --unset svn-remote.svn.branches-maxRev &&\n') ("\tgit config svn-remote.svn.branches 'branches/{red,gre}:refs/remotes/*' &&\n") ('\tgit svn fetch &&\n') ('\tgit rev-parse refs/remotes/red &&\n') ('\ttest_must_fail git rev-parse refs/remotes/green &&\n') ('\ttest_must_fail git rev-parse refs/remotes/blue\n') ('\t') ) } ) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'add green branch' span_id:83))} { (DQ ('\n') ('\tgit config --file=.git/svn/.metadata --unset svn-remote.svn.branches-maxRev &&\n') ("\tgit config svn-remote.svn.branches 'branches/{red,green}:refs/remotes/*' &&\n") ('\tgit svn fetch &&\n') ('\tgit rev-parse refs/remotes/red &&\n') ('\tgit rev-parse refs/remotes/green &&\n') ('\ttest_must_fail git rev-parse refs/remotes/blue\n') ('\t') ) } ) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'add all branches' span_id:101))} { (DQ ('\n') ('\tgit config --file=.git/svn/.metadata --unset svn-remote.svn.branches-maxRev &&\n') ("\tgit config svn-remote.svn.branches 'branches/*:refs/remotes/*' &&\n") ('\tgit svn fetch &&\n') ('\tgit rev-parse refs/remotes/red &&\n') ('\tgit rev-parse refs/remotes/green &&\n') ('\tgit rev-parse refs/remotes/blue\n') ('\t') ) } ) (C {(test_done)}) ] )