(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "test cloning a repository with detached HEAD">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (FunctionDef head_is_detached []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS git]} {[LIT_CHARS --git-dir] [LIT_OTHER "="] [VarSub 1] [LIT_CHARS /.git]} {[LIT_CHARS rev-parse]} {[LIT_CHARS --verify]} {[LIT_CHARS HEAD]})
      (Com {[LIT_CHARS test_must_fail]} {[LIT_CHARS git]} {[LIT_CHARS --git-dir] [LIT_OTHER "="] [VarSub 1] [LIT_CHARS /.git]} {[LIT_CHARS symbolic-ref]} {[LIT_CHARS HEAD]})
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS setup>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo one >file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tgit commit -m one &&\n"> <LIT_CHARS "\techo two >file &&\n"> <LIT_CHARS "\tgit commit -a -m two &&\n"> <LIT_CHARS "\tgit tag two &&\n"> <LIT_CHARS "\techo three >file &&\n"> <LIT_CHARS "\tgit commit -a -m three\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone repo (detached HEAD points to branch)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout master^0 &&\n"> <LIT_CHARS "\tgit clone \"file://$PWD\" detached-branch\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cloned HEAD matches">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo three >expect &&\n"> <LIT_CHARS "\tgit --git-dir=detached-branch/.git log -1 --format=%s >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]})
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "cloned HEAD is detached">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\thead_is_detached detached-branch\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone repo (detached HEAD points to tag)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout two^0 &&\n"> <LIT_CHARS "\tgit clone \"file://$PWD\" detached-tag\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cloned HEAD matches">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo two >expect &&\n"> <LIT_CHARS "\tgit --git-dir=detached-tag/.git log -1 --format=%s >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cloned HEAD is detached">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\thead_is_detached detached-tag\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone repo (detached HEAD points to history)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout two^ &&\n"> <LIT_CHARS "\tgit clone \"file://$PWD\" detached-history\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cloned HEAD matches">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo one >expect &&\n"> <LIT_CHARS "\tgit --git-dir=detached-history/.git log -1 --format=%s >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cloned HEAD is detached">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\thead_is_detached detached-history\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone repo (orphan detached HEAD)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout master^0 &&\n"> <LIT_CHARS "\techo four >file &&\n"> <LIT_CHARS "\tgit commit -a -m four &&\n"> <LIT_CHARS "\tgit clone \"file://$PWD\" detached-orphan\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cloned HEAD matches">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo four >expect &&\n"> <LIT_CHARS "\tgit --git-dir=detached-orphan/.git log -1 --format=%s >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cloned HEAD is detached">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\thead_is_detached detached-orphan\n">]})
  (Com {[LIT_CHARS test_done]})
)