(command.CommandList
  children: [
    (command.Simple
      blame_tok: <_Dbg_help_add_sub>
      more_env: []
      words: [
        {<_Dbg_help_add_sub>}
        {<set>}
        {<args>}
        {
          (SQ <'**set args** *script-args*\n'> <'\n'> 
            <'Set argument list to give program being debugged when it is started.\n'> <'Follow this command with any number of args, to be passed to the program.\n'>
          )
        }
        {<1>}
      ]
      redirects: []
      do_fork: T
    )
    (command.ShFunction
      name_tok: <_Dbg_do_set_args>
      name: _Dbg_do_set_args
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.ShAssignment
              left: <Id.Lit_VarLike '_Dbg_script_args='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike '_Dbg_script_args='>
                  lhs: 
                    (sh_lhs_expr.Name
                      left: <Id.Lit_VarLike '_Dbg_script_args='>
                      name: _Dbg_script_args
                    )
                  op: assign_op.Equal
                  rhs: 
                    {
                      (ShArrayLiteral
                        left: <Id.Op_LParen _>
                        words: []
                        right: <Id.Right_ShArrayLiteral _>
                      )
                    }
                )
              ]
              redirects: []
            )
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<-i>} {<i>}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<-i>} {<Id.Lit_VarLike 'n='> ($ Id.VSub_Pound '#')}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [
                {<typeset>}
                {<-i>}
                {<Id.Lit_VarLike 'm='> 
                  (BracedVarSub
                    left: <Id.Left_DollarBrace '${'>
                    token: <Id.VSub_Name _Dbg_orig_script_args>
                    var_name: _Dbg_orig_script_args
                    prefix_op: <Id.VSub_Pound '#'>
                    bracket_op: (bracket_op.WholeArray op_id:Id.Lit_At)
                    right: <Id.Right_DollarBrace '}'>
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
            (command.ForExpr
              keyword: <Id.KW_For for>
              init: 
                (arith_expr.BinaryAssign
                  op_id: Id.Arith_Equal
                  left: ($ Id.Lit_ArithVarLike i)
                  right: {<Id.Lit_Digits 0>}
                )
              cond: 
                (arith_expr.Binary
                  op_id: Id.Arith_Less
                  left: ($ Id.Lit_ArithVarLike i)
                  right: ($ Id.Lit_ArithVarLike n)
                )
              update: (arith_expr.UnaryAssign op_id:Id.Node_PostDPlus child:($ Id.Lit_ArithVarLike i))
              body: 
                (command.DoGroup
                  left: <Id.KW_Do do>
                  children: [
                    (command.Simple
                      blame_tok: <_Dbg_write_journal_eval>
                      more_env: []
                      words: [
                        {<_Dbg_write_journal_eval>}
                        {
                          (DQ <'_Dbg_orig_script_args['> ($ Id.VSub_DollarName i) <']='> 
                            ($ Id.VSub_Number 1)
                          )
                        }
                      ]
                      redirects: []
                      do_fork: T
                    )
                    (command.Simple
                      blame_tok: <shift>
                      more_env: []
                      words: [{<shift>}]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  right: <Id.KW_Done done>
                )
              redirects: []
            )
            (command.ForExpr
              keyword: <Id.KW_For for>
              cond: 
                (arith_expr.Binary
                  op_id: Id.Arith_Less
                  left: ($ Id.Lit_ArithVarLike i)
                  right: ($ Id.Lit_ArithVarLike m)
                )
              update: (arith_expr.UnaryAssign op_id:Id.Node_PostDPlus child:($ Id.Lit_ArithVarLike i))
              body: 
                (command.DoGroup
                  left: <Id.KW_Do do>
                  children: [
                    (command.Simple
                      blame_tok: <_Dbg_write_journal_eval>
                      more_env: []
                      words: [
                        {<_Dbg_write_journal_eval>}
                        {(DQ <'unset _Dbg_orig_script_args['> ($ Id.VSub_DollarName i) <']'>)}
                      ]
                      redirects: []
                      do_fork: T
                    )
                    (command.Simple
                      blame_tok: <shift>
                      more_env: []
                      words: [{<shift>}]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  right: <Id.KW_Done done>
                )
              redirects: []
            )
            (command.ControlFlow keyword:<Id.ControlFlow_Return return> arg_word:{<0>})
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
  ]
)