(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git tar-tree and git get-tar-commit-id test\n"> <LIT_CHARS "\n"> <LIT_CHARS "This test covers the topics of file contents, commit date handling and\n"> <LIT_CHARS "commit id embedding:\n"> <LIT_CHARS "\n"> <LIT_CHARS "  The contents of the repository is compared to the extracted tar\n"> <LIT_CHARS "  archive.  The repository contains simple text files, symlinks and a\n"> <LIT_CHARS "  binary file (/bin/sh).  Only paths shorter than 99 characters are\n"> <LIT_CHARS "  used.\n"> <LIT_CHARS "\n"> <LIT_CHARS "  git tar-tree applies the commit date to every file in the archive it\n"> <LIT_CHARS "  creates.  The test sets the commit date to a specific value and checks\n"> <LIT_CHARS "  if the tar archive contains that value.\n"> <LIT_CHARS "\n"> <LIT_CHARS "  When giving git tar-tree a commit id (in contrast to a tree id) it\n"> <LIT_CHARS "  embeds this commit id into the tar archive as a comment.  The test\n"> <LIT_CHARS "  checks the ability of git get-tar-commit-id to figure it out from the\n"> <LIT_CHARS "  tar file.\n"> <LIT_CHARS "\n">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('UNZIP', {[VarSub UNZIP test_op=VS_TEST_COLON_HYPHEN {[LIT_CHARS unzip]}]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('GZIP', {[VarSub GZIP test_op=VS_TEST_COLON_HYPHEN {[LIT_CHARS gzip]}]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('GUNZIP', {[VarSub GUNZIP test_op=VS_TEST_COLON_HYPHEN {[LIT_CHARS "gzip -d"]}]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('SUBSTFORMAT', {[LIT_OTHER "%"] [LIT_CHARS H] [LIT_OTHER "%"] [LIT_CHARS n]})])
  (FunctionDef check_zip []
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('zipfile', {[VarSub 1] [LIT_CHARS .zip]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('listfile', {[VarSub 1] [LIT_CHARS .lst]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('dir', {[VarSub 1]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('dir_with_prefix', {[VarSub dir] [LIT_CHARS /] [VarSub 2]})])
      (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS UNZIP]} {[DQ [LIT_CHARS " extract ZIP archive"]]} {[DQ [LIT_CHARS "\n"][LIT_CHARS "\t\t(mkdir "][VarSub dir][LIT_CHARS " && cd "][VarSub dir][LIT_CHARS " && "][VarSub UNZIP][LIT_CHARS " ../"][VarSub zipfile][LIT_CHARS ")\n"][LIT_CHARS "\t"]]}      )
      (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS UNZIP]} {[DQ [LIT_CHARS " validate filenames"]]} {[DQ [LIT_CHARS "\n"][LIT_CHARS "\t\t(cd "][VarSub dir_with_prefix][LIT_CHARS "a && find .) | sort >"][VarSub listfile][LIT_CHARS " &&\n"][LIT_CHARS "\t\ttest_cmp a.lst "][VarSub listfile][LIT_CHARS "\n"][LIT_CHARS "\t"]]}      )
      (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS UNZIP]} {[DQ [LIT_CHARS " validate file contents"]]} {[DQ [LIT_CHARS "\n"][LIT_CHARS "\t\tdiff -r a "][VarSub dir_with_prefix][LIT_CHARS "a\n"][LIT_CHARS "\t"]]}      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "populate workdir">]} {[SQ <LIT_CHARS "mkdir a b c &&\n"> <LIT_CHARS "     echo simple textfile >a/a &&\n"> <LIT_CHARS "     mkdir a/bin &&\n"> <LIT_CHARS "     cp /bin/sh a/bin &&\n"> <LIT_CHARS "     printf \"A\\$Format:%s\\$O\" \"$SUBSTFORMAT\" >a/substfile1 &&\n"> <LIT_CHARS "     printf \"A not substituted O\" >a/substfile2 &&\n"> <LIT_CHARS "     if test_have_prereq SYMLINKS; then\n"> <LIT_CHARS "\tln -s a a/l1\n"> <LIT_CHARS "     else\n"> <LIT_CHARS "\tprintf %s a > a/l1\n"> <LIT_CHARS "     fi &&\n"> <LIT_CHARS "     (p=long_path_to_a_file && cd a &&\n"> <LIT_CHARS "      for depth in 1 2 3 4 5; do mkdir $p && cd $p; done &&\n"> <LIT_CHARS "      echo text >file_with_long_path) &&\n"> <LIT_CHARS "     (cd a && find .) | sort >a.lst">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add ignored file">]} {[SQ <LIT_CHARS "echo ignore me >a/ignored &&\n"> <LIT_CHARS "     echo ignored export-ignore >.git/info/attributes">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "add files to repository">]} {[SQ <LIT_CHARS "find a -type f | xargs git update-index --add &&\n"> <LIT_CHARS "     find a -type l | xargs git update-index --add &&\n"> <LIT_CHARS "     treeid=`git write-tree` &&\n"> <LIT_CHARS "     echo $treeid >treeid &&\n"> <LIT_CHARS "     git update-ref HEAD $(TZ=GMT GIT_COMMITTER_DATE=\"2005-05-27 22:00:00\" \\\n"> <LIT_CHARS "     git commit-tree $treeid </dev/null)">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "create bare clone">]} {[SQ <LIT_CHARS "git clone --bare . bare.git &&\n"> <LIT_CHARS "     cp .git/info/attributes bare.git/info/attributes">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "remove ignored file">]} {[SQ <LIT_CHARS "rm a/ignored">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive">]} {[SQ <LIT_CHARS "git archive HEAD >b.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git tar-tree">]} {[SQ <LIT_CHARS "git tar-tree HEAD >b2.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive vs. git tar-tree">]} {[SQ <LIT_CHARS "test_cmp b.tar b2.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive on large files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "    test_config core.bigfilethreshold 1 &&\n"> <LIT_CHARS "    git archive HEAD >b3.tar &&\n"> <LIT_CHARS "    test_cmp b.tar b3.tar\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive in a bare repo">]} {[SQ <LIT_CHARS "(cd bare.git && git archive HEAD) >b3.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive vs. the same in a bare repo">]} {[SQ <LIT_CHARS "test_cmp b.tar b3.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive with --output">]} {[SQ <LIT_CHARS "git archive --output=b4.tar HEAD &&\n"> <LIT_CHARS "    test_cmp b.tar b4.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --remote">]} {[SQ <LIT_CHARS "git archive --remote=. HEAD >b5.tar &&\n"> <LIT_CHARS "    test_cmp b.tar b5.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "validate file modification time">]} {[SQ <LIT_CHARS "mkdir extract &&\n"> <LIT_CHARS "     \"$TAR\" xf b.tar -C extract a/a &&\n"> <LIT_CHARS "     test-chmtime -v +0 extract/a/a |cut -f 1 >b.mtime &&\n"> <LIT_CHARS "     echo \"1117231200\" >expected.mtime &&\n"> <LIT_CHARS "     test_cmp expected.mtime b.mtime">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git get-tar-commit-id">]} {[SQ <LIT_CHARS "git get-tar-commit-id <b.tar >b.commitid &&\n"> <LIT_CHARS "     test_cmp .git/$(git symbolic-ref HEAD) b.commitid">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extract tar archive">]} {[SQ <LIT_CHARS "(cd b && \"$TAR\" xf -) <b.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "validate filenames">]} {[SQ <LIT_CHARS "(cd b/a && find .) | sort >b.lst &&\n"> <LIT_CHARS "     test_cmp a.lst b.lst">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "validate file contents">]} {[SQ <LIT_CHARS "diff -r a b/a">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git tar-tree with prefix">]} {[SQ <LIT_CHARS "git tar-tree HEAD prefix >c.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extract tar archive with prefix">]} {[SQ <LIT_CHARS "(cd c && \"$TAR\" xf -) <c.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "validate filenames with prefix">]} {[SQ <LIT_CHARS "(cd c/prefix/a && find .) | sort >c.lst &&\n"> <LIT_CHARS "     test_cmp a.lst c.lst">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "validate file contents with prefix">]} {[SQ <LIT_CHARS "diff -r a c/prefix/a">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "create archives with substfiles">]} {[SQ <LIT_CHARS "cp .git/info/attributes .git/info/attributes.before &&\n"> <LIT_CHARS "     echo \"substfile?\" export-subst >>.git/info/attributes &&\n"> <LIT_CHARS "     git archive HEAD >f.tar &&\n"> <LIT_CHARS "     git archive --prefix=prefix/ HEAD >g.tar &&\n"> <LIT_CHARS "     mv .git/info/attributes.before .git/info/attributes">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extract substfiles">]} {[SQ <LIT_CHARS "(mkdir f && cd f && \"$TAR\" xf -) <f.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "validate substfile contents">]} {[SQ <LIT_CHARS "git log --max-count=1 \"--pretty=format:A${SUBSTFORMAT}O\" HEAD \\\n"> <LIT_CHARS "      >f/a/substfile1.expected &&\n"> <LIT_CHARS "      test_cmp f/a/substfile1.expected f/a/substfile1 &&\n"> <LIT_CHARS "      test_cmp a/substfile2 f/a/substfile2\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extract substfiles from archive with prefix">]} {[SQ <LIT_CHARS "(mkdir g && cd g && \"$TAR\" xf -) <g.tar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "validate substfile contents from archive with prefix">]} {[SQ <LIT_CHARS "git log --max-count=1 \"--pretty=format:A${SUBSTFORMAT}O\" HEAD \\\n"> <LIT_CHARS "      >g/prefix/a/substfile1.expected &&\n"> <LIT_CHARS "      test_cmp g/prefix/a/substfile1.expected g/prefix/a/substfile1 &&\n"> <LIT_CHARS "      test_cmp a/substfile2 g/prefix/a/substfile2\n">]}  )
  (Com {[VarSub UNZIP]} {[LIT_CHARS -v]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
    (DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2),
    >
  )
  (If
    (Com {[LIT_DBRACKET_LIKE "["]} {[VarSub ?]} {[LIT_CHARS -eq]} {[LIT_CHARS 127]} {[LIT_DBRACKET_LIKE "]"]}    )
    (Com {[LIT_CHARS say]} {[DQ [LIT_CHARS "Skipping ZIP tests, because unzip was not found"]]}    )
    (ElseTrue)
    (Com {[LIT_CHARS test_set_prereq]} {[LIT_CHARS UNZIP]}    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --format=zip">]} {[SQ <LIT_CHARS "git archive --format=zip HEAD >d.zip">]}  )
  (Com {[LIT_CHARS check_zip]} {[LIT_CHARS d]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --format=zip in a bare repo">]} {[SQ <LIT_CHARS "(cd bare.git && git archive --format=zip HEAD) >d1.zip">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --format=zip vs. the same in a bare repo">]} {[SQ <LIT_CHARS "test_cmp d.zip d1.zip">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --format=zip with --output">]} {[SQ <LIT_CHARS "git archive --format=zip --output=d2.zip HEAD &&\n"> <LIT_CHARS "    test_cmp d.zip d2.zip">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive with --output, inferring format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --output=d3.zip HEAD &&\n"> <LIT_CHARS "\ttest_cmp d.zip d3.zip\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive with --output, override inferred format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --format=tar --output=d4.zip HEAD &&\n"> <LIT_CHARS "\ttest_cmp b.tar d4.zip\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --format=zip with prefix">]} {[SQ <LIT_CHARS "git archive --format=zip --prefix=prefix/ HEAD >e.zip">]}  )
  (Com {[LIT_CHARS check_zip]} {[LIT_CHARS e]} {[LIT_CHARS prefix/]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive -0 --format=zip on large files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_config core.bigfilethreshold 1 &&\n"> <LIT_CHARS "\tgit archive -0 --format=zip HEAD >large.zip\n">]}  )
  (Com {[LIT_CHARS check_zip]} {[LIT_CHARS large]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --format=zip on large files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_config core.bigfilethreshold 1 &&\n"> <LIT_CHARS "\tgit archive --format=zip HEAD >large-compressed.zip\n">]}  )
  (Com {[LIT_CHARS check_zip]} {[LIT_CHARS large-compressed]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git archive --list outside of a git repo">]} {[SQ <LIT_CHARS "GIT_DIR=some/non-existing/directory git archive --list">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clients cannot access unreachable commits">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_commit unreachable &&\n"> <LIT_CHARS "\tsha1=`git rev-parse HEAD` &&\n"> <LIT_CHARS "\tgit reset --hard HEAD^ &&\n"> <LIT_CHARS "\tgit archive $sha1 >remote.tar &&\n"> <LIT_CHARS "\ttest_must_fail git archive --remote=. $sha1 >remote.tar\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "git-archive --prefix=olde-">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --prefix=olde- >h.tar HEAD &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tmkdir h &&\n"> <LIT_CHARS "\t\tcd h &&\n"> <LIT_CHARS "\t\t\"$TAR\" xf - <../h.tar\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\ttest -d h/olde-a &&\n"> <LIT_CHARS "\ttest -d h/olde-a/bin &&\n"> <LIT_CHARS "\ttest -f h/olde-a/bin/sh\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup tar filters">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config tar.tar.foo.command \"tr ab ba\" &&\n"> <LIT_CHARS "\tgit config tar.bar.command \"tr ab ba\" &&\n"> <LIT_CHARS "\tgit config tar.bar.remote true\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "archive --list mentions user filter">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --list >output &&\n"> <LIT_CHARS "\tgrep \"^tar\\.foo\\$\" output &&\n"> <LIT_CHARS "\tgrep \"^bar\\$\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "archive --list shows only enabled remote filters">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --list --remote=. >output &&\n"> <LIT_CHARS "\t! grep \"^tar\\.foo\\$\" output &&\n"> <LIT_CHARS "\tgrep \"^bar\\$\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "invoke tar filter by format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --format=tar.foo HEAD >config.tar.foo &&\n"> <LIT_CHARS "\ttr ab ba <config.tar.foo >config.tar &&\n"> <LIT_CHARS "\ttest_cmp b.tar config.tar &&\n"> <LIT_CHARS "\tgit archive --format=bar HEAD >config.bar &&\n"> <LIT_CHARS "\ttr ab ba <config.bar >config.tar &&\n"> <LIT_CHARS "\ttest_cmp b.tar config.tar\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "invoke tar filter by extension">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive -o config-implicit.tar.foo HEAD &&\n"> <LIT_CHARS "\ttest_cmp config.tar.foo config-implicit.tar.foo &&\n"> <LIT_CHARS "\tgit archive -o config-implicit.bar HEAD &&\n"> <LIT_CHARS "\ttest_cmp config.tar.foo config-implicit.bar\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "default output format remains tar">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive -o config-implicit.baz HEAD &&\n"> <LIT_CHARS "\ttest_cmp b.tar config-implicit.baz\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extension matching requires dot">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive -o config-implicittar.foo HEAD &&\n"> <LIT_CHARS "\ttest_cmp b.tar config-implicittar.foo\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "only enabled filters are available remotely">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git archive --remote=. --format=tar.foo HEAD \\\n"> <LIT_CHARS "\t\t>remote.tar.foo &&\n"> <LIT_CHARS "\tgit archive --remote=. --format=bar >remote.bar HEAD &&\n"> <LIT_CHARS "\ttest_cmp remote.bar config.bar\n">]}  )
  (If
    (Com {[VarSub GZIP]} {[LIT_CHARS --version]}
      <
      (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
      (DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2),
      >
    )
    (Com {[LIT_CHARS test_set_prereq]} {[LIT_CHARS GZIP]}    )
    (ElseTrue)
    (Com {[LIT_CHARS say]} {[DQ [LIT_CHARS "Skipping some tar.gz tests because gzip not found"]]}    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GZIP]} {[SQ <LIT_CHARS "git archive --format=tgz">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --format=tgz HEAD >j.tgz\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GZIP]} {[SQ <LIT_CHARS "git archive --format=tar.gz">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --format=tar.gz HEAD >j1.tar.gz &&\n"> <LIT_CHARS "\ttest_cmp j.tgz j1.tar.gz\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GZIP]} {[SQ <LIT_CHARS "infer tgz from .tgz filename">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --output=j2.tgz HEAD &&\n"> <LIT_CHARS "\ttest_cmp j.tgz j2.tgz\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GZIP]} {[SQ <LIT_CHARS "infer tgz from .tar.gz filename">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --output=j3.tar.gz HEAD &&\n"> <LIT_CHARS "\ttest_cmp j.tgz j3.tar.gz\n">]}  )
  (If
    (Com {[VarSub GUNZIP]} {[LIT_CHARS --version]}
      <
      (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
      (DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2),
      >
    )
    (Com {[LIT_CHARS test_set_prereq]} {[LIT_CHARS GUNZIP]}    )
    (ElseTrue)
    (Com {[LIT_CHARS say]} {[DQ [LIT_CHARS "Skipping some tar.gz tests because gunzip was not found"]]}    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GZIP] [LIT_COMMA ","] [LIT_CHARS GUNZIP]} {[SQ <LIT_CHARS "extract tgz file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t$GUNZIP -c <j.tgz >j.tar &&\n"> <LIT_CHARS "\ttest_cmp b.tar j.tar\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GZIP]} {[SQ <LIT_CHARS "remote tar.gz is allowed by default">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit archive --remote=. --format=tar.gz HEAD >remote.tar.gz &&\n"> <LIT_CHARS "\ttest_cmp j.tgz remote.tar.gz\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS GZIP]} {[SQ <LIT_CHARS "remote tar.gz can be disabled">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config tar.tar.gz.remote false &&\n"> <LIT_CHARS "\ttest_must_fail git archive --remote=. --format=tar.gz HEAD \\\n"> <LIT_CHARS "\t\t>remote.tar.gz\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)