(command.CommandList children: [ (command.Simple blame_tok: <_Dbg_help_add> more_env: [] words: [ {<_Dbg_help_add>} {<source>} {(SQ <'**source** *file*\n'> <'\n'> <'Run debugger commands in *file*.'>)} ] redirects: [] do_fork: T ) (command.ShFunction name_tok: <_Dbg_do_source> name: _Dbg_do_source body: (BraceGroup left: <Id.Lit_LBrace '{'> children: [ (command.If if_kw: <Id.KW_If if> arms: [ (IfArm keyword: <Id.KW_If if> cond: (condition.Shell commands: [ (command.Sentence child: (command.DParen left: <Id.Op_DLeftParen _> child: (arith_expr.Binary op_id: Id.Arith_DEqual left: {($ Id.VSub_Pound '#')} right: {<Id.Lit_Digits 0>} ) right: <Id.Op_DRightParen _> redirects: [] ) terminator: <Id.Op_Semi _> ) ] ) then_kw: <Id.KW_Then then> action: [ (command.Simple blame_tok: <_Dbg_errmsg> more_env: [] words: [ {<_Dbg_errmsg>} {(SQ <'Need to give a filename for the "source" command.'>)} ] redirects: [] do_fork: T ) (command.ControlFlow keyword: <Id.ControlFlow_Return return> arg_word: {<1>} ) ] spids: [90 105] ) ] else_action: [] fi_kw: <Id.KW_Fi fi> redirects: [] ) (command.Simple blame_tok: <typeset> more_env: [] words: [{<typeset>} {<filename>}] redirects: [] do_fork: T ) (command.Simple blame_tok: <_Dbg_tilde_expand_filename> more_env: [] words: [{<_Dbg_tilde_expand_filename>} {(DQ ($ Id.VSub_Number 1))}] redirects: [] do_fork: T ) (command.If if_kw: <Id.KW_If if> arms: [ (IfArm keyword: <Id.KW_If if> cond: (condition.Shell commands: [ (command.Sentence child: (command.AndOr children: [ (command.DBracket left: <Id.KW_DLeftBracket '[['> expr: (bool_expr.Unary op_id: Id.BoolUnary_r child: {($ Id.VSub_DollarName filename)} ) right: <Id.Lit_DRightBracket ']]'> redirects: [] ) (command.DBracket left: <Id.KW_DLeftBracket '[['> expr: (bool_expr.Binary op_id: Id.BoolBinary_GlobDEqual left: {(DQ ($ Id.VSub_DollarName filename))} right: {(SQ <'/dev/stdin'>)} ) right: <Id.Lit_DRightBracket ']]'> redirects: [] ) ] ops: [<Id.Op_DPipe _>] ) terminator: <Id.Op_Semi _> ) ] ) then_kw: <Id.KW_Then then> action: [ (command.Simple blame_tok: <exec> more_env: [] words: [{<exec>}] redirects: [ (Redir op: <Id.Redir_Less '{_Dbg_fdi}<'> loc: (redir_loc.VarName name:_Dbg_fdi) arg: {(DQ ($ Id.VSub_DollarName filename))} ) ] do_fork: T ) (command.ShAssignment left: <Id.Lit_ArrayLhsOpen '_Dbg_fd['> pairs: [ (AssignPair left: <Id.Lit_ArrayLhsOpen '_Dbg_fd['> lhs: (sh_lhs_expr.IndexedName left: <Id.Lit_ArrayLhsOpen '_Dbg_fd['> name: _Dbg_fd index: (arith_expr.UnaryAssign op_id: Id.Arith_DPlus child: ($ Id.Lit_ArithVarLike _Dbg_fd_last) ) ) op: assign_op.Equal rhs: {($ Id.VSub_DollarName _Dbg_fdi)} ) ] redirects: [] ) (command.ShAssignment left: <Id.Lit_VarLike '_Dbg_cmdfile+='> pairs: [ (AssignPair left: <Id.Lit_VarLike '_Dbg_cmdfile+='> lhs: (sh_lhs_expr.Name left: <Id.Lit_VarLike '_Dbg_cmdfile+='> name: _Dbg_cmdfile ) op: assign_op.PlusEqual rhs: { (ShArrayLiteral left: <Id.Op_LParen _> words: [{(DQ ($ Id.VSub_DollarName filename))}] right: <Id.Right_ShArrayLiteral _> ) } ) ] redirects: [] ) ] spids: [136 164] ) ] else_kw: <Id.KW_Else else> else_action: [ (command.Simple blame_tok: <_Dbg_errmsg> more_env: [] words: [ {<_Dbg_errmsg>} { (DQ <'Source file '> (word_part.EscapedLiteral token: <Id.Lit_EscapedChar '\\"'> ch: '"' ) ($ Id.VSub_DollarName filename) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <' is not readable.'> ) } ] redirects: [] do_fork: T ) (command.ControlFlow keyword: <Id.ControlFlow_Return return> arg_word: {<3>} ) ] fi_kw: <Id.KW_Fi fi> redirects: [] ) (command.ControlFlow keyword:<Id.ControlFlow_Return return> arg_word:{<0>}) ] redirects: [] right: <Id.Lit_RBrace '}'> ) ) ] )