(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "test git clone to cleanup after failure\n"> <LIT_CHARS "\n"> <LIT_CHARS "This test covers the fact that if git clone fails, it should remove\n"> <LIT_CHARS "the directory it created, to avoid the user having to manually\n"> <LIT_CHARS "remove the directory before attempting a clone again.">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone of non-existent source should fail">]} {[SQ <LIT_CHARS "test_must_fail git clone foo bar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "failed clone should not leave a directory">]} {[SQ <LIT_CHARS "! test -d bar">]}  )
  (Com {[LIT_CHARS test_create_repo]} {[LIT_CHARS foo]}  )
  (Subshell
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS cd]} {[LIT_CHARS foo]}      )
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS touch]} {[LIT_CHARS file]}        )
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS git]} {[LIT_CHARS add]} {[LIT_CHARS file]}          )
          (Com {[LIT_CHARS git]} {[LIT_CHARS commit]} {[LIT_CHARS -m]} {[SQ <LIT_CHARS "add file">]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
            (DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2),
            >
          )
        )
      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone of non-existent (relative to $PWD) source should fail">]} {[SQ <LIT_CHARS "test_must_fail git clone ../foo baz">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone should work now that source exists">]} {[SQ <LIT_CHARS "git clone foo bar">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "successful clone must leave the directory">]} {[SQ <LIT_CHARS "cd bar">]}  )
  (Com {[LIT_CHARS test_done]}  )
)