(CommandList children: [ (C {(Lit_Other ":")} {(included)} {(from)} {(6002)} {(and)} {(others)}) (C {(mkdir)} {(-p)} {(.git/refs/tags)}) (SimpleCommand redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(sed.script)} spids:[20])] ) (FuncDef name: tag body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_tag) op: Equal rhs: {($ VSub_Number "$1")} spids: [35] ) ] spids: [35] ) (AndOr children: [ (C {(test)} {(-f)} {(DQ (.git/refs/tags/) ($ VSub_Name "$_tag"))}) (C {(error)} { (DQ ("tag: ") (EscapedLiteralPart token:<Lit_EscapedChar "\\\"">) ($ VSub_Name "$_tag") (EscapedLiteralPart token:<Lit_EscapedChar "\\\"">) (" does not exist") ) } ) ] op_id: Op_DPipe ) (C {(cat)} {(DQ (.git/refs/tags/) ($ VSub_Name "$_tag"))}) ] spids: [32] ) spids: [27 31] ) (FuncDef name: unique_commit body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_text) op: Equal rhs: {($ VSub_Number "$1")} spids: [85] ) ] spids: [85] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_tree) op: Equal rhs: {($ VSub_Number "$2")} spids: [89] ) ] spids: [89] ) (C {(shift)} {(2)}) (Pipeline children: [ (C {(echo)} {(DQ ($ VSub_Name "$_text"))}) (C {(git)} {(commit-tree)} { (CommandSubPart command_list: (CommandList children: [(C {(tag)} {(DQ ($ VSub_Name "$_tree"))})] ) left_token: <Left_CommandSub "$("> spids: [110 116] ) } {(DQ ($ VSub_At "$@"))} ) ] negated: False ) ] spids: [82] ) spids: [77 81] ) (FuncDef name: save_tag body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_tag) op: Equal rhs: {($ VSub_Number "$1")} spids: [139] ) ] spids: [139] ) (AndOr children: [ (C {(test)} {(-n)} {(DQ ($ VSub_Name "$_tag"))}) (C {(error)} {(DQ ("usage: save_tag tag commit-args ..."))}) ] op_id: Op_DPipe ) (C {(shift)} {(1)}) (SimpleCommand words: [{(DQ ($ VSub_At "$@"))}] redirects: [ (Redir op_id: Redir_Great fd: -1 arg_word: {(DQ (.git/refs/tags/) ($ VSub_Name "$_tag"))} spids: [169] ) ] ) (SimpleCommand words: [ {(echo)} { (DQ (s/) (CommandSubPart command_list: (CommandList children:[(C {(tag)} {($ VSub_Name "$_tag")})]) left_token: <Left_CommandSub "$("> spids: [181 185] ) (/) ($ VSub_Name "$_tag") (/g) ) } ] redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(sed.script.tmp)} spids:[191])] ) (SimpleCommand words: [{(cat)} {(sed.script)}] redirects: [(Redir op_id:Redir_DGreat fd:-1 arg_word:{(sed.script.tmp)} spids:[199])] ) (C {(rm)} {(sed.script)}) (C {(mv)} {(sed.script.tmp)} {(sed.script)}) ] spids: [136] ) spids: [131 135] ) (FuncDef name: entag body: (BraceGroup children:[(C {(sed)} {(-f)} {(sed.script)})] spids:[225]) spids: [220 224] ) (FuncDef name: as_author body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_author) op: Equal rhs: {($ VSub_Number "$1")} spids: [251] ) ] spids: [251] ) (C {(shift)} {(1)}) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_save) op: Equal rhs: {($ VSub_Name "$GIT_AUTHOR_EMAIL")} spids: [260] ) ] spids: [260] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:GIT_AUTHOR_EMAIL) op: Equal rhs: {(DQ ($ VSub_Name "$_author"))} spids: [265] ) ] spids: [265] ) (C {(export)} {(GIT_AUTHOR_EMAIL)}) (C {(DQ ($ VSub_At "$@"))}) (If arms: [ (if_arm cond: [(C {(test)} {(-z)} {(DQ ($ VSub_Name "$_save"))})] action: [(C {(unset)} {(GIT_AUTHOR_EMAIL)})] spids: [-1 292] ) ] else_action: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:GIT_AUTHOR_EMAIL) op: Equal rhs: {(DQ ($ VSub_Name "$_save"))} spids: [303] ) ] spids: [303] ) (C {(export)} {(GIT_AUTHOR_EMAIL)}) ] spids: [300 314] ) ] spids: [248] ) spids: [243 247] ) (FuncDef name: commit_date body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_commit) op: Equal rhs: {($ VSub_Number "$1")} spids: [327] ) ] spids: [327] ) (Pipeline children: [ (C {(git)} {(cat-file)} {(commit)} {($ VSub_Name "$_commit")}) (C {(sed)} {(-n)} { (DQ ("s/^committer .*> ") (EscapedLiteralPart token:<Lit_EscapedChar "\\(">) ("[0-9]*") (EscapedLiteralPart token:<Lit_EscapedChar "\\)">) (" .*/") (EscapedLiteralPart token:<Lit_EscapedChar "\\1">) (/p) ) } ) ] negated: False ) ] spids: [324] ) spids: [319 323] ) (FuncDef name: assign_fake_date body: (BraceGroup children: [ (Case to_match: {(DQ ($ VSub_Number "$2"))} arms: [ (case_arm pat_list: [ {(Lit_Other "?") (Lit_Other "?") (Lit_Other ":") (Lit_Other "?") (Lit_Other "?") (Lit_Other ":") (Lit_Other "?") (Lit_Other "?") } ] action: [ (C {(eval)} {(DQ ($ VSub_Number "$1") ("='1971-08-16 ") ($ VSub_Number "$2") ("'"))}) ] spids: [382 390 401 -1] ) (case_arm pat_list: [ {(Lit_Other "?") (Lit_Other "?") (Lit_Other ":") (Lit_Other "?") (Lit_Other "?")} ] action: [ (C {(eval)} {(DQ ($ VSub_Number "$1") ("='1971-08-16 00:") ($ VSub_Number "$2") ("'"))} ) ] spids: [404 409 420 -1] ) (case_arm pat_list: [{(Lit_Other "?") (Lit_Other "?")}] action: [ (C {(eval)} {(DQ ($ VSub_Number "$1") ("='1971-08-16 00:00:") ($ VSub_Number "$2") ("'"))} ) ] spids: [423 425 436 -1] ) (case_arm pat_list: [{(Lit_Other "*")}] action: [(C {(eval)} {(DQ ($ VSub_Number "$1") ("='") ($ VSub_Number "$2") ("'"))})] spids: [439 440 451 -1] ) ] spids: [373 379 454] ) ] spids: [370] ) spids: [365 369] ) (FuncDef name: on_committer_date body: (BraceGroup children: [ (C {(assign_fake_date)} {(GIT_COMMITTER_DATE)} {(DQ ($ VSub_Number "$1"))}) (C {(export)} {(GIT_COMMITTER_DATE)}) (C {(shift)} {(1)}) (C {(DQ ($ VSub_At "$@"))}) ] spids: [464] ) spids: [459 463] ) (FuncDef name: on_dates body: (BraceGroup children: [ (C {(assign_fake_date)} {(GIT_COMMITTER_DATE)} {(DQ ($ VSub_Number "$1"))}) (C {(assign_fake_date)} {(GIT_AUTHOR_DATE)} {(DQ ($ VSub_Number "$2"))}) (C {(export)} {(GIT_COMMITTER_DATE)} {(GIT_AUTHOR_DATE)}) (C {(shift)} {(2)}) (C {(DQ ($ VSub_At "$@"))}) ] spids: [498] ) spids: [493 497] ) (FuncDef name: hide_error body: (BraceGroup children: [ (SimpleCommand words: [{(DQ ($ VSub_At "$@"))}] redirects: [(Redir op_id:Redir_Great fd:2 arg_word:{(/dev/null)} spids:[553])] ) ] spids: [546] ) spids: [541 545] ) (FuncDef name: check_output body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_name) op: Equal rhs: {($ VSub_Number "$1")} spids: [567] ) ] spids: [567] ) (C {(shift)} {(1)}) (If arms: [ (if_arm cond: [ (Pipeline children: [ (C {(eval)} {(DQ ($ VSub_Star "$*"))}) (SimpleCommand words: [{(entag)}] redirects: [ (Redir op_id: Redir_Great fd: -1 arg_word: {(DQ ($ VSub_Name "$_name") (.actual))} spids: [588] ) ] ) ] negated: False ) ] action: [ (C {(test_cmp)} {(DQ ($ VSub_Name "$_name") (.expected))} {(DQ ($ VSub_Name "$_name") (.actual))} ) ] spids: [-1 595] ) ] else_action: [(ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})] spids: [611 619] ) ] spids: [564] ) spids: [559 563] ) (FuncDef name: name_from_description body: (BraceGroup children: [ (C {(perl)} {(-pe)} { (SQ <"\n"> <"\t\ts/[^A-Za-z0-9.]/-/g;\n"> <"\t\ts/-+/-/g;\n"> <"\t\ts/-$//;\n"> <"\t\ts/^-//;\n"> <"\t\ty/A-Z/a-z/;\n"> <"\t"> ) } ) ] spids: [638] ) spids: [633 637] ) (FuncDef name: test_output_expect_success body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_description) op: Equal rhs: {($ VSub_Number "$1")} spids: [678] ) ] spids: [678] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_test) op: Equal rhs: {($ VSub_Number "$2")} spids: [682] ) ] spids: [682] ) (AndOr children: [ (C {(test)} {($ VSub_Pound "$#")} {(-eq)} {(2)}) (C {(error)} {(DQ ("usage: test_output_expect_success description test <<EOF ... EOF"))}) ] op_id: Op_DPipe ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_name) op: Equal rhs: { (CommandSubPart command_list: (CommandList children: [ (Pipeline children: [ (C {(echo)} {($ VSub_Name "$_description")}) (C {(name_from_description)}) ] negated: False ) ] ) left_token: <Left_CommandSub "$("> spids: [706 714] ) } spids: [705] ) ] spids: [705] ) (SimpleCommand words: [{(cat)}] redirects: [ (Redir op_id: Redir_Great fd: -1 arg_word: {(DQ ($ VSub_Name "$_name") (.expected))} spids: [719] ) ] ) (C {(test_expect_success)} {(DQ ($ VSub_Name "$_description"))} { (DQ ("check_output ") ($ VSub_Name "$_name") (" ") (EscapedLiteralPart token:<Lit_EscapedChar "\\\"">) ($ VSub_Name "$_test") (EscapedLiteralPart token:<Lit_EscapedChar "\\\"">) ) } ) ] spids: [675] ) spids: [671 674] ) ] )