(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(SQ <'fetching and pushing project with subproject'>)}
          spids: [4]
        )
      ]
    )
    (C {<.>} {<'./test-lib.sh'>})
    (C {<test_expect_success>} {<setup>} 
      {
        (SQ <'\n'> <'\ttest_tick &&\n'> <'\tmkdir -p sub && (\n'> <'\t\tcd sub &&\n'> 
          <'\t\tgit init &&\n'> <'\t\t>subfile &&\n'> <'\t\tgit add subfile &&\n'> <'\t\tgit commit -m "subproject commit #1"\n'> 
          <'\t) &&\n'> <'\t>mainfile &&\n'> <'\tgit add sub mainfile &&\n'> <'\ttest_tick &&\n'> 
          <'\tgit commit -m "superproject commit #1"\n'>
        )
      }
    )
    (C {<test_expect_success>} {<clone>} 
      {
        (SQ <'\n'> <'\tgit clone "file://$(pwd)/.git" cloned &&\n'> 
          <'\t(git rev-parse HEAD; git ls-files -s) >expected &&\n'> <'\t(\n'> <'\t\tcd cloned &&\n'> <'\t\t(git rev-parse HEAD; git ls-files -s) >../actual\n'> <'\t) &&\n'> 
          <'\ttest_cmp expected actual\n'>
        )
      }
    )
    (C {<test_expect_success>} {<advance>} 
      {
        (SQ <'\n'> <'\techo more >mainfile &&\n'> <'\tgit update-index --force-remove sub &&\n'> 
          <'\tmv sub/.git sub/.git-disabled &&\n'> <'\tgit add sub/subfile mainfile &&\n'> <'\tmv sub/.git-disabled sub/.git &&\n'> <'\ttest_tick &&\n'> 
          <'\tgit commit -m "superproject commit #2"\n'>
        )
      }
    )
    (C {<test_expect_success>} {<fetch>} 
      {
        (SQ <'\n'> <'\t(git rev-parse HEAD; git ls-files -s) >expected &&\n'> <'\t(\n'> 
          <'\t\tcd cloned &&\n'> <'\t\tgit pull &&\n'> <'\t\t(git rev-parse HEAD; git ls-files -s) >../actual\n'> <'\t) &&\n'> 
          <'\ttest_cmp expected actual\n'>
        )
      }
    )
    (C {<test_done>})
  ]
)