(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[LIT_CHARS clone]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"#!/bin/sh\" > not_ssh &&\n"> <LIT_CHARS "\techo \"echo \\\"\\$*\\\" > not_ssh_output\" >> not_ssh &&\n"> <LIT_CHARS "\techo \"exit 1\" >> not_ssh &&\n"> <LIT_CHARS "\tchmod +x not_ssh\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone calls git upload-pack unqualified with no -u option">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tGIT_SSH=./not_ssh &&\n"> <LIT_CHARS "\t\texport GIT_SSH &&\n"> <LIT_CHARS "\t\ttest_must_fail git clone localhost:/path/to/repo junk\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\techo \"localhost git-upload-pack ">] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS /path/to/repo>] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS "\" >expected &&\n"> <LIT_CHARS "\ttest_cmp expected not_ssh_output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone calls specified git upload-pack with -u option">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tGIT_SSH=./not_ssh &&\n"> <LIT_CHARS "\t\texport GIT_SSH &&\n"> <LIT_CHARS "\t\ttest_must_fail git clone -u ./something/bin/git-upload-pack localhost:/path/to/repo junk\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\techo \"localhost ./something/bin/git-upload-pack ">] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS /path/to/repo>] [\ LIT_ESCAPED_CHAR "\\'"] [SQ <LIT_CHARS "\" >expected &&\n"> <LIT_CHARS "\ttest_cmp expected not_ssh_output\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)