(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <'git archive attribute tests'>)}
          spids: [4]
        )
      ]
      spids: [4]
    )
    (C {(.)} {(./test-lib.sh)})
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:SUBSTFORMAT)
          op: Equal
          rhs: {(SQ <'%H (%h)%n'>)}
          spids: [15]
        )
      ]
      spids: [15]
    )
    (FuncDef
      name: test_expect_exists
      body: 
        (BraceGroup
          children: [
            (C {(test_expect_success)} {(DQ (' ') ($ VSub_Number '$1') (' exists'))} 
              {(DQ ('test -e ') ($ VSub_Number '$1'))}
            )
          ]
          spids: [25]
        )
      spids: [21 24]
    )
    (FuncDef
      name: test_expect_missing
      body: 
        (BraceGroup
          children: [
            (C {(test_expect_success)} {(DQ (' ') ($ VSub_Number '$1') (' does not exist'))} 
              {(DQ ('test ! -e ') ($ VSub_Number '$1'))}
            )
          ]
          spids: [48]
        )
      spids: [44 47]
    )
    (C {(test_expect_success)} {(SQ <setup>)} 
      {
        (SQ <'\n'> <'\techo ignored >ignored &&\n'> 
          <'\techo ignored export-ignore >>.git/info/attributes &&\n'> <'\tgit add ignored &&\n'> <'\n'> <'\techo ignored by tree >ignored-by-tree &&\n'> 
          <'\techo ignored-by-tree export-ignore >.gitattributes &&\n'> <'\tgit add ignored-by-tree .gitattributes &&\n'> <'\n'> 
          <'\techo ignored by worktree >ignored-by-worktree &&\n'> <'\techo ignored-by-worktree export-ignore >.gitattributes &&\n'> 
          <'\tgit add ignored-by-worktree &&\n'> <'\n'> <'\tprintf "A\\$Format:%s\\$O" "$SUBSTFORMAT" >nosubstfile &&\n'> 
          <'\tprintf "A\\$Format:%s\\$O" "$SUBSTFORMAT" >substfile1 &&\n'> <'\tprintf "A not substituted O" >substfile2 &&\n'> 
          <'\techo "substfile?" export-subst >>.git/info/attributes &&\n'> <'\tgit add nosubstfile substfile1 substfile2 &&\n'> <'\n'> <'\tgit commit -m. &&\n'> <'\n'> 
          <'\tgit clone --bare . bare &&\n'> <'\tcp .git/info/attributes bare/info/attributes\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'git archive'>)} 
      {
        (SQ <'\n'> <'\tgit archive HEAD >archive.tar &&\n'> 
          <'\t(mkdir archive && cd archive && "$TAR" xf -) <archive.tar\n'>
        )
      }
    )
    (C {(test_expect_missing)} {(archive/ignored)})
    (C {(test_expect_missing)} {(archive/ignored-by-tree)})
    (C {(test_expect_exists)} {(archive/ignored-by-worktree)})
    (C {(test_expect_success)} {(SQ <'git archive with worktree attributes'>)} 
      {
        (SQ <'\n'> <'\tgit archive --worktree-attributes HEAD >worktree.tar &&\n'> 
          <'\t(mkdir worktree && cd worktree && "$TAR" xf -) <worktree.tar\n'>
        )
      }
    )
    (C {(test_expect_missing)} {(worktree/ignored)})
    (C {(test_expect_exists)} {(worktree/ignored-by-tree)})
    (C {(test_expect_missing)} {(worktree/ignored-by-worktree)})
    (C {(test_expect_success)} {(SQ <'git archive --worktree-attributes option'>)} 
      {
        (SQ <'\n'> 
          <'\tgit archive --worktree-attributes --worktree-attributes HEAD >worktree.tar &&\n'> <'\t(mkdir worktree2 && cd worktree2 && "$TAR" xf -) <worktree.tar\n'>
        )
      }
    )
    (C {(test_expect_missing)} {(worktree2/ignored)})
    (C {(test_expect_exists)} {(worktree2/ignored-by-tree)})
    (C {(test_expect_missing)} {(worktree2/ignored-by-worktree)})
    (C {(test_expect_success)} {(SQ <'git archive vs. bare'>)} 
      {
        (SQ <'\n'> <'\t(cd bare && git archive HEAD) >bare-archive.tar &&\n'> 
          <'\ttest_cmp_bin archive.tar bare-archive.tar\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'git archive with worktree attributes, bare'>)} 
      {
        (SQ <'\n'> <'\t(cd bare && git archive --worktree-attributes HEAD) >bare-worktree.tar &&\n'> 
          <'\t(mkdir bare-worktree && cd bare-worktree && "$TAR" xf -) <bare-worktree.tar\n'>
        )
      }
    )
    (C {(test_expect_missing)} {(bare-worktree/ignored)})
    (C {(test_expect_exists)} {(bare-worktree/ignored-by-tree)})
    (C {(test_expect_exists)} {(bare-worktree/ignored-by-worktree)})
    (C {(test_expect_success)} {(SQ <export-subst>)} 
      {
        (SQ <'\n'> <'\tgit log "--pretty=format:A${SUBSTFORMAT}O" HEAD >substfile1.expected &&\n'> 
          <'\ttest_cmp nosubstfile archive/nosubstfile &&\n'> <'\ttest_cmp substfile1.expected archive/substfile1 &&\n'> 
          <'\ttest_cmp substfile2 archive/substfile2\n'>
        )
      }
    )
    (C {(test_done)})
  ]
)