(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS ".git file\n"> <LIT_CHARS "\n"> <LIT_CHARS "Verify that plumbing commands work when .git is a file\n">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (FunctionDef objpath []
    (Pipeline
      (Com {[LIT_CHARS echo]} {[DQ [VarSub 1]]}      )
      (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "s|\\(..\\)|\\1/|">]}      )
    )
  )
  (FunctionDef objck []
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('p', {[ComSub (Com {[LIT_CHARS objpath]} {[DQ [VarSub 1]]})]})])
      (If
        (Com {[LIT_CHARS test]} {[LIT_OTHER "!"]} {[LIT_CHARS -f]} {[DQ [VarSub REAL][LIT_CHARS /objects/][VarSub p]]}        )
        (List
          (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Object not found: "][VarSub REAL][LIT_CHARS /objects/][VarSub p]]}          )
          (Com {[LIT_CHARS false]}          )
        )
      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "initial setup">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tREAL=\"$(pwd)/.real\" &&\n"> <LIT_CHARS "\tmv .git \"$REAL\"\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "bad setup: invalid .git file format">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"gitdir $REAL\" >.git &&\n"> <LIT_CHARS "\tif git rev-parse 2>.err\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\techo \"git rev-parse accepted an invalid .git file\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\tfi &&\n"> <LIT_CHARS "\tif ! grep \"Invalid gitfile format\" .err\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\techo \"git rev-parse returned wrong error\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\tfi\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "bad setup: invalid .git file path">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"gitdir: $REAL.not\" >.git &&\n"> <LIT_CHARS "\tif git rev-parse 2>.err\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\techo \"git rev-parse accepted an invalid .git file path\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\tfi &&\n"> <LIT_CHARS "\tif ! grep \"Not a git repository\" .err\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\techo \"git rev-parse returned wrong error\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\tfi\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "final setup + check rev-parse --git-dir">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"gitdir: $REAL\" >.git &&\n"> <LIT_CHARS "\ttest \"$REAL\" = \"$(git rev-parse --git-dir)\"\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check hash-object">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"foo\" >bar &&\n"> <LIT_CHARS "\tSHA=$(cat bar | git hash-object -w --stdin) &&\n"> <LIT_CHARS "\tobjck $SHA\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check cat-file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit cat-file blob $SHA >actual &&\n"> <LIT_CHARS "\ttest_cmp bar actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check update-index">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tif test -f \"$REAL/index\"\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\techo \"Hmm, $REAL/index exists?\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\tfi &&\n"> <LIT_CHARS "\trm -f \"$REAL/objects/$(objpath $SHA)\" &&\n"> <LIT_CHARS "\tgit update-index --add bar &&\n"> <LIT_CHARS "\tif ! test -f \"$REAL/index\"\n"> <LIT_CHARS "\tthen\n"> <LIT_CHARS "\t\techo \"$REAL/index not found\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\tfi &&\n"> <LIT_CHARS "\tobjck $SHA\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check write-tree">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tSHA=$(git write-tree) &&\n"> <LIT_CHARS "\tobjck $SHA\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check commit-tree">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tSHA=$(echo \"commit bar\" | git commit-tree $SHA) &&\n"> <LIT_CHARS "\tobjck $SHA\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "check rev-list">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo $SHA >\"$REAL/HEAD\" &&\n"> <LIT_CHARS "\ttest \"$SHA\" = \"$(git rev-list HEAD)\"\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)