(CommandList children: [ (C {(source)} { (CommandSubPart command_list: (CommandList children:[(C {(dirname)} {($ VSub_Number '$0')})]) left_token: <Left_CommandSub '$('> spids: [6 10] ) (/reader.sh) } ) (C {(source)} { (CommandSubPart command_list: (CommandList children:[(C {(dirname)} {($ VSub_Number '$0')})]) left_token: <Left_CommandSub '$('> spids: [15 19] ) (/printer.sh) } ) (FuncDef name: READ body: (BraceGroup children: [ (AndOr ops: [Op_DAmp Op_DPipe] children: [ (C {(Lit_Other '[')} {(DQ (${ VSub_Number 1))} {(Lit_Other ']')}) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:r) op: Equal rhs: {(DQ (${ VSub_Number 1))} spids: [46] ) ] spids: [46] ) (C {(READLINE)}) ] ) (C {(READ_STR)} {(DQ (${ VSub_Name r))}) ] spids: [31] ) spids: [26 30] ) (FuncDef name: EVAL body: (BraceGroup children: [ (Assignment keyword: Assign_Local pairs: [ (assign_pair lhs: (LhsName name:ast) op: Equal rhs: {(DQ (${ VSub_Number 1))} spids: [82] ) ] spids: [80] ) (Assignment keyword: Assign_Local pairs: [ (assign_pair lhs: (LhsName name:env) op: Equal rhs: {(DQ (${ VSub_Number 2))} spids: [92] ) ] spids: [90] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:r) op:Equal rhs:{(EmptyPart)} spids:[100])] spids: [100] ) (AndOr ops: [Op_DAmp] children: [ (DBracket expr:(WordTest w:{(DQ (${ VSub_Name __ERROR))})) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:r) op: Equal rhs: {(DQ (${ VSub_Name ast))} spids: [120] ) ] spids: [120] ) ] spids: [77] ) spids: [72 76] ) (FuncDef name: PRINT body: (BraceGroup children: [ (If arms: [ (if_arm cond: [ (Sentence child: (DBracket expr:(WordTest w:{(DQ (${ VSub_Name __ERROR))})) terminator: <Op_Semi ';'> ) ] action: [ (C {(_pr_str)} {(DQ (${ VSub_Name __ERROR))} {(yes)}) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:r) op: Equal rhs: {(DQ ('Error: ') (${ VSub_Name r))} spids: [168] ) ] spids: [168] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:__ERROR) op: Equal rhs: {(EmptyPart)} spids: [177] ) ] spids: [177] ) ] spids: [16777215 154] ) ] else_action: [(C {(_pr_str)} {(DQ (${ VSub_Number 1))} {(yes)})] spids: [180 194] ) ] spids: [138] ) spids: [133 137] ) (FuncDef name: REP body: (BraceGroup children: [ (C {(READ)} {(DQ (${ VSub_Number 1))}) (C {(EVAL)} {(DQ (${ VSub_Name r))}) (C {(PRINT)} {(DQ (${ VSub_Name r))}) ] spids: [207] ) spids: [202 206] ) (While cond: [(Sentence child:(C {(true)}) terminator:<Op_Semi ';'>)] body: (DoGroup children: [ (AndOr ops: [Op_DPipe] children: [ (C {(READLINE)} {(DQ ('user> '))}) (ControlFlow token: <ControlFlow_Exit exit> arg_word: {(DQ ($ VSub_QMark '$?'))} ) ] ) (AndOr ops: [Op_DAmp Op_DAmp] children: [ (DBracket expr:(WordTest w:{(DQ (${ VSub_Name r))})) (C {(REP)} {(DQ (${ VSub_Name r))}) (C {(echo)} {(DQ (${ VSub_Name r))}) ] ) ] spids: [247 295] ) ) ] )