(CommandList children: [ (C {(_Dbg_help_add)} {(load)} {(SQ <'load SCRIPT\n'> <'\n'> <'Read in lines of a SCRIPT for use in listing.'>)} ) (FuncDef name: _Dbg_do_load body: (BraceGroup children: [ (If arms: [ (if_arm cond: [ (Sentence child: (DParen child: (ArithBinary op_id: Arith_NEqual left: (ArithWord w:{($ VSub_Pound '$#')}) right: (ArithWord w:{(Lit_Digits 1)}) ) ) terminator: <Op_Semi ';'> ) ] action: [ (C {(_Dbg_errmsg)} {(DQ ('Expecting one filename parameter, Got ') ($ VSub_Pound '$#') (.))} ) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] spids: [16777215 96] ) ] spids: [16777215 113] ) (Assignment keyword: Assign_Typeset pairs: [ (assign_pair lhs: (LhsName name:filename) op: Equal rhs: {(DQ ($ VSub_Number '$1'))} spids: [119] ) ] spids: [117] ) (Assignment keyword: Assign_Local pairs: [ (assign_pair lhs: (LhsName name:full_filename) op: Equal rhs: { (CommandSubPart command_list: (CommandList children: [ (C {(_Dbg_resolve_expand_filename)} {(DQ ($ VSub_Name '$filename'))}) ] ) left_token: <Left_CommandSub '$('> spids: [128 134] ) } spids: [127] ) ] spids: [125] ) (If arms: [ (if_arm cond: [ (Sentence child: (AndOr children: [ (C {(Lit_Other '[')} {(-n)} {($ VSub_Name '$full_filename')} {(Lit_Other ']')} ) (C {(Lit_Other '[')} {(-r)} {($ VSub_Name '$full_filename')} {(Lit_Other ']')} ) ] op_id: Op_DAmp ) terminator: <Op_Semi ';'> ) ] action: [ (ForEach iter_name: file iter_words: [ { (BracedVarSub token: <VSub_Name _Dbg_filenames> bracket_op: (WholeArray op_id:Lit_At) spids: [173 178] ) } ] do_arg_iter: False body: (DoGroup children: [ (If arms: [ (if_arm cond: [ (Sentence child: (DBracket expr: (BoolBinary op_id: BoolBinary_GlobDEqual left: {($ VSub_Name '$file')} right: {($ VSub_Name '$full_filename')} ) ) terminator: <Op_Semi ';'> ) ] action: [ (C {(_Dbg_msg)} { (DQ ('File ') ($ VSub_Name '$full_filename') (' already loaded.') ) } ) (ControlFlow token: <ControlFlow_Return return> arg_word: {(2)} ) ] spids: [16777215 200] ) ] spids: [16777215 217] ) ] spids: [182 220] ) spids: [172 180] ) (C {(_Dbg_readin)} {(DQ ($ VSub_Name '$full_filename'))}) (C {(_Dbg_msg)} {(DQ ('File ') ($ VSub_Name '$full_filename') (' loaded.'))}) ] spids: [16777215 159] ) ] else_action: [ (C {(_Dbg_errmsg)} {(DQ ("Couldn't resolve or read ") ($ VSub_Name '$filename'))}) (ControlFlow token:<ControlFlow_Return return> arg_word:{(3)}) ] spids: [240 256] ) (ControlFlow token:<ControlFlow_Return return> arg_word:{(0)}) ] spids: [77] ) spids: [73 76] ) ] )