(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: [16777215 106] ) ] spids: [16777215 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: [ (Assignment keyword: Assign_Typeset pairs: [ (assign_pair lhs: (LhsName name:n) op: Equal rhs: {($ VSub_Name '$_Dbg_frame_last_lineno')} spids: [142] ) ] spids: [140] ) ] spids: [16777215 136] ) ] else_action: [ (Assignment keyword: Assign_Typeset pairs: [ (assign_pair lhs: (LhsName name:n) op: Equal rhs: {($ VSub_Number '$1')} spids: [151] ) ] spids: [149] ) (C {(shift)}) ] spids: [146 158] ) (Assignment keyword: Assign_Typeset pairs: [ (assign_pair lhs: (LhsName name:stmt) op: Equal rhs: {(DQ ($ VSub_Star '$*'))} spids: [164] ) ] spids: [162] ) (Assignment keyword: Assign_Typeset pairs: [(assign_pair lhs:(LhsName name:filename) op:Equal spids:[173])] spids: [171] ) (Assignment keyword: Assign_Typeset flags: [-i] pairs: [(assign_pair lhs:(LhsName name:line_number) op:Equal spids:[180])] spids: [176] ) (Assignment keyword: Assign_Typeset pairs: [(assign_pair lhs:(LhsName name:full_filename) op:Equal spids:[185])] spids: [183] ) (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: [16777215 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: [16777215 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 ) (Assignment keyword: Assign_Typeset flags: [-r] pairs: [ (assign_pair lhs: (LhsName name:n) op: Equal rhs: { (BracedVarSub token: <VSub_Number 1> suffix_op: (StringUnary op_id: VTest_ColonHyphen arg_word: {($ VSub_Name '$_Dbg_frame_last_lineno')} ) spids: [345 349] ) } spids: [344] ) ] spids: [340] ) (Assignment keyword: Assign_Typeset pairs: [(assign_pair lhs:(LhsName name:filename) op:Equal spids:[355])] spids: [353] ) (Assignment keyword: Assign_Typeset flags: [-i] pairs: [(assign_pair lhs:(LhsName name:line_number) op:Equal spids:[362])] spids: [358] ) (Assignment keyword: Assign_Typeset pairs: [(assign_pair lhs:(LhsName name:full_filename) op:Equal spids:[367])] spids: [365] ) (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: [16777215 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: [16777215 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: [16777215 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: [ (Assignment keyword: Assign_Typeset flags: [-r] pairs: [ (assign_pair lhs: (LhsName name:to_go) op: Equal rhs: {($ VSub_At '$@')} spids: [534] ) ] spids: [530] ) (Assignment keyword: Assign_Typeset flags: [-i] pairs: [(assign_pair lhs:(LhsName name:i) op:Equal spids:[542])] spids: [538] ) (Assignment keyword: Assign_Typeset flags: [-i] pairs: [(assign_pair lhs:(LhsName name:found) op:Equal rhs:{(0)} spids:[549])] spids: [545] ) (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 16777215] ) (case_arm pat_list: [{(Lit_Other '*')}] action: [ (C {(_Dbg_msg)} {(DQ ('Invalid entry number skipped: ') ($ VSub_Name '$del'))} ) ] spids: [600 602 16777215 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 ) (Assignment keyword: Assign_Typeset flags: [-r] pairs: [ (assign_pair lhs: (LhsName name:n) op: Equal rhs: { (BracedVarSub token: <VSub_Number 1> suffix_op: (StringUnary op_id: VTest_ColonHyphen arg_word: {($ VSub_Name '$_Dbg_frame_last_lineno')} ) spids: [683 687] ) } spids: [682] ) ] spids: [678] ) (Assignment keyword: Assign_Typeset pairs: [(assign_pair lhs:(LhsName name:filename) op:Equal spids:[693])] spids: [691] ) (Assignment keyword: Assign_Typeset flags: [-i] pairs: [(assign_pair lhs:(LhsName name:line_number) op:Equal spids:[700])] spids: [696] ) (Assignment keyword: Assign_Typeset pairs: [(assign_pair lhs:(LhsName name:full_filename) op:Equal spids:[705])] spids: [703] ) (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: [16777215 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: [16777215 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: [16777215 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: [16777215 899] ) ] spids: [16777215 914] ) (Assignment keyword: Assign_Typeset flags: [-l] pairs: [(assign_pair lhs:(LhsName name:_Dbg_response) op:Equal spids:[922])] spids: [918] ) (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] ) ] )