(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "git ls-tree directory and filenames handling.\n"> <LIT_CHARS "\n"> <LIT_CHARS "This test runs git ls-tree with the following in a tree.\n"> <LIT_CHARS "\n"> <LIT_CHARS "    1.txt              - a file\n"> <LIT_CHARS "    2.txt              - a file\n"> <LIT_CHARS "    path0/a/b/c/1.txt  - a file in a directory\n"> <LIT_CHARS "    path1/b/c/1.txt    - a file in a directory\n"> <LIT_CHARS "    path2/1.txt        - a file in a directory\n"> <LIT_CHARS "    path3/1.txt        - a file in a directory\n"> <LIT_CHARS "    path3/2.txt        - a file in a directory\n"> <LIT_CHARS "\n"> <LIT_CHARS "Test the handling of mulitple directories which have matching file\n"> <LIT_CHARS "entries.  Also test odd filename and missing entries handling.\n">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS setup>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo 111 >1.txt &&\n"> <LIT_CHARS "\techo 222 >2.txt &&\n"> <LIT_CHARS "\tmkdir path0 path0/a path0/a/b path0/a/b/c &&\n"> <LIT_CHARS "\techo 111 >path0/a/b/c/1.txt &&\n"> <LIT_CHARS "\tmkdir path1 path1/b path1/b/c &&\n"> <LIT_CHARS "\techo 111 >path1/b/c/1.txt &&\n"> <LIT_CHARS "\tmkdir path2 &&\n"> <LIT_CHARS "\techo 111 >path2/1.txt &&\n"> <LIT_CHARS "\tmkdir path3 &&\n"> <LIT_CHARS "\techo 111 >path3/1.txt &&\n"> <LIT_CHARS "\techo 222 >path3/2.txt &&\n"> <LIT_CHARS "\tfind *.txt path* \\( -type f -o -type l \\) -print |\n"> <LIT_CHARS "\txargs git update-index --add &&\n"> <LIT_CHARS "\ttree=`git write-tree` &&\n"> <LIT_CHARS "\techo $tree\n">]}  )
  (FunctionDef test_output []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "s/ "][VarSub _x40][LIT_CHARS "\t/ X\t/"]]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS current]} <REDIR_LESS "<"> 0),
        (FilenameRedirectNode filename={[LIT_CHARS check]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS test_cmp]} {[LIT_CHARS expected]} {[LIT_CHARS check]}      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree plain">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "100644 blob X\t2.txt\n"> <LIT_CHARS "040000 tree X\tpath0\n"> <LIT_CHARS "040000 tree X\tpath1\n"> <LIT_CHARS "040000 tree X\tpath2\n"> <LIT_CHARS "040000 tree X\tpath3\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree recursive">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree -r $tree >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "100644 blob X\t2.txt\n"> <LIT_CHARS "100644 blob X\tpath0/a/b/c/1.txt\n"> <LIT_CHARS "100644 blob X\tpath1/b/c/1.txt\n"> <LIT_CHARS "100644 blob X\tpath2/1.txt\n"> <LIT_CHARS "100644 blob X\tpath3/1.txt\n"> <LIT_CHARS "100644 blob X\tpath3/2.txt\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree filter 1.txt">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree 1.txt >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree filter path1/b/c/1.txt">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree path1/b/c/1.txt >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\tpath1/b/c/1.txt\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree filter all 1.txt files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree 1.txt path0/a/b/c/1.txt \\\n"> <LIT_CHARS "\t\tpath1/b/c/1.txt path2/1.txt path3/1.txt >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "100644 blob X\tpath0/a/b/c/1.txt\n"> <LIT_CHARS "100644 blob X\tpath1/b/c/1.txt\n"> <LIT_CHARS "100644 blob X\tpath2/1.txt\n"> <LIT_CHARS "100644 blob X\tpath3/1.txt\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree filter directories">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree path3 path2 path0/a/b/c path1/b/c path0/a >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "040000 tree X\tpath0/a/b/c\n"> <LIT_CHARS "040000 tree X\tpath1/b/c\n"> <LIT_CHARS "040000 tree X\tpath2\n"> <LIT_CHARS "040000 tree X\tpath3\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree filter odd names">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree 1.txt ./1.txt .//1.txt \\\n"> <LIT_CHARS "\t\tpath3/1.txt path3/./1.txt path3 path3// >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "100644 blob X\tpath3/1.txt\n"> <LIT_CHARS "100644 blob X\tpath3/2.txt\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree filter missing files and extra slashes">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree 1.txt/ abc.txt \\\n"> <LIT_CHARS "\t\tpath3//23.txt path3/2.txt/// >current &&\n"> <LIT_CHARS "\t>expected &&\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree filter is leading path match">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree $tree pa path3/a >current &&\n"> <LIT_CHARS "\t>expected &&\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree --full-name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd path0 &&\n"> <LIT_CHARS "\t\tgit ls-tree --full-name $tree a\n"> <LIT_CHARS "\t) >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "040000 tree X\tpath0/a\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree --full-tree">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd path1/b/c &&\n"> <LIT_CHARS "\t\tgit ls-tree --full-tree $tree\n"> <LIT_CHARS "\t) >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "100644 blob X\t2.txt\n"> <LIT_CHARS "040000 tree X\tpath0\n"> <LIT_CHARS "040000 tree X\tpath1\n"> <LIT_CHARS "040000 tree X\tpath2\n"> <LIT_CHARS "040000 tree X\tpath3\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree --full-tree -r">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd path3/ &&\n"> <LIT_CHARS "\t\tgit ls-tree --full-tree -r $tree\n"> <LIT_CHARS "\t) >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "100644 blob X\t2.txt\n"> <LIT_CHARS "100644 blob X\tpath0/a/b/c/1.txt\n"> <LIT_CHARS "100644 blob X\tpath1/b/c/1.txt\n"> <LIT_CHARS "100644 blob X\tpath2/1.txt\n"> <LIT_CHARS "100644 blob X\tpath3/1.txt\n"> <LIT_CHARS "100644 blob X\tpath3/2.txt\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree --abbrev=5">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree --abbrev=5 $tree >current &&\n"> <LIT_CHARS "\tsed -e \"s/ $_x05[0-9a-f]*\t/ X\t/\" <current >check &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "100644 blob X\t1.txt\n"> <LIT_CHARS "100644 blob X\t2.txt\n"> <LIT_CHARS "040000 tree X\tpath0\n"> <LIT_CHARS "040000 tree X\tpath1\n"> <LIT_CHARS "040000 tree X\tpath2\n"> <LIT_CHARS "040000 tree X\tpath3\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_cmp expected check\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree --name-only">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree --name-only $tree >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "1.txt\n"> <LIT_CHARS "2.txt\n"> <LIT_CHARS "path0\n"> <LIT_CHARS "path1\n"> <LIT_CHARS "path2\n"> <LIT_CHARS "path3\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "ls-tree --name-only -r">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit ls-tree --name-only -r $tree >current &&\n"> <LIT_CHARS "\tcat >expected <<\\EOF &&\n"> <LIT_CHARS "1.txt\n"> <LIT_CHARS "2.txt\n"> <LIT_CHARS "path0/a/b/c/1.txt\n"> <LIT_CHARS "path1/b/c/1.txt\n"> <LIT_CHARS "path2/1.txt\n"> <LIT_CHARS "path3/1.txt\n"> <LIT_CHARS "path3/2.txt\n"> <LIT_CHARS "EOF\n"> <LIT_CHARS "\ttest_output\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)