(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:test_description) op: assign_op.Equal rhs: { (SQ (Token id: Id.Lit_Chars val: 'test disabling of git-over-tcp in clone/fetch' span_id: 6 ) ) } spids: [4] ) ] ) (C {(.)} {(./test-lib.sh)}) (C {(.)} {(DQ ($ Id.VSub_DollarName '$TEST_DIRECTORY') (/lib-proto-disable.sh))}) (C {(.)} {(DQ ($ Id.VSub_DollarName '$TEST_DIRECTORY') (/lib-git-daemon.sh))}) (C {(start_git_daemon)}) (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'create git-accessible repo' span_id:33))} { (SQ (Token id:Id.Lit_Chars val:'\n' span_id:37) (Token id: Id.Lit_Chars val: '\tbare="$GIT_DAEMON_DOCUMENT_ROOT_PATH/repo.git" &&\n' span_id: 38 ) (Token id:Id.Lit_Chars val:'\ttest_commit one &&\n' span_id:39) (Token id:Id.Lit_Chars val:'\tgit --bare init "$bare" &&\n' span_id:40) (Token id:Id.Lit_Chars val:'\tgit push "$bare" HEAD &&\n' span_id:41) (Token id:Id.Lit_Chars val:'\t>"$bare/git-daemon-export-ok" &&\n' span_id:42) (Token id:Id.Lit_Chars val:'\tgit -C "$bare" config daemon.receivepack true\n' span_id:43) ) } ) (C {(test_proto)} {(DQ ('git://'))} {(git)} {(DQ ($ Id.VSub_DollarName '$GIT_DAEMON_URL') (/repo.git))} ) (C {(test_done)}) ] )