(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <"test git worktree list">)}
          spids: [4]
        )
      ]
      spids: [4]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(test_expect_success)} {(SQ <setup>)} {(SQ <"\n"> <"\ttest_commit init\n">)})
    (C {(test_expect_success)} {(SQ <"rev-parse --git-common-dir on main worktree">)} 
      {
        (SQ <"\n"> <"\tgit rev-parse --git-common-dir >actual &&\n"> <"\techo .git >expected &&\n"> 
          <"\ttest_cmp expected actual &&\n"> <"\tmkdir sub &&\n"> <"\tgit -C sub rev-parse --git-common-dir >actual2 &&\n"> 
          <"\techo sub/.git >expected2 &&\n"> <"\ttest_cmp expected2 actual2\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"\"list\" all worktrees from main">)} 
      {
        (SQ <"\n"> 
          <
"\techo \"$(git rev-parse --show-toplevel) $(git rev-parse --short HEAD) [$(git symbolic-ref --short HEAD)]\" >expect &&\n"
          > <"\ttest_when_finished \"rm -rf here && git worktree prune\" &&\n"> 
          <"\tgit worktree add --detach here master &&\n"> 
          <
"\techo \"$(git -C here rev-parse --show-toplevel) $(git rev-parse --short HEAD) (detached HEAD)\" >>expect &&\n"
          > <"\tgit worktree list | sed \"s/  */ /g\" >actual &&\n"> <"\ttest_cmp expect actual\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"\"list\" all worktrees from linked">)} 
      {
        (SQ <"\n"> 
          <
"\techo \"$(git rev-parse --show-toplevel) $(git rev-parse --short HEAD) [$(git symbolic-ref --short HEAD)]\" >expect &&\n"
          > <"\ttest_when_finished \"rm -rf here && git worktree prune\" &&\n"> 
          <"\tgit worktree add --detach here master &&\n"> 
          <
"\techo \"$(git -C here rev-parse --show-toplevel) $(git rev-parse --short HEAD) (detached HEAD)\" >>expect &&\n"
          > <"\tgit -C here worktree list | sed \"s/  */ /g\" >actual &&\n"> <"\ttest_cmp expect actual\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"\"list\" all worktrees --porcelain">)} 
      {
        (SQ <"\n"> <"\techo \"worktree $(git rev-parse --show-toplevel)\" >expect &&\n"> 
          <"\techo \"HEAD $(git rev-parse HEAD)\" >>expect &&\n"> <"\techo \"branch $(git symbolic-ref HEAD)\" >>expect &&\n"> <"\techo >>expect &&\n"> 
          <"\ttest_when_finished \"rm -rf here && git worktree prune\" &&\n"> <"\tgit worktree add --detach here master &&\n"> 
          <"\techo \"worktree $(git -C here rev-parse --show-toplevel)\" >>expect &&\n"> <"\techo \"HEAD $(git rev-parse HEAD)\" >>expect &&\n"> <"\techo \"detached\" >>expect &&\n"> 
          <"\techo >>expect &&\n"> <"\tgit worktree list --porcelain >actual &&\n"> <"\ttest_cmp expect actual\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"bare repo setup">)} 
      {
        (SQ <"\n"> <"\tgit init --bare bare1 &&\n"> <"\techo \"data\" >file1 &&\n"> 
          <"\tgit add file1 &&\n"> <"\tgit commit -m\"File1: add data\" &&\n"> <"\tgit push bare1 master &&\n"> 
          <"\tgit reset --hard HEAD^\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"\"list\" all worktrees from bare main">)} 
      {
        (SQ <"\n"> <"\ttest_when_finished \"rm -rf there && git -C bare1 worktree prune\" &&\n"> 
          <"\tgit -C bare1 worktree add --detach ../there master &&\n"> <"\techo \"$(pwd)/bare1 (bare)\" >expect &&\n"> 
          <
"\techo \"$(git -C there rev-parse --show-toplevel) $(git -C there rev-parse --short HEAD) (detached HEAD)\" >>expect &&\n"
          > <"\tgit -C bare1 worktree list | sed \"s/  */ /g\" >actual &&\n"> <"\ttest_cmp expect actual\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"\"list\" all worktrees --porcelain from bare main">)} 
      {
        (SQ <"\n"> <"\ttest_when_finished \"rm -rf there && git -C bare1 worktree prune\" &&\n"> 
          <"\tgit -C bare1 worktree add --detach ../there master &&\n"> <"\techo \"worktree $(pwd)/bare1\" >expect &&\n"> <"\techo \"bare\" >>expect &&\n"> 
          <"\techo >>expect &&\n"> <"\techo \"worktree $(git -C there rev-parse --show-toplevel)\" >>expect &&\n"> 
          <"\techo \"HEAD $(git -C there rev-parse HEAD)\" >>expect &&\n"> <"\techo \"detached\" >>expect &&\n"> <"\techo >>expect &&\n"> 
          <"\tgit -C bare1 worktree list --porcelain >actual &&\n"> <"\ttest_cmp expect actual\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"\"list\" all worktrees from linked with a bare main">)} 
      {
        (SQ <"\n"> <"\ttest_when_finished \"rm -rf there && git -C bare1 worktree prune\" &&\n"> 
          <"\tgit -C bare1 worktree add --detach ../there master &&\n"> <"\techo \"$(pwd)/bare1 (bare)\" >expect &&\n"> 
          <
"\techo \"$(git -C there rev-parse --show-toplevel) $(git -C there rev-parse --short HEAD) (detached HEAD)\" >>expect &&\n"
          > <"\tgit -C there worktree list | sed \"s/  */ /g\" >actual &&\n"> <"\ttest_cmp expect actual\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"bare repo cleanup">)} {(SQ <"\n"> <"\trm -rf bare1\n">)})
    (C {(test_done)})
  ]
)