(command.CommandList
  children: [
    (command.AndOr
      ops: [Id.Op_DAmp]
      children: [
        (C {<Id.Lit_LBracket '['>} 
          {
            (braced_var_sub
              token: <Id.VSub_Name TEST_SH>
              suffix_op: (suffix_op.Unary tok:<Id.VTest_Plus '+'> arg_word:{<true>})
            )
          } {<Id.Lit_RBracket ']'>}
        )
        (command.ControlFlow token:<Id.ControlFlow_Return return>)
      ]
    )
    (C {<declare>} {<-g>} {<Id.Lit_VarLike 'TEST_SH='> <true>})
    (C {<.>} 
      {
        (braced_var_sub
          token: <Id.VSub_Name BASH_SOURCE>
          suffix_op: 
            (suffix_op.Unary
              tok: <Id.VOp1_Percent '%'>
              arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
            )
        ) <'/common.sh'>
      }
    )
    (C {<.>} 
      {
        (braced_var_sub
          token: <Id.VSub_Name BASH_SOURCE>
          suffix_op: 
            (suffix_op.Unary
              tok: <Id.VOp1_Percent '%'>
              arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
            )
        ) <'/variables.sh'>
      }
    )
    (C {<.>} 
      {
        (braced_var_sub
          token: <Id.VSub_Name BASH_SOURCE>
          suffix_op: 
            (suffix_op.Unary
              tok: <Id.VOp1_Percent '%'>
              arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
            )
        ) <'/variables.linkedlist.sh'>
      }
    )
    (C {<.>} 
      {
        (braced_var_sub
          token: <Id.VSub_Name BASH_SOURCE>
          suffix_op: 
            (suffix_op.Unary
              tok: <Id.VOp1_Percent '%'>
              arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
            )
        ) <'/evaluator.sh'>
      }
    )
    (command.ShFunction
      name: createTestEnv
      body: 
        (BraceGroup
          children: [
            (C {<environment> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <new>})
            (C {<evaluator> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <setup_builtins>} 
              {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
        )
    )
    (command.ShFunction
      name: setInEnv
      body: 
        (BraceGroup
          children: [
            (C {<declare>} {<Id.Lit_VarLike 'env='> (DQ (${ Id.VSub_Number 1))})
            (C {<declare>} {<Id.Lit_VarLike 'name='> (DQ (${ Id.VSub_Number 2))})
            (C {<declare>} {<Id.Lit_VarLike 'type='> (DQ (${ Id.VSub_Number 3))})
            (C {<declare>} {<Id.Lit_VarLike 'value='> (DQ (${ Id.VSub_Number 4))})
            (command.Sentence
              child: 
                (C {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <new>} {<Identifier>} 
                  {(DQ (${ Id.VSub_Name name))}
                )
              terminator: <Id.Op_Semi _>
            )
            (C {<declare>} {<Id.Lit_VarLike 'nameToken='> (DQ (${ Id.VSub_Name RESULT))})
            (command.Sentence
              child: 
                (C {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <new>} 
                  {(DQ (${ Id.VSub_Name type))} {(DQ (${ Id.VSub_Name value))}
                )
              terminator: <Id.Op_Semi _>
            )
            (C {<declare>} {<Id.Lit_VarLike 'valueToken='> (DQ (${ Id.VSub_Name RESULT))})
            (C {<environment> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <setVariable>} 
              {(DQ (${ Id.VSub_Name env))} {(DQ (${ Id.VSub_Name nameToken))} {(DQ (${ Id.VSub_Name valueToken))}
            )
            (C {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <new>} {<Identifier>} 
              {(DQ (${ Id.VSub_Name name))}
            )
          ]
        )
    )
    (command.ShFunction
      name: appendToList
      body: 
        (BraceGroup
          children: [
            (C {<declare>} {<Id.Lit_VarLike 'listToken='> (DQ (${ Id.VSub_Number 1))})
            (C {<declare>} {<-a>} 
              {<Id.Lit_VarLike 'items='> 
                (sh_array_literal
                  left: <Id.Op_LParen _>
                  words: [
                    {
                      (DQ 
                        (braced_var_sub
                          token: <Id.VSub_At '@'>
                          suffix_op: (suffix_op.Slice begin:{<Id.Lit_Digits 2>})
                        )
                      )
                    }
                  ]
                )
              }
            )
            (C {<declare>} {<-i>} {<size>})
            (C {<declare>} {<-i>} {<max_index>})
            (C {<declare>} {<currentType>})
            (C {<declare>} {<currentValue>})
            (command.DParen
              child: 
                (arith_expr.Binary
                  op_id: Id.Arith_Comma
                  left: 
                    (arith_expr.BinaryAssign
                      op_id: Id.Arith_Equal
                      left: <Id.Lit_ArithVarLike size>
                      right: 
                        {
                          (braced_var_sub
                            token: <Id.VSub_Name items>
                            prefix_op: (Id.VSub_Pound)
                            bracket_op: (bracket_op.WholeArray op_id:Id.Lit_At)
                          )
                        }
                    )
                  right: 
                    (arith_expr.BinaryAssign
                      op_id: Id.Arith_Equal
                      left: <Id.Lit_ArithVarLike max_index>
                      right: 
                        (arith_expr.Binary
                          op_id: Id.Arith_Minus
                          left: <Id.Lit_ArithVarLike size>
                          right: {<Id.Lit_Digits 1>}
                        )
                    )
                )
            )
            (command.If
              arms: [
                (if_arm
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (command.DParen
                              child: 
                                (arith_expr.Binary
                                  op_id: Id.Arith_NEqual
                                  left: 
                                    (arith_expr.Binary
                                      op_id: Id.Arith_Percent
                                      left: <Id.Lit_ArithVarLike size>
                                      right: {<Id.Lit_Digits 2>}
                                    )
                                  right: {<Id.Lit_Digits 0>}
                                )
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  action: [
                    (C {<stderr>} {(DQ <'appendToList: number of items to add to list not even'>)})
                    (command.ControlFlow
                      token: <Id.ControlFlow_Exit exit>
                      arg_word: {<1>}
                    )
                  ]
                  spids: [340 356]
                )
              ]
            )
            (command.ForExpr
              init: 
                (arith_expr.BinaryAssign
                  op_id: Id.Arith_Equal
                  left: <Id.Lit_ArithVarLike i>
                  right: {<Id.Lit_Digits 0>}
                )
              cond: 
                (arith_expr.Binary
                  op_id: Id.Arith_LessEqual
                  left: <Id.Lit_ArithVarLike i>
                  right: <Id.Lit_ArithVarLike max_index>
                )
              update: 
                (arith_expr.BinaryAssign
                  op_id: Id.Arith_Equal
                  left: <Id.Lit_ArithVarLike i>
                  right: 
                    (arith_expr.Binary
                      op_id: Id.Arith_Plus
                      left: <Id.Lit_ArithVarLike i>
                      right: {<Id.Lit_Digits 2>}
                    )
                )
              body: 
                (command.DoGroup
                  children: [
                    (command.ShAssignment
                      pairs: [
                        (assign_pair
                          lhs: (sh_lhs_expr.Name name:currentType)
                          op: assign_op.Equal
                          rhs: 
                            {
                              (DQ 
                                (braced_var_sub
                                  token: <Id.VSub_Name items>
                                  bracket_op: (bracket_op.ArrayIndex expr:{(${ Id.VSub_Name i)})
                                )
                              )
                            }
                          spids: [399]
                        )
                      ]
                    )
                    (command.ShAssignment
                      pairs: [
                        (assign_pair
                          lhs: (sh_lhs_expr.Name name:currentValue)
                          op: assign_op.Equal
                          rhs: 
                            {
                              (DQ 
                                (braced_var_sub
                                  token: <Id.VSub_Name items>
                                  bracket_op: 
                                    (bracket_op.ArrayIndex
                                      expr: 
                                        (arith_expr.Binary
                                          op_id: Id.Arith_Plus
                                          left: <Id.Lit_ArithVarLike i>
                                          right: {<Id.Lit_Digits 1>}
                                        )
                                    )
                                )
                              )
                            }
                          spids: [412]
                        )
                      ]
                    )
                    (C {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <new>} 
                      {(DQ (${ Id.VSub_Name currentType))} {(DQ (${ Id.VSub_Name currentValue))}
                    )
                    (C 
                      {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                        <Id.Lit_Colon ':'> <append>
                      } {(DQ (${ Id.VSub_Name listToken))} {(DQ (${ Id.VSub_Name RESULT))}
                    )
                  ]
                )
            )
          ]
        )
    )
  ]
)