(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(clone)}
          spids: [4]
        )
      ]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(test_expect_success)} {(setup)} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:18) 
          (Token id:Id.Lit_Chars val:'\techo "#!/bin/sh" > not_ssh &&\n' span_id:19) (Token id:Id.Lit_Chars val:'\techo "echo \\"\\$*\\" > not_ssh_output" >> not_ssh &&\n' span_id:20) 
          (Token id:Id.Lit_Chars val:'\techo "exit 1" >> not_ssh &&\n' span_id:21) (Token id:Id.Lit_Chars val:'\tchmod +x not_ssh\n' span_id:22)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'clone calls git upload-pack unqualified with no -u option'
            span_id: 29
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:33) 
          (Token
            id: Id.Lit_Chars
            val: 
'\ttest_must_fail env GIT_SSH=./not_ssh git clone localhost:/path/to/repo junk &&\n'
            span_id: 34
          ) (Token id:Id.Lit_Chars val:'\techo "localhost git-upload-pack ' span_id:35)
        ) (word_part.EscapedLiteral token:(Token id:Id.Lit_EscapedChar val:"\\'" span_id:37)) 
        (SQ (Token id:Id.Lit_Chars val:/path/to/repo span_id:39)) (word_part.EscapedLiteral token:(Token id:Id.Lit_EscapedChar val:"\\'" span_id:41)) 
        (SQ (Token id:Id.Lit_Chars val:'" >expected &&\n' span_id:43) 
          (Token id:Id.Lit_Chars val:'\ttest_cmp expected not_ssh_output\n' span_id:44)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'clone calls specified git upload-pack with -u option'
            span_id: 51
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:55) 
          (Token
            id: Id.Lit_Chars
            val: '\ttest_must_fail env GIT_SSH=./not_ssh \\\n'
            span_id: 56
          ) 
          (Token
            id: Id.Lit_Chars
            val: 
'\t\tgit clone -u ./something/bin/git-upload-pack localhost:/path/to/repo junk &&\n'
            span_id: 57
          ) (Token id:Id.Lit_Chars val:'\techo "localhost ./something/bin/git-upload-pack ' span_id:58)
        ) (word_part.EscapedLiteral token:(Token id:Id.Lit_EscapedChar val:"\\'" span_id:60)) 
        (SQ (Token id:Id.Lit_Chars val:/path/to/repo span_id:62)) (word_part.EscapedLiteral token:(Token id:Id.Lit_EscapedChar val:"\\'" span_id:64)) 
        (SQ (Token id:Id.Lit_Chars val:'" >expected &&\n' span_id:66) 
          (Token id:Id.Lit_Chars val:'\ttest_cmp expected not_ssh_output\n' span_id:67)
        )
      }
    )
    (C {(test_done)})
  ]
)