(command.CommandList
  children: [
    (C {<_Dbg_help_add>} {<delete>} 
      {
        (DQ <'**delete** {*brkpt-num*}...\n'> <'\n'> <'Delete some breakpoints.\n'> <'\n'> 
          <
'Arguments are breakpoint numbers with spaces in between. To delete all breakpoints, give\n'
          > <'no argument. Without arguments, clear all breaks (but first ask for confirmation).\n'>
        )
      } {<1>} {<_Dbg_complete_brkpt_range>}
    )
    (command.ShFunction
      name: _Dbg_do_delete
      body: 
        (BraceGroup
          children: [
            (command.Sentence child:(C {<typeset>} {<to_go>}) terminator:<Id.Op_Semi _>)
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:to_go)
                  op: assign_op.Equal
                  rhs: {($ Id.VSub_At '$@')}
                  spids: [96]
                )
              ]
            )
            (C {<typeset>} {<-i>} {<i>})
            (C {<typeset>} {<-i>} {<Id.Lit_VarLike 'tot_found='> <0>})
            (C {<eval>} {(DQ ($ Id.VSub_DollarName '$_seteglob'))})
            (command.ForEach
              iter_name: del
              iter_words: [{($ Id.VSub_DollarName '$to_go')}]
              do_arg_iter: F
              body: 
                (command.DoGroup
                  children: [
                    (command.Case
                      to_match: {($ Id.VSub_DollarName '$del')}
                      arms: [
                        (case_arm
                          pat_list: [{($ Id.VSub_DollarName '$_Dbg_watch_pat')}]
                          action: [
                            (C {<_Dbg_delete_watch_entry>} 
                              {
                                (braced_var_sub
                                  token: <Id.VSub_Name del>
                                  suffix_op: 
                                    (suffix_op.Slice
                                      begin: {<Id.Lit_Digits 0>}
                                      length: 
                                        (arith_expr.Binary
                                          op_id: Id.Arith_Minus
                                          left: 
                                            {
                                              (braced_var_sub
                                                token: <Id.VSub_Name del>
                                                prefix_op: (Id.VSub_Pound)
                                              )
                                            }
                                          right: {<Id.Lit_Digits 1>}
                                        )
                                    )
                                )
                              }
                            )
                          ]
                          spids: [143 145 164 -1]
                        )
                        (case_arm
                          pat_list: [{($ Id.VSub_DollarName '$int_pat')}]
                          action: [
                            (command.If
                              arms: [
                                (if_arm
                                  cond: 
                                    (condition.Shell
                                      commands: [
                                        (command.Sentence
                                          child: 
                                            (C {<_Dbg_delete_brkpt_entry>} 
                                              {($ Id.VSub_DollarName '$del')}
                                            )
                                          terminator: <Id.Op_Semi _>
                                        )
                                      ]
                                    )
                                  action: [
                                    (C {<_Dbg_msg>} {(DQ <'Deleted breakpoint '> (${ Id.VSub_Name del))})
                                    (command.DParen
                                      child: 
                                        (arith_expr.UnaryAssign
                                          op_id: Id.Node_PostDPlus
                                          child: <Id.Lit_ArithVarLike tot_found>
                                        )
                                    )
                                  ]
                                  spids: [172 180]
                                )
                              ]
                            )
                          ]
                          spids: [167 169 203 -1]
                        )
                        (case_arm
                          pat_list: [{<Id.Lit_Star '*'>}]
                          action: [
                            (C {<_Dbg_errmsg>} 
                              {(DQ <'Invalid entry number skipped: '> ($ Id.VSub_DollarName '$del'))}
                            )
                          ]
                          spids: [206 208 -1 219]
                        )
                      ]
                    )
                  ]
                )
            )
            (C {<eval>} {(DQ ($ Id.VSub_DollarName '$_resteglob'))})
            (command.ControlFlow
              token: <Id.ControlFlow_Return return>
              arg_word: {($ Id.VSub_DollarName '$tot_found')}
            )
          ]
        )
    )
  ]
)