(command.CommandList children: [ (C {<_Dbg_help_add>} {<undisplay>} { (DQ <'**undisplay** *display-number*...\n'> <'\n'> < 'Cancel some expressions to be displayed when program stops. Arguments are the code numbers\n' > <'of the expressions to stop displaying.\n'> <'\n'> <'Examples:\n'> <'---------\n'> <'\n'> <' undisplay 0 # Removes display statement 0\n'> <' undisplay 0 3 4 # Removes display statements 0, 3, and 4\n'> <'\n'> <'See also:\n'> <'---------\n'> <'\n'> <'*display* and *info display*.'> ) } ) (command.ShFunction name: _Dbg_do_undisplay body: (BraceGroup children: [ (C {<typeset>} {<-i>} {<del>}) (command.If arms: [ (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (command.DParen child: (arith_expr.Binary op_id: Id.Arith_DEqual left: {<Id.Lit_Digits 0>} right: {($ Id.VSub_Pound '$#')} ) ) terminator: <Id.Op_Semi _> ) ] ) action: [ (C {<_Dbg_errmsg>} {(SQ <'You need to pass in some display numbers.'>)}) (command.ControlFlow token: <Id.ControlFlow_Return return> arg_word: {<0>} ) ] spids: [100 115] ) ] ) (command.ForEach iter_name: del iter_words: [{($ Id.VSub_At '$@')}] do_arg_iter: F body: (command.DoGroup children: [ (command.If arms: [ (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (C {<Id.Lit_LBracket '['>} {<-n>} { (DQ (braced_var_sub token: <Id.VSub_Name _Dbg_disp_exp> bracket_op: (bracket_op.ArrayIndex expr: {($ Id.VSub_DollarName '$del')} ) ) ) } {<Id.Lit_RBracket ']'>} ) terminator: <Id.Op_Semi _> ) ] ) action: [ (C {<_Dbg_write_journal_eval>} {(DQ <'unset _Dbg_disp_exp['> ($ Id.VSub_DollarName '$del') <']'>)} ) (C {<_Dbg_write_journal_eval>} {(DQ <'unset _Dbg_disp_enable['> ($ Id.VSub_DollarName '$del') <']'>)} ) (C {<_Dbg_msg>} {(DQ <'Display entry '> ($ Id.VSub_DollarName '$del') <' unset.'>)} ) ] spids: [147 166] ) ] else_action: [ (C {<_Dbg_msg>} { (DQ <'Display entry '> ($ Id.VSub_DollarName '$del') <' doesn\'t exist, so nothing done.'> ) } ) ] ) ] ) ) (command.ControlFlow token:<Id.ControlFlow_Return return> arg_word:{<0>}) ] ) ) ] )