(CommandList children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:test_description spids:[4]) op: Equal rhs: {(SQ <'check output directory names used by git-clone'>)} spids: [4] ) ] spids: [4] ) (C {(.)} {(./test-lib.sh)}) (C {(test_expect_success)} {(SQ <'setup ssh wrapper'>)} { (SQ <'\n'> <'\twrite_script "$TRASH_DIRECTORY/ssh-wrapper" <<-\\EOF &&\n'> <'\tgit upload-pack "$TRASH_DIRECTORY"\n'> <'\tEOF\n'> <'\tGIT_SSH="$TRASH_DIRECTORY/ssh-wrapper" &&\n'> <'\texport GIT_SSH &&\n'> <'\texport TRASH_DIRECTORY\n'> ) } ) (FuncDef name: test_clone_dir body: (BraceGroup children: [ (Sentence child: (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:url spids:[51]) op: Equal rhs: {($ VSub_Number '$1')} spids: [51] ) ] spids: [51] ) terminator: <Op_Semi ';'> ) (C {(shift)}) (Sentence child: (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:dir spids:[58]) op: Equal rhs: {($ VSub_Number '$1')} spids: [58] ) ] spids: [58] ) terminator: <Op_Semi ';'> ) (C {(shift)}) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:expect spids:[65]) op: Equal rhs: {(success)} spids: [65] ) ] spids: [65] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:bare spids:[69]) op: Equal rhs: {(non-bare)} spids: [69] ) ] spids: [69] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:clone_opts spids:[73]) op: Equal rhs: (EmptyWord) spids: [73] ) ] spids: [73] ) (ForEach iter_name: i iter_words: [{(DQ ($ VSub_At '$@'))}] do_arg_iter: F body: (DoGroup children: [ (Case to_match: {(DQ ($ VSub_Name '$i'))} arms: [ (case_arm pat_list: [{(fail)}] action: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:expect spids:[103]) op: Equal rhs: {(failure)} spids: [103] ) ] spids: [103] ) ] spids: [99 100 107 16777215] ) (case_arm pat_list: [{(bare)}] action: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:bare spids:[114]) op: Equal rhs: {(bare)} spids: [114] ) ] spids: [114] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:clone_opts spids:[118]) op: Equal rhs: {(--bare)} spids: [118] ) ] spids: [118] ) ] spids: [110 111 122 16777215] ) ] spids: [90 96 125] ) ] spids: [87 128] ) spids: [81 16777215] ) (C {(test_expect_) ($ VSub_Name '$expect')} { (DQ ('clone of ') ($ VSub_Name '$url') (' goes to ') ($ VSub_Name '$dir') (' (') ($ VSub_Name '$bare') (')') ) } { (DQ ('\n') ('\t\trm -rf ') ($ VSub_Name '$dir') (' &&\n') ('\t\tgit clone ') ($ VSub_Name '$clone_opts') (' ') ($ VSub_Name '$url') (' &&\n') ('\t\ttest_path_is_dir ') ($ VSub_Name '$dir') ('\n') ('\t') ) } ) ] spids: [48] ) spids: [43 47] ) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo)} {(foo.git)} {(bare)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo.git)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo.git)} {(foo.git)} {(bare)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo/.git)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo/.git)} {(foo.git)} {(bare)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo)} {(foo.git)} {(bare)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo.git)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo.git)} {(foo.git)} {(bare)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo/.git)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo/.git)} {(foo.git)} {(bare)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo/)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo///)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo/.git/)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo.git/)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo.git///)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo///.git/)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo/.git///)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo/)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo///)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo.git/)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo/.git/)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo.git///)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo///.git/)} {(foo)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (foo/.git///)} {(foo)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/)} {(host)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host) (Lit_Other ':') (1234/)} {(host)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other '@') (host/)} {(host)}) (C {(test_clone_dir)} {(host) (Lit_Other ':') (/)} {(host)}) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other ':') (password) (Lit_Other '@') (host/)} {(host)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other ':') (password) (Lit_Other '@') (host) (Lit_Other ':') (1234/) } {(host)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other ':') (passw) (Lit_Other '@') (rd) (Lit_Other '@') (host) (Lit_Other ':') (1234/) } {(host)} ) (C {(test_clone_dir)} {(user) (Lit_Other '@') (host) (Lit_Other ':') (/)} {(host)}) (C {(test_clone_dir)} {(user) (Lit_Other ':') (password) (Lit_Other '@') (host) (Lit_Other ':') (/)} {(host)} ) (C {(test_clone_dir)} {(user) (Lit_Other ':') (passw) (Lit_Other '@') (rd) (Lit_Other '@') (host) (Lit_Other ':') (/)} {(host)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo) (Lit_Other '@') (bar)} {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//host/foo) (Lit_Other '@') (bar.git)} {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other ':') (password) (Lit_Other '@') (host/foo) (Lit_Other '@') (bar) } {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other ':') (passw) (Lit_Other '@') (rd) (Lit_Other '@') (host/foo) (Lit_Other '@') (bar.git) } {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(host) (Lit_Other ':') (/foo) (Lit_Other '@') (bar)} {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(host) (Lit_Other ':') (/foo) (Lit_Other '@') (bar.git)} {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(user) (Lit_Other ':') (password) (Lit_Other '@') (host) (Lit_Other ':') (/foo) (Lit_Other '@') (bar) } {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(user) (Lit_Other ':') (passw) (Lit_Other '@') (rd) (Lit_Other '@') (host) (Lit_Other ':') (/foo) (Lit_Other '@') (bar.git) } {(foo) (Lit_Other '@') (bar)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other ':') (password) (Lit_Other '@') (host/test) (Lit_Other ':') (1234) } {(1234)} ) (C {(test_clone_dir)} {(ssh) (Lit_Other ':') (//user) (Lit_Other ':') (password) (Lit_Other '@') (host/test) (Lit_Other ':') (1234.git) } {(1234)} ) (C {(test_done)}) ] )