(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <'git svn init/clone tests'>)}
          spids: [13]
        )
      ]
      spids: [13]
    )
    (C {(.)} {(./lib-git-svn.sh)})
    (C {(set)} {(-e)})
    (C {(rm)} {(-r)} {(.git)})
    (C {(mkdir)} {(tmp)})
    (C {(cd)} {(tmp)})
    (C {(test_expect_success)} {(SQ <'setup svnrepo'>)} 
      {
        (SQ <'\n'> <'\tmkdir project project/trunk project/branches project/tags &&\n'> 
          <'\techo foo > project/trunk/foo &&\n'> <'\tsvn_cmd import -m "$test_description" project "$svnrepo"/project &&\n'> <'\trm -rf project\n'> 
          <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'basic clone'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d trunk &&\n'> <'\tgit svn clone "$svnrepo"/project/trunk &&\n'> 
          <'\ttest -d trunk/.git/svn &&\n'> <'\ttest -e trunk/foo &&\n'> <'\trm -rf trunk\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'clone to target directory'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d target &&\n'> <'\tgit svn clone "$svnrepo"/project/trunk target &&\n'> 
          <'\ttest -d target/.git/svn &&\n'> <'\ttest -e target/foo &&\n'> <'\trm -rf target\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'clone with --stdlayout'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d project &&\n'> <'\tgit svn clone -s "$svnrepo"/project &&\n'> 
          <'\ttest -d project/.git/svn &&\n'> <'\ttest -e project/foo &&\n'> <'\trm -rf project\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'clone to target directory with --stdlayout'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d target &&\n'> <'\tgit svn clone -s "$svnrepo"/project target &&\n'> 
          <'\ttest -d target/.git/svn &&\n'> <'\ttest -e target/foo &&\n'> <'\trm -rf target\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'init without -s/-T/-b/-t does not warn'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d trunk &&\n'> 
          <'\tgit svn init "$svnrepo"/project/trunk trunk 2>warning &&\n'> <'\ttest_must_fail grep -q prefix warning &&\n'> <'\trm -rf trunk &&\n'> <'\trm -f warning\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'clone without -s/-T/-b/-t does not warn'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d trunk &&\n'> 
          <'\tgit svn clone "$svnrepo"/project/trunk 2>warning &&\n'> <'\ttest_must_fail grep -q prefix warning &&\n'> <'\trm -rf trunk &&\n'> <'\trm -f warning\n'> <'\t'>
        )
      }
    )
    (FuncDef
      name: test_svn_configured_prefix
      body: 
        (BraceGroup
          children: [
            (AndOr
              ops: [Op_DAmp Op_DAmp Op_DAmp Op_DAmp Op_DAmp Op_DAmp Op_DAmp]
              children: [
                (Assignment
                  keyword: Assign_None
                  pairs: [
                    (assign_pair
                      lhs: (LhsName name:prefix)
                      op: Equal
                      rhs: {($ VSub_Number '$1')}
                      spids: [172]
                    )
                  ]
                  spids: [172]
                )
                (SimpleCommand
                  words: [{(cat)}]
                  redirects: [
                    (Redir
                      op_id: Redir_Great
                      fd: 16777215
                      arg_word: {(expect)}
                      spids: [180]
                    )
                    (HereDoc
                      op_id: Redir_DLess
                      fd: 16777215
                      body: 
                        {
                          (DQ ('project/trunk:refs/remotes/') (${ VSub_Name prefix) ('trunk\n') 
                            ('project/branches/*:refs/remotes/') (${ VSub_Name prefix) ('*\n') ('project/tags/*:refs/remotes/') (${ VSub_Name prefix) ('tags/*\n')
                          )
                        }
                      do_expansion: True
                      here_end: EOF
                      was_filled: T
                      spids: [183]
                    )
                  ]
                )
                (C {(test)} {(KW_Bang '!')} {(-f)} {(actual)})
                (SimpleCommand
                  words: [
                    {(git)}
                    {(--git-dir) (Lit_Other '=') (project/.git)}
                    {(config)}
                    {(svn-remote.svn.fetch)}
                  ]
                  redirects: [(Redir op_id:Redir_DGreat fd:16777215 arg_word:{(actual)} spids:[226])]
                )
                (SimpleCommand
                  words: [
                    {(git)}
                    {(--git-dir) (Lit_Other '=') (project/.git)}
                    {(config)}
                    {(svn-remote.svn.branches)}
                  ]
                  redirects: [(Redir op_id:Redir_DGreat fd:16777215 arg_word:{(actual)} spids:[242])]
                )
                (SimpleCommand
                  words: [
                    {(git)}
                    {(--git-dir) (Lit_Other '=') (project/.git)}
                    {(config)}
                    {(svn-remote.svn.tags)}
                  ]
                  redirects: [(Redir op_id:Redir_DGreat fd:16777215 arg_word:{(actual)} spids:[258])]
                )
                (C {(test_cmp)} {(expect)} {(actual)})
                (C {(rm)} {(-f)} {(expect)} {(actual)})
              ]
            )
          ]
          spids: [169]
        )
      spids: [164 168]
    )
    (C {(test_expect_success)} {(SQ <'init with -s/-T/-b/-t assumes --prefix=origin/'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d project &&\n'> 
          <'\tgit svn init -s "$svnrepo"/project project 2>warning &&\n'> <'\ttest_must_fail grep -q prefix warning &&\n'> <'\ttest_svn_configured_prefix "origin/" &&\n'> 
          <'\trm -rf project &&\n'> <'\trm -f warning\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'clone with -s/-T/-b/-t assumes --prefix=origin/'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d project &&\n'> 
          <'\tgit svn clone -s "$svnrepo"/project 2>warning &&\n'> <'\ttest_must_fail grep -q prefix warning &&\n'> <'\ttest_svn_configured_prefix "origin/" &&\n'> 
          <'\trm -rf project &&\n'> <'\trm -f warning\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'init with -s/-T/-b/-t and --prefix "" still works'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d project &&\n'> 
          <'\tgit svn init -s "$svnrepo"/project project --prefix "" 2>warning &&\n'> <'\ttest_must_fail grep -q prefix warning &&\n'> <'\ttest_svn_configured_prefix "" &&\n'> 
          <'\trm -rf project &&\n'> <'\trm -f warning\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'clone with -s/-T/-b/-t and --prefix "" still works'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d project &&\n'> 
          <'\tgit svn clone -s "$svnrepo"/project --prefix "" 2>warning &&\n'> <'\ttest_must_fail grep -q prefix warning &&\n'> <'\ttest_svn_configured_prefix "" &&\n'> 
          <'\trm -rf project &&\n'> <'\trm -f warning\n'> <'\t'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'init with -T as a full url works'>)} 
      {
        (SQ <'\n'> <'\ttest ! -d project &&\n'> 
          <'\tgit svn init -T "$svnrepo"/project/trunk project &&\n'> <'\trm -rf project\n'> <'\t'>
        )
      }
    )
    (C {(test_done)})
  ]
)