(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <'basic clone options'>)}
          spids: [4]
        )
      ]
      spids: [4]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(test_expect_success)} {(SQ <setup>)} 
      {
        (SQ <'\n'> <'\n'> <'\tmkdir parent &&\n'> <'\t(cd parent && git init &&\n'> 
          <'\t echo one >file && git add file &&\n'> <'\t git commit -m one)\n'> <'\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'clone -o'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit clone -o foo parent clone-o &&\n'> 
          <'\t(cd clone-o && git rev-parse --verify refs/remotes/foo/master)\n'> <'\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'redirected clone does not show progress'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit clone "file://$(pwd)/parent" clone-redirected >out 2>err &&\n'> 
          <'\t! grep % err &&\n'> <'\ttest_i18ngrep ! "Checking connectivity" err\n'> <'\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'redirected clone -v does show progress'>)} 
      {
        (SQ <'\n'> <'\n'> 
          <'\tgit clone --progress "file://$(pwd)/parent" clone-redirected-progress \\\n'> <'\t\t>out 2>err &&\n'> <'\tgrep % err\n'> <'\n'>
        )
      }
    )
    (C {(test_done)})
  ]
)