(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git pack-object --include-tag">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('TRASH', {[ComSub (Com {[LIT_CHARS pwd]})]})])
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo c >d &&\n"> <LIT_CHARS "\tgit update-index --add d &&\n"> <LIT_CHARS "\ttree=$(git write-tree) &&\n"> <LIT_CHARS "\tcommit=$(git commit-tree $tree </dev/null) &&\n"> <LIT_CHARS "\techo \"object $commit\" >sig &&\n"> <LIT_CHARS "\techo \"type commit\" >>sig &&\n"> <LIT_CHARS "\techo \"tag mytag\" >>sig &&\n"> <LIT_CHARS "\techo \"tagger $(git var GIT_COMMITTER_IDENT)\" >>sig &&\n"> <LIT_CHARS "\techo >>sig &&\n"> <LIT_CHARS "\techo \"our test tag\" >>sig &&\n"> <LIT_CHARS "\ttag=$(git mktag <sig) &&\n"> <LIT_CHARS "\trm d sig &&\n"> <LIT_CHARS "\tgit update-ref refs/tags/mytag $tag && {\n"> <LIT_CHARS "\t\techo $tree &&\n"> <LIT_CHARS "\t\techo $commit &&\n"> <LIT_CHARS "\t\tgit ls-tree $tree | sed -e \"s/.* \\\\([0-9a-f]*\\\\)\t.*/\\\\1/\"\n"> <LIT_CHARS "\t} >obj-list\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "pack without --include-tag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tpackname=$(git pack-objects \\\n"> <LIT_CHARS "\t\t--window=0 \\\n"> <LIT_CHARS "\t\ttest-no-include <obj-list)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "unpack objects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf clone.git &&\n"> <LIT_CHARS "\tgit init clone.git &&\n"> <LIT_CHARS "\tgit -C clone.git unpack-objects <test-no-include-${packname}.pack\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check unpacked result (have commit, no tag)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit rev-list --objects $commit >list.expect &&\n"> <LIT_CHARS "\ttest_must_fail git -C clone.git cat-file -e $tag &&\n"> <LIT_CHARS "\tgit -C clone.git rev-list --objects $commit >list.actual &&\n"> <LIT_CHARS "\ttest_cmp list.expect list.actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "pack with --include-tag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tpackname=$(git pack-objects \\\n"> <LIT_CHARS "\t\t--window=0 \\\n"> <LIT_CHARS "\t\t--include-tag \\\n"> <LIT_CHARS "\t\ttest-include <obj-list)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "unpack objects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf clone.git &&\n"> <LIT_CHARS "\tgit init clone.git &&\n"> <LIT_CHARS "\tgit -C clone.git unpack-objects <test-include-${packname}.pack\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check unpacked result (have commit, have tag)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit rev-list --objects mytag >list.expect &&\n"> <LIT_CHARS "\tgit -C clone.git rev-list --objects $tag >list.actual &&\n"> <LIT_CHARS "\ttest_cmp list.expect list.actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "create hidden inner tag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_commit commit &&\n"> <LIT_CHARS "\tgit tag -m inner inner HEAD &&\n"> <LIT_CHARS "\tgit tag -m outer outer inner &&\n"> <LIT_CHARS "\tgit tag -d inner\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "pack explicit outer tag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tpackname=$(\n"> <LIT_CHARS "\t\t{\n"> <LIT_CHARS "\t\t\techo HEAD &&\n"> <LIT_CHARS "\t\t\techo outer\n"> <LIT_CHARS "\t\t} |\n"> <LIT_CHARS "\t\tgit pack-objects --revs test-hidden-explicit\n"> <LIT_CHARS "\t)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "unpack objects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf clone.git &&\n"> <LIT_CHARS "\tgit init clone.git &&\n"> <LIT_CHARS "\tgit -C clone.git unpack-objects <test-hidden-explicit-${packname}.pack\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check unpacked result (have all objects)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -C clone.git rev-list --objects $(git rev-parse outer HEAD)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "pack implied outer tag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tpackname=$(\n"> <LIT_CHARS "\t\techo HEAD |\n"> <LIT_CHARS "\t\tgit pack-objects --revs --include-tag test-hidden-implied\n"> <LIT_CHARS "\t)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "unpack objects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf clone.git &&\n"> <LIT_CHARS "\tgit init clone.git &&\n"> <LIT_CHARS "\tgit -C clone.git unpack-objects <test-hidden-implied-${packname}.pack\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check unpacked result (have all objects)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit -C clone.git rev-list --objects $(git rev-parse outer HEAD)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "single-branch clone can transfer tag">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf clone.git &&\n"> <LIT_CHARS "\tgit clone --no-local --single-branch -b master . clone.git &&\n"> <LIT_CHARS "\tgit -C clone.git fsck\n">]})
  (Com {[LIT_CHARS test_done]})
)