(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <'respect crlf in git archive'>)}
          spids: [4]
        )
      ]
      spids: [4]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(test_expect_success)} {(setup)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit config core.autocrlf true &&\n'> <'\n'> 
          <'\tprintf "CRLF line ending\\r\\nAnd another\\r\\n" > sample &&\n'> <'\tgit add sample &&\n'> <'\n'> <'\ttest_tick &&\n'> <'\tgit commit -m Initial\n'> <'\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'tar archive'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit archive --format=tar HEAD |\n'> 
          <'\t( mkdir untarred && cd untarred && "$TAR" -xf - ) &&\n'> <'\n'> <'\ttest_cmp sample untarred/sample\n'> <'\n'>
        )
      }
    )
    (C {(test_expect_success)} {(UNZIP)} {(SQ <'zip archive'>)} 
      {
        (SQ <'\n'> <'\n'> <'\tgit archive --format=zip HEAD >test.zip &&\n'> <'\n'> 
          <'\t( mkdir unzipped && cd unzipped && "$GIT_UNZIP" ../test.zip ) &&\n'> <'\n'> <'\ttest_cmp sample unzipped/sample\n'> <'\n'>
        )
      }
    )
    (C {(test_done)})
  ]
)