(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <"fetching and pushing project with subproject">)}
          spids: [4]
        )
      ]
      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)})
  ]
)