(command.CommandList
  children: [
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (C {<.>} 
              {
                (DQ 
                  (braced_var_sub
                    token: <Id.VSub_Name srcdir>
                    suffix_op: (suffix_op.Unary tok:<Id.VTest_Equals '='> arg_word:{<.>})
                  ) <'/tests/init.sh'>
                )
              }
            )
          terminator: <Id.Op_Semi _>
        )
        (C {<path_prepend_>} {<'./src'>})
      ]
    )
    (C {<print_ver_>} {<chgrp>})
    (C {<require_membership_in_two_groups_>})
    (C {<skip_if_root_>})
    (command.CommandList
      children: [
        (command.Sentence
          child: (C {<set>} {<Id.Lit_Underscore _>} {($ Id.VSub_DollarName '$groups')})
          terminator: <Id.Op_Semi _>
        )
        (C {<shift>})
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:g1)
          op: assign_op.Equal
          rhs: {($ Id.VSub_Number '$1')}
          spids: [81]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:g2)
          op: assign_op.Equal
          rhs: {($ Id.VSub_Number '$2')}
          spids: [84]
        )
      ]
    )
    (command.AndOr
      ops: [Id.Op_DPipe]
      children: [(C {<mkdir>} {<-p>} {<'d/no-x/y'>}) (C {<framework_failure_>})]
    )
    (command.AndOr
      ops: [Id.Op_DPipe]
      children: [(C {<chmod>} {<Id.Lit_VarLike 'u='> <rw>} {<'d/no-x'>}) (C {<framework_failure_>})]
    )
    (command.AndOr
      ops: [Id.Op_DAmp]
      children: [
        (command.Simple
          words: [{<chgrp>} {<-R>} {($ Id.VSub_DollarName '$g2')} {<d>}]
          redirects: [
            (redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<'/dev/null'>})
            (redir op:<Id.Redir_Great '2>'> loc:(redir_loc.Fd fd:2) arg:{<out>})
          ]
          do_fork: T
        )
        (command.ShAssignment
          pairs: [
            (assign_pair
              lhs: (sh_lhs_expr.Name name:fail)
              op: assign_op.Equal
              rhs: {<1>}
              spids: [130]
            )
          ]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:prog)
          op: assign_op.Equal
          rhs: {<chgrp>}
          spids: [134]
        )
      ]
    )
    (command.AndOr
      ops: [Id.Op_DAmp]
      children: [
        (command.Simple
          words: [
            {<sed>}
            {
              (DQ <'s/^'> ($ Id.VSub_DollarName '$prog') <': cannot access /'> 
                ($ Id.VSub_DollarName '$prog') <': /'>
              )
            }
            {<out>}
          ]
          redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<t>})]
          do_fork: T
        )
        (C {<mv>} {<t>} {<out>})
      ]
    )
    (command.AndOr
      ops: [Id.Op_DAmp]
      children: [
        (command.Simple
          words: [
            {<sed>}
            {
              (DQ <'s/^'> ($ Id.VSub_DollarName '$prog') <': cannot read directory /'> 
                ($ Id.VSub_DollarName '$prog') <': /'>
              )
            }
            {<out>}
          ]
          redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<t>})]
          do_fork: T
        )
        (C {<mv>} {<t>} {<out>})
      ]
    )
    (command.AndOr
      ops: [Id.Op_DAmp]
      children: [
        (command.Simple
          words: [{<sed>} {(SQ <'s,d/no-x/y,d/no-x,'>)} {<out>}]
          redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<t>})]
          do_fork: T
        )
        (C {<mv>} {<t>} {<out>})
      ]
    )
    (command.Simple
      words: [{<cat>}]
      redirects: [
        (redir
          op: <Id.Redir_DLess '<<'>
          loc: (redir_loc.Fd fd:0)
          arg: 
            (redir_param.HereDoc
              here_begin: {<EOF>}
              here_end_span_id: 239
              stdin_parts: [($ Id.VSub_DollarName '$prog') <': \'d/no-x\': Permission denied\n'>]
            )
        )
        (redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<exp>})
      ]
      do_fork: T
    )
    (command.AndOr
      ops: [Id.Op_DPipe]
      children: [
        (C {<compare>} {<exp>} {<out>})
        (command.ShAssignment
          pairs: [
            (assign_pair
              lhs: (sh_lhs_expr.Name name:fail)
              op: assign_op.Equal
              rhs: {<1>}
              spids: [249]
            )
          ]
        )
      ]
    )
    (C {<Exit>} {($ Id.VSub_DollarName '$fail')})
  ]
)