(command.CommandList
  children: [
    (command.Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (lhs_expr.LhsName name:test_description)
          op: Equal
          rhs: {(SQ <'log --grep/--author/--regexp-ignore-case/-S/-G'>)}
        )
      ]
    )
    (C {(.)} {(./test-lib.sh)})
    (command.FuncDef
      name: test_log
      body: 
        (command.BraceGroup
          children: [
            (command.Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (lhs_expr.LhsName name:expect)
                  op: Equal
                  rhs: {($ VSub_Number '$1')}
                )
              ]
            )
            (command.Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (lhs_expr.LhsName name:kind)
                  op: Equal
                  rhs: {($ VSub_Number '$2')}
                )
              ]
            )
            (command.Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (lhs_expr.LhsName name:needle)
                  op: Equal
                  rhs: {($ VSub_Number '$3')}
                )
              ]
            )
            (C {(shift)} {(3)})
            (command.Assignment
              keyword: Assign_None
              pairs: [(assign_pair lhs:(lhs_expr.LhsName name:rest) op:Equal rhs:{($ VSub_At '$@')})]
            )
            (command.Case
              to_match: {($ VSub_DollarName '$kind')}
              arms: [
                (case_arm
                  pat_list: [{(--) (Lit_Other '*')}]
                  action: [
                    (command.Assignment
                      keyword: Assign_None
                      pairs: [
                        (assign_pair
                          lhs: (lhs_expr.LhsName name:opt)
                          op: Equal
                          rhs: 
                            {($ VSub_DollarName '$kind') (Lit_Other '=') ($ VSub_DollarName '$needle')}
                        )
                      ]
                    )
                  ]
                )
                (case_arm
                  pat_list: [{(Lit_Other '*')}]
                  action: [
                    (command.Assignment
                      keyword: Assign_None
                      pairs: [
                        (assign_pair
                          lhs: (lhs_expr.LhsName name:opt)
                          op: Equal
                          rhs: {($ VSub_DollarName '$kind') ($ VSub_DollarName '$needle')}
                        )
                      ]
                    )
                  ]
                )
              ]
            )
            (command.Case
              to_match: {($ VSub_DollarName '$expect')}
              arms: [
                (case_arm
                  pat_list: [{(expect_nomatch)}]
                  action: [
                    (command.Assignment
                      keyword: Assign_None
                      pairs: [(assign_pair lhs:(lhs_expr.LhsName name:match) op:Equal rhs:{(nomatch)})]
                    )
                  ]
                )
                (case_arm
                  pat_list: [{(Lit_Other '*')}]
                  action: [
                    (command.Assignment
                      keyword: Assign_None
                      pairs: [(assign_pair lhs:(lhs_expr.LhsName name:match) op:Equal rhs:{(match)})]
                    )
                  ]
                )
              ]
            )
            (C {(test_expect_success)} 
              {
                (DQ ('log ') ($ VSub_DollarName '$kind') 
                  (word_part.BracedVarSub
                    token: <VSub_Name rest>
                    suffix_op: 
                      (suffix_op.StringUnary
                        op_id: VTest_ColonPlus
                        arg_word: {(' ') ($ VSub_DollarName '$rest')}
                      )
                  ) (' (') ($ VSub_DollarName '$match') (')')
                )
              } 
              {
                (DQ ('\n') ('\t\tgit log ') ($ VSub_DollarName '$rest') (' ') ($ VSub_DollarName '$opt') 
                  (' --format=%H >actual &&\n') ('\t\ttest_cmp ') ($ VSub_DollarName '$expect') (' actual\n') ('\t')
                )
              }
            )
          ]
        )
    )
    (command.FuncDef
      name: test_log_icase
      body: 
        (command.BraceGroup
          children: [
            (C {(test_log)} {($ VSub_At '$@')} {(--regexp-ignore-case)})
            (C {(test_log)} {($ VSub_At '$@')} {(-i)})
          ]
        )
    )
    (C {(test_expect_success)} {(setup)} 
      {
        (SQ <'\n'> <'\t>expect_nomatch &&\n'> <'\n'> <'\t>file &&\n'> <'\tgit add file &&\n'> 
          <'\ttest_tick &&\n'> <'\tgit commit -m initial &&\n'> <'\tgit rev-parse --verify HEAD >expect_initial &&\n'> <'\n'> 
          <'\techo Picked >file &&\n'> <'\tgit add file &&\n'> <'\ttest_tick &&\n'> 
          <'\tgit commit --author="Another Person <another@example.com>" -m second &&\n'> <'\tgit rev-parse --verify HEAD >expect_second\n'>
        )
      }
    )
    (C {(test_log)} {(expect_initial)} {(--grep)} {(initial)})
    (C {(test_log)} {(expect_nomatch)} {(--grep)} {(InItial)})
    (C {(test_log_icase)} {(expect_initial)} {(--grep)} {(InItial)})
    (C {(test_log_icase)} {(expect_nomatch)} {(--grep)} {(initail)})
    (C {(test_log)} {(expect_second)} {(--author)} {(Person)})
    (C {(test_log)} {(expect_nomatch)} {(--author)} {(person)})
    (C {(test_log_icase)} {(expect_second)} {(--author)} {(person)})
    (C {(test_log_icase)} {(expect_nomatch)} {(--author)} {(spreon)})
    (C {(test_log)} {(expect_nomatch)} {(-G)} {(picked)})
    (C {(test_log)} {(expect_second)} {(-G)} {(Picked)})
    (C {(test_log_icase)} {(expect_nomatch)} {(-G)} {(pickle)})
    (C {(test_log_icase)} {(expect_second)} {(-G)} {(picked)})
    (C {(test_expect_success)} {(SQ <'log -G --textconv (missing textconv tool)'>)} 
      {
        (SQ <'\n'> <'\techo "* diff=test" >.gitattributes &&\n'> 
          <'\ttest_must_fail git -c diff.test.textconv=missing log -Gfoo &&\n'> <'\trm .gitattributes\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'log -G --no-textconv (missing textconv tool)'>)} 
      {
        (SQ <'\n'> <'\techo "* diff=test" >.gitattributes &&\n'> 
          <'\tgit -c diff.test.textconv=missing log -Gfoo --no-textconv >actual &&\n'> <'\ttest_cmp expect_nomatch actual &&\n'> <'\trm .gitattributes\n'>
        )
      }
    )
    (C {(test_log)} {(expect_nomatch)} {(-S)} {(picked)})
    (C {(test_log)} {(expect_second)} {(-S)} {(Picked)})
    (C {(test_log_icase)} {(expect_second)} {(-S)} {(picked)})
    (C {(test_log_icase)} {(expect_nomatch)} {(-S)} {(pickle)})
    (C {(test_log)} {(expect_nomatch)} {(-S)} {(p.cked)} {(--pickaxe-regex)})
    (C {(test_log)} {(expect_second)} {(-S)} {(P.cked)} {(--pickaxe-regex)})
    (C {(test_log_icase)} {(expect_second)} {(-S)} {(p.cked)} {(--pickaxe-regex)})
    (C {(test_log_icase)} {(expect_nomatch)} {(-S)} {(p.ckle)} {(--pickaxe-regex)})
    (C {(test_expect_success)} {(SQ <'log -S --textconv (missing textconv tool)'>)} 
      {
        (SQ <'\n'> <'\techo "* diff=test" >.gitattributes &&\n'> 
          <'\ttest_must_fail git -c diff.test.textconv=missing log -Sfoo &&\n'> <'\trm .gitattributes\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'log -S --no-textconv (missing textconv tool)'>)} 
      {
        (SQ <'\n'> <'\techo "* diff=test" >.gitattributes &&\n'> 
          <'\tgit -c diff.test.textconv=missing log -Sfoo --no-textconv >actual &&\n'> <'\ttest_cmp expect_nomatch actual &&\n'> <'\trm .gitattributes\n'>
        )
      }
    )
    (C {(test_done)})
  ]
)