(command.CommandList children: [ (C {(.)} {(./test-lib.sh)}) (C {(unset)} {(CVS_SERVER)}) (command.If arms: [ (if_arm cond: [ (command.Pipeline children: [ (command.SimpleCommand words: [{(type)} {(cvs)}] redirects: [ (redir.Redir op: <Redir_Great '>'> fd: 16777215 arg_word: {(/dev/null)} ) (redir.Redir op:<Redir_GreatAnd '2>&'> fd:2 arg_word:{(1)}) ] ) ] negated: T ) ] action: [ (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:skip_all) op: Equal rhs: {(SQ <'skipping cvsimport tests, cvs not found'>)} ) ] ) (C {(test_done)}) ] ) ] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:CVS) op:Equal rhs:{(DQ ('cvs -f'))})] ) (C {(export)} {(CVS)}) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:cvsps_version) op: Equal rhs: { (word_part.CommandSubPart command_list: (command.CommandList children: [ (command.Pipeline children: [ (command.SimpleCommand words: [{(cvsps)} {(-h)}] redirects: [(redir.Redir op:<Redir_GreatAnd '2>&'> fd:2 arg_word:{(1)})] ) (C {(sed)} {(-ne)} {(SQ <'s/cvsps version //p'>)}) ] negated: F ) ] ) left_token: <Left_CommandSub '$('> ) } ) ] ) (command.Case to_match: {(DQ ($ VSub_DollarName '$cvsps_version'))} arms: [ (case_arm pat_list:[{(2.1)} {(2.2) (Lit_Other '*')}]) (case_arm pat_list: [{(SQ )}] action: [ (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:skip_all) op: Equal rhs: {(SQ <'skipping cvsimport tests, cvsps not found'>)} ) ] ) (C {(test_done)}) ] ) (case_arm pat_list: [{(Lit_Other '*')}] action: [ (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:skip_all) op: Equal rhs: {(SQ <'skipping cvsimport tests, unsupported cvsps version'>)} ) ] ) (C {(test_done)}) ] ) ] ) (command.FuncDef name: setup_cvs_test_repository body: (command.BraceGroup children: [ (command.AndOr ops: [Op_DAmp Op_DAmp] children: [ (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:CVSROOT) op: Equal rhs: { (DQ (word_part.CommandSubPart command_list: (command.CommandList children:[(C {(pwd)})]) left_token: <Left_CommandSub '$('> ) (/.cvsroot) ) } ) ] ) (C {(cp)} {(-r)} {(DQ ($ VSub_DollarName '$TEST_DIRECTORY') (/) ($ VSub_Number '$1') (/cvsroot))} {(DQ ($ VSub_DollarName '$CVSROOT'))} ) (C {(export)} {(CVSROOT)}) ] ) ] ) ) (command.FuncDef name: test_cvs_co body: (command.BraceGroup children: [ (C {(rm)} {(-rf)} {(module-cvs-) (DQ ($ VSub_Number '$1'))}) (command.If arms: [ (if_arm cond: [ (C {(Lit_Other '[')} {(DQ ($ VSub_Number '$1'))} {(Lit_Other '=')} {(DQ (master))} {(Lit_Other ']')} ) ] action: [ (C {($ VSub_DollarName '$CVS')} {(co)} {(-P)} {(-d)} {(module-cvs-) (DQ ($ VSub_Number '$1'))} {(-A)} {(module)} ) ] ) ] else_action: [ (C {($ VSub_DollarName '$CVS')} {(co)} {(-P)} {(-d)} {(module-cvs-) (DQ ($ VSub_Number '$1'))} {(-r)} {(DQ ($ VSub_Number '$1'))} {(module)} ) ] ) ] ) ) (command.FuncDef name: test_git_co body: (command.BraceGroup children: [ (command.Subshell command_list: (command.CommandList children: [ (command.AndOr ops: [Op_DAmp] children: [ (C {(cd)} {(module-git)}) (C {(git)} {(checkout)} {(DQ ($ VSub_Number '$1'))}) ] ) ] ) ) ] ) ) (command.FuncDef name: test_cmp_branch_file body: (command.BraceGroup children: [ (C {(test_cmp)} {(module-cvs-) (DQ ($ VSub_Number '$1')) (/) (DQ ($ VSub_Number '$2'))} {(module-git/) (DQ ($ VSub_Number '$2'))} ) ] ) ) (command.FuncDef name: test_cmp_branch_tree body: (command.BraceGroup children: [ (command.AndOr ops: [Op_DAmp Op_DAmp Op_DAmp Op_DAmp Op_DAmp] children: [ (C {(test_cvs_co)} {(DQ ($ VSub_Number '$1'))}) (C {(test_git_co)} {(DQ ($ VSub_Number '$1'))}) (command.Pipeline children: [ (command.Subshell command_list: (command.CommandList children: [ (C {(cd)} {(module-cvs-) (DQ ($ VSub_Number '$1'))}) (C {(find)} {(.)} {(-type)} {(d)} {(-name)} {(CVS)} {(-prune)} {(-o)} {(-type)} {(f)} {(-print)} ) ] ) ) (command.SimpleCommand words: [{(sort)}] redirects: [ (redir.Redir op: <Redir_Great '>'> fd: 16777215 arg_word: {(module-cvs-) (DQ ($ VSub_Number '$1')) (.list)} ) ] ) ] negated: F ) (command.Pipeline children: [ (command.Subshell command_list: (command.CommandList children: [ (C {(cd)} {(module-git)}) (C {(find)} {(.)} {(-type)} {(d)} {(-name)} {(.git)} {(-prune)} {(-o)} {(-type)} {(f)} {(-print)} ) ] ) ) (command.SimpleCommand words: [{(sort)}] redirects: [ (redir.Redir op: <Redir_Great '>'> fd: 16777215 arg_word: {(module-git-) (DQ ($ VSub_Number '$1')) (.list)} ) ] ) ] negated: F ) (C {(test_cmp)} {(module-cvs-) (DQ ($ VSub_Number '$1')) (.list)} {(module-git-) (DQ ($ VSub_Number '$1')) (.list)} ) (command.Pipeline children: [ (C {(cat)} {(module-cvs-) (DQ ($ VSub_Number '$1')) (.list)}) (command.WhileUntil keyword: <KW_While while> cond: [(C {(read)} {(f)})] body: (command.DoGroup children: [ (command.AndOr ops: [Op_DPipe] children: [ (C {(test_cmp_branch_file)} {(DQ ($ VSub_Number '$1'))} {(DQ ($ VSub_DollarName '$f'))} ) (command.ControlFlow token: <ControlFlow_Return return> arg_word: {(1)} ) ] ) ] ) ) ] negated: F ) ] ) ] ) ) ] )