(CommandList
  children: [
    (C {(_Dbg_help_add)} {(action)} 
      {
        (SQ <"**action** *linespec* *command*\n"> <"\n"> <"Run *command* when *linespec* is hit\n"> 
          <"\n"> <"Use \"A\" to remove all actions and \"L\" to get a list of the actions in\n"> <effect.>
        )
      }
    )
    (FuncDef
      name: _Dbg_do_action
      body: 
        (BraceGroup
          children: [
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (DParen
                          child: 
                            (ArithBinary
                              op_id: Arith_DEqual
                              left: (ArithWord w:{($ VSub_Pound "$#")})
                              right: (ArithWord w:{(Lit_Digits 0)})
                            )
                        )
                      terminator: <Op_Semi ";">
                    )
                  ]
                  action: [
                    (C {(_Dbg_list_action)})
                    (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
                  ]
                  spids: [-1 106]
                )
              ]
              spids: [-1 118]
            )
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (DParen
                          child: 
                            (ArithBinary
                              op_id: Arith_DEqual
                              left: (ArithWord w:{($ VSub_Pound "$#")})
                              right: (ArithWord w:{(Lit_Digits 1)})
                            )
                        )
                      terminator: <Op_Semi ";">
                    )
                  ]
                  action: [(C {(typeset)} {(Lit_VarLike "n=") ($ VSub_Name "$_Dbg_frame_last_lineno")})]
                  spids: [-1 136]
                )
              ]
              else_action: [(C {(typeset)} {(Lit_VarLike "n=") ($ VSub_Number "$1")}) (C {(shift)})]
              spids: [146 158]
            )
            (C {(typeset)} {(Lit_VarLike "stmt=") (DQ ($ VSub_Star "$*"))})
            (C {(typeset)} {(filename)})
            (C {(typeset)} {(-i)} {(line_number)})
            (C {(typeset)} {(full_filename)})
            (C {(_Dbg_linespec_setup)} {($ VSub_Name "$n")})
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (DBracket
                          expr: (BoolUnary op_id:BoolUnary_n child:{($ VSub_Name "$full_filename")})
                        )
                      terminator: <Op_Semi ";">
                    )
                  ]
                  action: [
                    (If
                      arms: [
                        (if_arm
                          cond: [
                            (Sentence
                              child: 
                                (DParen
                                  child: 
                                    (ArithBinary
                                      op_id: Arith_DEqual
                                      left: (ArithVarRef name:line_number)
                                      right: (ArithWord w:{(Lit_Digits 0)})
                                    )
                                )
                              terminator: <Op_Semi ";">
                            )
                          ]
                          action: [(C {(_Dbg_msg)} {(DQ ("There is no line 0 to set action at."))})]
                          spids: [-1 225]
                        )
                      ]
                      else_action: [
                        (C {(_Dbg_check_line)} {($ VSub_Name "$line_number")} 
                          {(DQ ($ VSub_Name "$full_filename"))}
                        )
                        (AndOr
                          children: [
                            (DParen
                              child: 
                                (ArithBinary
                                  op_id: Arith_DEqual
                                  left: (ArithWord w:{($ VSub_QMark "$?")})
                                  right: (ArithWord w:{(Lit_Digits 0)})
                                )
                            )
                            (C {(_Dbg_set_action)} {(DQ ($ VSub_Name "$full_filename"))} 
                              {(DQ ($ VSub_Name "$line_number"))} {(DQ ($ VSub_Name "$stmt"))}
                            )
                          ]
                          op_id: Op_DAmp
                        )
                      ]
                      spids: [235 277]
                    )
                  ]
                  spids: [-1 207]
                )
              ]
              else_action: [(C {(_Dbg_file_not_read_in)} {($ VSub_Name "$filename")})]
              spids: [280 288]
            )
            (ControlFlow token:<ControlFlow_Return return> arg_word:{(0)})
          ]
          spids: [86]
        )
      spids: [82 85]
    )
    (C {(_Dbg_alias_add)} {(SQ <a>)} {(SQ <action>)})
    (FuncDef
      name: _Dbg_do_clear_action
      body: 
        (BraceGroup
          children: [
            (AndOr
              children: [
                (DParen
                  child: 
                    (ArithBinary
                      op_id: Arith_Great
                      left: (ArithWord w:{($ VSub_Pound "$#")})
                      right: (ArithWord w:{(Lit_Digits 1)})
                    )
                )
                (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
              ]
              op_id: Op_DAmp
            )
            (C {(typeset)} {(-r)} 
              {(Lit_VarLike "n=") 
                (BracedVarSub
                  token: <VSub_Number 1>
                  suffix_op: 
                    (StringUnary
                      op_id: VTest_ColonHyphen
                      arg_word: {($ VSub_Name "$_Dbg_frame_last_lineno")}
                    )
                  spids: [345 349]
                )
              }
            )
            (C {(typeset)} {(filename)})
            (C {(typeset)} {(-i)} {(line_number)})
            (C {(typeset)} {(full_filename)})
            (C {(_Dbg_linespec_setup)} {($ VSub_Name "$n")})
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (DBracket
                          expr: (BoolUnary op_id:BoolUnary_n child:{($ VSub_Name "$full_filename")})
                        )
                      terminator: <Op_Semi ";">
                    )
                  ]
                  action: [
                    (If
                      arms: [
                        (if_arm
                          cond: [
                            (Sentence
                              child: 
                                (DParen
                                  child: 
                                    (ArithBinary
                                      op_id: Arith_DEqual
                                      left: (ArithVarRef name:line_number)
                                      right: (ArithWord w:{(Lit_Digits 0)})
                                    )
                                )
                              terminator: <Op_Semi ";">
                            )
                          ]
                          action: [(C {(_Dbg_msg)} {(DQ ("There is no line 0 to clear action at."))})]
                          spids: [-1 407]
                        )
                      ]
                      else_action: [
                        (C {(_Dbg_check_line)} {($ VSub_Name "$line_number")} 
                          {(DQ ($ VSub_Name "$full_filename"))}
                        )
                        (AndOr
                          children: [
                            (DParen
                              child: 
                                (ArithBinary
                                  op_id: Arith_DEqual
                                  left: (ArithWord w:{($ VSub_QMark "$?")})
                                  right: (ArithWord w:{(Lit_Digits 0)})
                                )
                            )
                            (C {(_Dbg_unset_action)} {(DQ ($ VSub_Name "$full_filename"))} 
                              {(DQ ($ VSub_Name "$line_number"))}
                            )
                          ]
                          op_id: Op_DAmp
                        )
                        (If
                          arms: [
                            (if_arm
                              cond: [
                                (Sentence
                                  child: 
                                    (DBracket
                                      expr: 
                                        (BoolBinary
                                          op_id: BoolBinary_GlobDEqual
                                          left: {($ VSub_QMark "$?")}
                                          right: {(0)}
                                        )
                                    )
                                  terminator: <Op_Semi ";">
                                )
                              ]
                              action: [
                                (C {(_Dbg_msg)} {(DQ ("Removed action."))})
                                (ControlFlow
                                  token: <ControlFlow_Return return>
                                  arg_word: {(0)}
                                )
                              ]
                              spids: [-1 469]
                            )
                          ]
                          else_action: [
                            (C {(_Dbg_errmsg)} 
                              {(DQ ("Didn't find any actions to remove at ") ($ VSub_Name "$n") (.))}
                            )
                          ]
                          spids: [484 496]
                        )
                      ]
                      spids: [417 499]
                    )
                  ]
                  spids: [-1 389]
                )
              ]
              else_action: [(C {(_Dbg_file_not_read_in)} {($ VSub_Name "$filename")})]
              spids: [502 510]
            )
            (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
          ]
          spids: [319]
        )
      spids: [315 318]
    )
    (FuncDef
      name: _Dbg_do_action_delete
      body: 
        (BraceGroup
          children: [
            (C {(typeset)} {(-r)} {(Lit_VarLike "to_go=") ($ VSub_At "$@")})
            (C {(typeset)} {(-i)} {(i)})
            (C {(typeset)} {(-i)} {(Lit_VarLike "found=") (0)})
            (ForEach
              iter_name: del
              iter_words: [{($ VSub_Name "$to_go")}]
              do_arg_iter: False
              body: 
                (DoGroup
                  children: [
                    (Case
                      to_match: {($ VSub_Name "$del")}
                      arms: [
                        (case_arm
                          pat_list: [{(Lit_Other "[") (0-9) (Lit_Other "]") (Lit_Other "*")}]
                          action: [
                            (C {(_Dbg_delete_action_entry)} {($ VSub_Name "$del")})
                            (DParen
                              child: 
                                (BinaryAssign
                                  op_id: Arith_PlusEqual
                                  left: (LhsName name:found)
                                  right: (ArithWord w:{($ VSub_QMark "$?")})
                                )
                            )
                          ]
                          spids: [574 579 597 -1]
                        )
                        (case_arm
                          pat_list: [{(Lit_Other "*")}]
                          action: [
                            (C {(_Dbg_msg)} 
                              {(DQ ("Invalid entry number skipped: ") ($ VSub_Name "$del"))}
                            )
                          ]
                          spids: [600 602 -1 613]
                        )
                      ]
                      spids: [567 571 613]
                    )
                  ]
                  spids: [564 616]
                )
              spids: [559 562]
            )
            (AndOr
              children: [
                (DBracket
                  expr: 
                    (BoolBinary
                      op_id: BoolBinary_GlobNEqual
                      left: {($ VSub_Name "$found")}
                      right: {(0)}
                    )
                )
                (C {(_Dbg_msg)} {(DQ ("Removed ") ($ VSub_Name "$found") (" action(s)."))})
              ]
              op_id: Op_DAmp
            )
            (ControlFlow
              token: <ControlFlow_Return return>
              arg_word: {($ VSub_Name "$found")}
            )
          ]
          spids: [527]
        )
      spids: [523 526]
    )
    (FuncDef
      name: _Dbg_do_clear_action
      body: 
        (BraceGroup
          children: [
            (AndOr
              children: [
                (DParen
                  child: 
                    (ArithBinary
                      op_id: Arith_Great
                      left: (ArithWord w:{($ VSub_Pound "$#")})
                      right: (ArithWord w:{(Lit_Digits 1)})
                    )
                )
                (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
              ]
              op_id: Op_DAmp
            )
            (C {(typeset)} {(-r)} 
              {(Lit_VarLike "n=") 
                (BracedVarSub
                  token: <VSub_Number 1>
                  suffix_op: 
                    (StringUnary
                      op_id: VTest_ColonHyphen
                      arg_word: {($ VSub_Name "$_Dbg_frame_last_lineno")}
                    )
                  spids: [683 687]
                )
              }
            )
            (C {(typeset)} {(filename)})
            (C {(typeset)} {(-i)} {(line_number)})
            (C {(typeset)} {(full_filename)})
            (C {(_Dbg_linespec_setup)} {($ VSub_Name "$n")})
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (DBracket
                          expr: (BoolUnary op_id:BoolUnary_n child:{($ VSub_Name "$full_filename")})
                        )
                      terminator: <Op_Semi ";">
                    )
                  ]
                  action: [
                    (If
                      arms: [
                        (if_arm
                          cond: [
                            (Sentence
                              child: 
                                (DParen
                                  child: 
                                    (ArithBinary
                                      op_id: Arith_DEqual
                                      left: (ArithVarRef name:line_number)
                                      right: (ArithWord w:{(Lit_Digits 0)})
                                    )
                                )
                              terminator: <Op_Semi ";">
                            )
                          ]
                          action: [(C {(_Dbg_msg)} {(DQ ("There is no line 0 to clear action at."))})]
                          spids: [-1 745]
                        )
                      ]
                      else_action: [
                        (C {(_Dbg_check_line)} {($ VSub_Name "$line_number")} 
                          {(DQ ($ VSub_Name "$full_filename"))}
                        )
                        (AndOr
                          children: [
                            (DParen
                              child: 
                                (ArithBinary
                                  op_id: Arith_DEqual
                                  left: (ArithWord w:{($ VSub_QMark "$?")})
                                  right: (ArithWord w:{(Lit_Digits 0)})
                                )
                            )
                            (C {(_Dbg_unset_action)} {(DQ ($ VSub_Name "$full_filename"))} 
                              {(DQ ($ VSub_Name "$line_number"))}
                            )
                          ]
                          op_id: Op_DAmp
                        )
                        (If
                          arms: [
                            (if_arm
                              cond: [
                                (Sentence
                                  child: 
                                    (DBracket
                                      expr: 
                                        (BoolBinary
                                          op_id: BoolBinary_GlobDEqual
                                          left: {($ VSub_QMark "$?")}
                                          right: {(0)}
                                        )
                                    )
                                  terminator: <Op_Semi ";">
                                )
                              ]
                              action: [
                                (C {(_Dbg_msg)} {(DQ ("Removed action."))})
                                (ControlFlow
                                  token: <ControlFlow_Return return>
                                  arg_word: {(0)}
                                )
                              ]
                              spids: [-1 807]
                            )
                          ]
                          else_action: [
                            (C {(_Dbg_errmsg)} 
                              {(DQ ("Didn't find any actions to remove at ") ($ VSub_Name "$n") (.))}
                            )
                          ]
                          spids: [822 834]
                        )
                      ]
                      spids: [755 837]
                    )
                  ]
                  spids: [-1 727]
                )
              ]
              else_action: [(C {(_Dbg_file_not_read_in)} {($ VSub_Name "$filename")})]
              spids: [840 848]
            )
            (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
          ]
          spids: [657]
        )
      spids: [653 656]
    )
    (FuncDef
      name: _Dbg_do_clear_all_actions
      body: 
        (BraceGroup
          children: [
            (AndOr
              children: [
                (DParen
                  child: 
                    (ArithBinary
                      op_id: Arith_NEqual
                      left: (ArithWord w:{($ VSub_Pound "$#")})
                      right: (ArithWord w:{(Lit_Digits 0)})
                    )
                )
                (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
              ]
              op_id: Op_DAmp
            )
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (DParen
                          child: 
                            (ArithBinary
                              op_id: Arith_DEqual
                              left: (ArithVarRef name:_Dbg_action_count)
                              right: (ArithWord w:{(Lit_Digits 0)})
                            )
                        )
                      terminator: <Op_Semi ";">
                    )
                  ]
                  action: [
                    (C {(_Dbg_errmsg)} {(DQ ("No actions to delete."))})
                    (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
                  ]
                  spids: [-1 899]
                )
              ]
              spids: [-1 914]
            )
            (C {(typeset)} {(-l)} {(_Dbg_response)})
            (C {(_Dbg_confirm)} {(DQ ("Delete all actions? (y/N): "))} {(SQ <N>)})
            (AndOr
              children: [
                (DBracket
                  expr: 
                    (BoolBinary
                      op_id: BoolBinary_GlobDEqual
                      left: {($ VSub_Name "$_Dbg_response")}
                      right: {(Lit_Other "[") (yY) (Lit_Other "]")}
                    )
                )
                (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
              ]
              op_id: Op_DAmp
            )
            (C {(_Dbg_write_journal_eval)} {(DQ ("_Dbg_action_count=0"))})
            (C {(_Dbg_write_journal_eval)} {(DQ ("_Dbg_action_enable=()"))})
            (C {(_Dbg_write_journal_eval)} {(DQ ("_Dbg_action_line=()"))})
            (C {(_Dbg_write_journal_eval)} {(DQ ("_Dbg_action_file=()"))})
            (C {(_Dbg_write_journal_eval)} {(DQ ("_Dbg_action_stmt=()"))})
            (C {(_Dbg_write_journal_eval)} {(DQ ("_Dbg_action_file2action=()"))})
            (C {(_Dbg_write_journal_eval)} {(DQ ("_Dbg_action_file2linenos=()"))})
            (ControlFlow token:<ControlFlow_Return return> arg_word:{(0)})
          ]
          spids: [865]
        )
      spids: [861 864]
    )
  ]
)