(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:'git mailinfo and git mailsplit test' span_id:15))}
          spids: [13]
        )
      ]
    )
    (C {(.)} {(./test-lib.sh)})
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:DATA)
          op: assign_op.Equal
          rhs: {(DQ ($ Id.VSub_DollarName '$TEST_DIRECTORY') (/t5100))}
          spids: [24]
        )
      ]
    )
    (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'split sample box' span_id:34))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'git mailsplit -o. "$DATA/sample.mbox" >last &&\n' span_id:40) 
          (Token id:Id.Lit_Chars val:'\tlast=$(cat last) &&\n' span_id:41) (Token id:Id.Lit_Chars val:'\techo total is $last &&\n' span_id:42) 
          (Token id:Id.Lit_Chars val:'\ttest $(cat last) = 18' span_id:43)
        )
      }
    )
    (command.ShFunction
      name: check_mailinfo
      body: 
        (command.BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:mail)
                  op: assign_op.Equal
                  rhs: {($ Id.VSub_Number '$1')}
                  spids: [55]
                )
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:opt)
                  op: assign_op.Equal
                  rhs: {($ Id.VSub_Number '$2')}
                  spids: [58]
                )
              ]
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:mo)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_DollarName '$mail') ($ Id.VSub_DollarName '$opt'))}
                  spids: [62]
                )
              ]
            )
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp]
              children: [
                (command.Simple
                  words: [
                    {(git)}
                    {(mailinfo)}
                    {(-u)}
                    {($ Id.VSub_DollarName '$opt')}
                    {(DQ (msg) ($ Id.VSub_DollarName '$mo'))}
                    {(DQ (patch) ($ Id.VSub_DollarName '$mo'))}
                  ]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_Less val:'<' span_id:87)
                      fd: -1
                      arg_word: {(DQ ($ Id.VSub_DollarName '$mail'))}
                    )
                    (redir.Redir
                      op: (Token id:Id.Redir_Great val:'>' span_id:92)
                      fd: -1
                      arg_word: {(DQ (info) ($ Id.VSub_DollarName '$mo'))}
                    )
                  ]
                )
                (C {(test_cmp)} 
                  {(DQ ($ Id.VSub_DollarName '$DATA') (/msg) ($ Id.VSub_DollarName '$mo'))} {(DQ (msg) ($ Id.VSub_DollarName '$mo'))}
                )
                (C {(test_cmp)} 
                  {(DQ ($ Id.VSub_DollarName '$DATA') (/patch) ($ Id.VSub_DollarName '$mo'))} {(DQ (patch) ($ Id.VSub_DollarName '$mo'))}
                )
                (C {(test_cmp)} 
                  {(DQ ($ Id.VSub_DollarName '$DATA') (/info) ($ Id.VSub_DollarName '$mo'))} {(DQ (info) ($ Id.VSub_DollarName '$mo'))}
                )
              ]
            )
          ]
        )
    )
    (command.ForEach
      iter_name: mail
      iter_words: [{(00) (Id.Lit_Star '*')}]
      do_arg_iter: F
      body: 
        (command.DoGroup
          children: [
            (C {(test_expect_success)} {(DQ ('mailinfo ') ($ Id.VSub_DollarName '$mail'))} 
              {
                (SQ (Token id:Id.Lit_Chars val:'\n' span_id:170) 
                  (Token
                    id: Id.Lit_Chars
                    val: '\t\tcheck_mailinfo "$mail" "" &&\n'
                    span_id: 171
                  ) (Token id:Id.Lit_Chars val:'\t\tif test -f "$DATA/msg$mail--scissors"\n' span_id:172) 
                  (Token id:Id.Lit_Chars val:'\t\tthen\n' span_id:173) (Token id:Id.Lit_Chars val:'\t\t\tcheck_mailinfo "$mail" --scissors\n' span_id:174) 
                  (Token id:Id.Lit_Chars val:'\t\tfi &&\n' span_id:175) (Token id:Id.Lit_Chars val:'\t\tif test -f "$DATA/msg$mail--no-inbody-headers"\n' span_id:176) 
                  (Token id:Id.Lit_Chars val:'\t\tthen\n' span_id:177) (Token id:Id.Lit_Chars val:'\t\t\tcheck_mailinfo "$mail" --no-inbody-headers\n' span_id:178) 
                  (Token id:Id.Lit_Chars val:'\t\tfi &&\n' span_id:179) (Token id:Id.Lit_Chars val:'\t\tif test -f "$DATA/msg$mail--message-id"\n' span_id:180) 
                  (Token id:Id.Lit_Chars val:'\t\tthen\n' span_id:181) (Token id:Id.Lit_Chars val:'\t\t\tcheck_mailinfo "$mail" --message-id\n' span_id:182) 
                  (Token id:Id.Lit_Chars val:'\t\tfi\n' span_id:183) (Token id:Id.Lit_Chars val:'\t' span_id:184)
                )
              }
            )
          ]
        )
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'split box with rfc2047 samples' span_id:194))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'mkdir rfc2047 &&\n' span_id:200) 
          (Token
            id: Id.Lit_Chars
            val: '\tgit mailsplit -orfc2047 "$DATA/rfc2047-samples.mbox" \\\n'
            span_id: 201
          ) (Token id:Id.Lit_Chars val:'\t  >rfc2047/last &&\n' span_id:202) 
          (Token id:Id.Lit_Chars val:'\tlast=$(cat rfc2047/last) &&\n' span_id:203) (Token id:Id.Lit_Chars val:'\techo total is $last &&\n' span_id:204) 
          (Token id:Id.Lit_Chars val:'\ttest $(cat rfc2047/last) = 11' span_id:205)
        )
      }
    )
    (command.ForEach
      iter_name: mail
      iter_words: [{(rfc2047/00) (Id.Lit_Star '*')}]
      do_arg_iter: F
      body: 
        (command.DoGroup
          children: [
            (C {(test_expect_success)} {(DQ ('mailinfo ') ($ Id.VSub_DollarName '$mail'))} 
              {
                (SQ (Token id:Id.Lit_Chars val:'\n' span_id:229) 
                  (Token
                    id: Id.Lit_Chars
                    val: '\t\tgit mailinfo -u "$mail-msg" "$mail-patch" <"$mail" >"$mail-info" &&\n'
                    span_id: 230
                  ) (Token id:Id.Lit_Chars val:'\t\techo msg &&\n' span_id:231) 
                  (Token
                    id: Id.Lit_Chars
                    val: '\t\ttest_cmp "$DATA/empty" "$mail-msg" &&\n'
                    span_id: 232
                  ) (Token id:Id.Lit_Chars val:'\t\techo patch &&\n' span_id:233) 
                  (Token
                    id: Id.Lit_Chars
                    val: '\t\ttest_cmp "$DATA/empty" "$mail-patch" &&\n'
                    span_id: 234
                  ) (Token id:Id.Lit_Chars val:'\t\techo info &&\n' span_id:235) 
                  (Token
                    id: Id.Lit_Chars
                    val: '\t\ttest_cmp "$DATA/rfc2047-info-$(basename $mail)" "$mail-info"\n'
                    span_id: 236
                  ) (Token id:Id.Lit_Chars val:'\t' span_id:237)
                )
              }
            )
          ]
        )
    )
    (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'respect NULs' span_id:246))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:250) (Token id:Id.Lit_Chars val:'\n' span_id:251) 
          (Token
            id: Id.Lit_Chars
            val: '\tgit mailsplit -d3 -o. "$DATA/nul-plain" &&\n'
            span_id: 252
          ) (Token id:Id.Lit_Chars val:'\ttest_cmp "$DATA/nul-plain" 001 &&\n' span_id:253) 
          (Token
            id: Id.Lit_Chars
            val: '\t(cat 001 | git mailinfo msg patch) &&\n'
            span_id: 254
          ) (Token id:Id.Lit_Chars val:'\ttest_line_count = 4 patch\n' span_id:255) 
          (Token id:Id.Lit_Chars val:'\n' span_id:256)
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'Preserve NULs out of MIME encoded message' span_id:263))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:267) (Token id:Id.Lit_Chars val:'\n' span_id:268) 
          (Token
            id: Id.Lit_Chars
            val: '\tgit mailsplit -d5 -o. "$DATA/nul-b64.in" &&\n'
            span_id: 269
          ) (Token id:Id.Lit_Chars val:'\ttest_cmp "$DATA/nul-b64.in" 00001 &&\n' span_id:270) 
          (Token id:Id.Lit_Chars val:'\tgit mailinfo msg patch <00001 &&\n' span_id:271) (Token id:Id.Lit_Chars val:'\ttest_cmp "$DATA/nul-b64.expect" patch\n' span_id:272) 
          (Token id:Id.Lit_Chars val:'\n' span_id:273)
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'mailinfo on from header without name works' span_id:280))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:284) (Token id:Id.Lit_Chars val:'\n' span_id:285) 
          (Token id:Id.Lit_Chars val:'\tmkdir info-from &&\n' span_id:286) (Token id:Id.Lit_Chars val:'\tgit mailsplit -oinfo-from "$DATA/info-from.in" &&\n' span_id:287) 
          (Token
            id: Id.Lit_Chars
            val: '\ttest_cmp "$DATA/info-from.in" info-from/0001 &&\n'
            span_id: 288
          ) (Token id:Id.Lit_Chars val:'\tgit mailinfo info-from/msg info-from/patch \\\n' span_id:289) 
          (Token id:Id.Lit_Chars val:'\t  <info-from/0001 >info-from/out &&\n' span_id:290) (Token id:Id.Lit_Chars val:'\ttest_cmp "$DATA/info-from.expect" info-from/out\n' span_id:291) 
          (Token id:Id.Lit_Chars val:'\n' span_id:292)
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'mailinfo finds headers after embedded From line' span_id:299))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:303) 
          (Token id:Id.Lit_Chars val:'\tmkdir embed-from &&\n' span_id:304) (Token id:Id.Lit_Chars val:'\tgit mailsplit -oembed-from "$DATA/embed-from.in" &&\n' span_id:305) 
          (Token
            id: Id.Lit_Chars
            val: '\ttest_cmp "$DATA/embed-from.in" embed-from/0001 &&\n'
            span_id: 306
          ) (Token id:Id.Lit_Chars val:'\tgit mailinfo embed-from/msg embed-from/patch \\\n' span_id:307) 
          (Token
            id: Id.Lit_Chars
            val: '\t  <embed-from/0001 >embed-from/out &&\n'
            span_id: 308
          ) (Token id:Id.Lit_Chars val:'\ttest_cmp "$DATA/embed-from.expect" embed-from/out\n' span_id:309)
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'mailinfo on message with quoted >From' span_id:316))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:320) 
          (Token id:Id.Lit_Chars val:'\tmkdir quoted-from &&\n' span_id:321) (Token id:Id.Lit_Chars val:'\tgit mailsplit -oquoted-from "$DATA/quoted-from.in" &&\n' span_id:322) 
          (Token
            id: Id.Lit_Chars
            val: '\ttest_cmp "$DATA/quoted-from.in" quoted-from/0001 &&\n'
            span_id: 323
          ) (Token id:Id.Lit_Chars val:'\tgit mailinfo quoted-from/msg quoted-from/patch \\\n' span_id:324) 
          (Token
            id: Id.Lit_Chars
            val: '\t  <quoted-from/0001 >quoted-from/out &&\n'
            span_id: 325
          ) (Token id:Id.Lit_Chars val:'\ttest_cmp "$DATA/quoted-from.expect" quoted-from/msg\n' span_id:326)
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'mailinfo unescapes with --mboxrd' span_id:333))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:337) 
          (Token id:Id.Lit_Chars val:'\tmkdir mboxrd &&\n' span_id:338) (Token id:Id.Lit_Chars val:'\tgit mailsplit -omboxrd --mboxrd \\\n' span_id:339) 
          (Token id:Id.Lit_Chars val:'\t\t"$DATA/sample.mboxrd" >last &&\n' span_id:340) (Token id:Id.Lit_Chars val:'\ttest x"$(cat last)" = x2 &&\n' span_id:341) 
          (Token id:Id.Lit_Chars val:'\tfor i in 0001 0002\n' span_id:342) (Token id:Id.Lit_Chars val:'\tdo\n' span_id:343) 
          (Token
            id: Id.Lit_Chars
            val: '\t\tgit mailinfo mboxrd/msg mboxrd/patch \\\n'
            span_id: 344
          ) (Token id:Id.Lit_Chars val:'\t\t  <mboxrd/$i >mboxrd/out &&\n' span_id:345) 
          (Token
            id: Id.Lit_Chars
            val: '\t\ttest_cmp "$DATA/${i}mboxrd" mboxrd/msg\n'
            span_id: 346
          ) (Token id:Id.Lit_Chars val:'\tdone &&\n' span_id:347) 
          (Token id:Id.Lit_Chars val:'\tsp=" " &&\n' span_id:348) (Token id:Id.Lit_Chars val:'\techo "From " >expect &&\n' span_id:349) 
          (Token id:Id.Lit_Chars val:'\techo "From " >>expect &&\n' span_id:350) (Token id:Id.Lit_Chars val:'\techo >> expect &&\n' span_id:351) 
          (Token id:Id.Lit_Chars val:'\tcat >sp <<-INPUT_END &&\n' span_id:352) (Token id:Id.Lit_Chars val:'\tFrom mboxrd Mon Sep 17 00:00:00 2001\n' span_id:353) 
          (Token
            id: Id.Lit_Chars
            val: '\tFrom: trailing spacer <sp@example.com>\n'
            span_id: 354
          ) (Token id:Id.Lit_Chars val:'\tSubject: [PATCH] a commit with trailing space\n' span_id:355) 
          (Token id:Id.Lit_Chars val:'\n' span_id:356) (Token id:Id.Lit_Chars val:'\tFrom$sp\n' span_id:357) 
          (Token id:Id.Lit_Chars val:'\t>From$sp\n' span_id:358) (Token id:Id.Lit_Chars val:'\n' span_id:359) (Token id:Id.Lit_Chars val:'\tINPUT_END\n' span_id:360) 
          (Token id:Id.Lit_Chars val:'\n' span_id:361) (Token id:Id.Lit_Chars val:'\tgit mailsplit -f2 -omboxrd --mboxrd <sp >last &&\n' span_id:362) 
          (Token id:Id.Lit_Chars val:'\ttest x"$(cat last)" = x1 &&\n' span_id:363) (Token id:Id.Lit_Chars val:'\tgit mailinfo mboxrd/msg mboxrd/patch <mboxrd/0003 &&\n' span_id:364) 
          (Token id:Id.Lit_Chars val:'\ttest_cmp expect mboxrd/msg\n' span_id:365)
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'mailinfo handles rfc2822 quoted-string' span_id:372))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:376) 
          (Token id:Id.Lit_Chars val:'\tmkdir quoted-string &&\n' span_id:377) 
          (Token
            id: Id.Lit_Chars
            val: '\tgit mailinfo /dev/null /dev/null <"$DATA/quoted-string.in" \\\n'
            span_id: 378
          ) (Token id:Id.Lit_Chars val:'\t\t>quoted-string/info &&\n' span_id:379) 
          (Token
            id: Id.Lit_Chars
            val: '\ttest_cmp "$DATA/quoted-string.expect" quoted-string/info\n'
            span_id: 380
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'mailinfo handles rfc2822 comment' span_id:387))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'\n' span_id:391) 
          (Token id:Id.Lit_Chars val:'\tmkdir comment &&\n' span_id:392) (Token id:Id.Lit_Chars val:'\tgit mailinfo /dev/null /dev/null <"$DATA/comment.in" \\\n' span_id:393) 
          (Token id:Id.Lit_Chars val:'\t\t>comment/info &&\n' span_id:394) (Token id:Id.Lit_Chars val:'\ttest_cmp "$DATA/comment.expect" comment/info\n' span_id:395)
        )
      }
    )
    (C {(test_done)})
  ]
)