(CommandList
  children: [
    (C {(set)} {(-e)})
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:common_objpfx)
          op: Equal
          rhs: {($ VSub_Number '$1')}
          spids: [61]
        )
      ]
      spids: [61]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:tst_rpmatch)
          op: Equal
          rhs: {($ VSub_Number '$2')}
          spids: [64]
        )
      ]
      spids: [64]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:rc) op:Equal rhs:{(0)} spids:[68])]
      spids: [68]
    )
    (While
      cond: [
        (Sentence
          child: 
            (SimpleCommand
              words: [{(read)} {(locale)} {(string)} {(result)} {(dummy)}]
              more_env: [
                (env_pair
                  name: IFS
                  val: {(EscapedLiteralPart token:<Lit_EscapedChar '\\&'>)}
                  spids: [73]
                )
              ]
            )
          terminator: <Op_Semi ';'>
        )
      ]
      body: 
        (DoGroup
          children: [
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (C {(Lit_Other '[')} {(DQ ($ VSub_Name '$locale'))} 
                          {(KW_Bang '!') (Lit_Other '=')} {(DQ ('#'))} {(Lit_Other ']')}
                        )
                      terminator: <Op_Semi ';'>
                    )
                  ]
                  action: [
                    (AndOr
                      children: [
                        (SimpleCommand
                          words: [
                            {(${ VSub_Name tst_rpmatch)}
                            {($ VSub_Name '$locale')}
                            {($ VSub_Name '$string')}
                            {($ VSub_Name '$result')}
                          ]
                          redirects: [
                            (Redir
                              op_id: Redir_Less
                              fd: -1
                              arg_word: {(/dev/null)}
                              spids: [121]
                            )
                          ]
                        )
                        (BraceGroup
                          children: [
                            (Sentence
                              child: 
                                (C {(echo)} 
                                  {
                                    (DQ ($ VSub_Name '$locale') (' ') ($ VSub_Name '$string') (' ') 
                                      ($ VSub_Name '$result') ('  FAILED')
                                    )
                                  }
                                )
                              terminator: <Op_Semi ';'>
                            )
                            (Sentence
                              child: (C {(exit)} {(1)})
                              terminator: <Op_Semi ';'>
                            )
                          ]
                          spids: [129]
                        )
                      ]
                      op_id: Op_DPipe
                    )
                  ]
                  spids: [-1 108]
                )
              ]
              spids: [-1 151]
            )
          ]
          spids: [87 153]
        )
      redirects: [
        (HereDoc
          op_id: Redir_DLess
          fd: -1
          body: 
            {
              (DQ ('#& These are the tests for rpmatch in glibc.  Each line contains one test,\n') 
                ('#& comments start with #& in the first column.  The fields are separated\n') ('#& by ampersand signs and contain: the locale, the string, the expected\n') 
                ('#& return value of rpmatch(3).  If the test fails, test-rpmatch prints\n') ('#& all these informations\n') ('C&Yes&1\n') ('C&yes&1\n') ('C&YES&1\n') ('C&YeS&1\n') ('C&YEs&1\n') 
                ('C&yEs&1\n') ('C&yES&1\n') ('C&yeS&1\n') ('C&No&0\n') ('C&no&0\n') ("#& Uh, that's nonsense\n") ('C&nonsens&0\n') 
                ('C&Error&-1\n') ('de_DE.ISO-8859-1&Yes&1\n') ('de_DE.ISO-8859-1&Ja&1\n') ('de_DE.ISO-8859-1&Jammerschade&1\n') 
                ('de_DE.ISO-8859-1&dejavu&-1\n') ('de_DE.ISO-8859-1&Nein&0\n') ('de_DE.ISO-8859-1&Fehler&-1\n') ('de_DE.ISO-8859-1&jein&1\n')
              )
            }
          do_expansion: True
          here_end: EOF
          was_filled: True
          spids: [155]
        )
      ]
    )
  ]
)