(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: 
            {
              (SQ <"git rebase -p should respect --onto\n"> <"\n"> 
                <"In a rebase with --onto, we should rewrite all the commits that\n"> <aren>
              ) (DQ ("'")) (SQ <"t on top of $ONTO, even if they are on top of $UPSTREAM.\n">)
            }
          spids: [13]
        )
      ]
      spids: [13]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(.)} {(DQ ($ VSub_Name "$TEST_DIRECTORY")) (/lib-rebase.sh)})
    (C {(test_expect_success)} {(SQ <setup>)} 
      {
        (SQ <"\n"> <"\ttest_commit A1 &&\n"> <"\ttest_commit B1 &&\n"> <"\ttest_commit C1 &&\n"> 
          <"\ttest_commit D1 &&\n"> <"\tgit reset --hard B1 &&\n"> <"\ttest_commit E1 &&\n"> <"\ttest_commit F1 &&\n"> 
          <"\ttest_merge G1 D1 &&\n"> <"\tgit reset --hard A1 &&\n"> <"\ttest_commit H1\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"rebase from B1 onto H1">)} 
      {
        (SQ <"\n"> <"\tgit checkout G1 &&\n"> <"\tgit rebase -p --onto H1 B1 &&\n"> 
          <"\ttest \"$(git rev-parse HEAD^1^1^1)\" = \"$(git rev-parse H1)\" &&\n"> <"\ttest \"$(git rev-parse HEAD^2^1^1)\" = \"$(git rev-parse H1)\"\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"rebase from E1 onto H1">)} 
      {
        (SQ <"\n"> <"\tgit checkout G1 &&\n"> <"\tgit rebase -p --onto H1 E1 &&\n"> 
          <"\ttest \"$(git rev-parse HEAD^1^1)\" = \"$(git rev-parse H1)\" &&\n"> <"\ttest \"$(git rev-parse HEAD^2)\" = \"$(git rev-parse D1)\"\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"rebase from C1 onto H1">)} 
      {
        (SQ <"\n"> <"\tgit checkout G1 &&\n"> 
          <"\tgit rev-list --first-parent --pretty=oneline C1..G1 &&\n"> <"\tgit rebase -p --onto H1 C1 &&\n"> 
          <"\ttest \"$(git rev-parse HEAD^2^1)\" = \"$(git rev-parse H1)\" &&\n"> <"\ttest \"$(git rev-parse HEAD^1)\" = \"$(git rev-parse F1)\"\n">
        )
      }
    )
    (C {(test_done)})
  ]
)