oil AST

(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(SQ <'git-svn svk merge tickets'>)}
          spids: [13]
        )
      ]
    )
    (C {<.>} {<'./lib-git-svn.sh'>})
    (C {<test_expect_success>} {(SQ <'load svk depot'>)} 
      {
        (DQ <'\n'> <'\tsvnadmin load -q \''> ($ Id.VSub_DollarName '$rawsvnrepo') <'\' '> <'\t  < \''> 
          ($ Id.VSub_DollarName '$TEST_DIRECTORY') <'/t9150/svk-merge.dump\' &&\n'> <'\tgit svn init --minimize-url -R svkmerge '> 
          <'\t  --rewrite-root=http://svn.example.org '> <'\t  -T trunk -b branches \''> ($ Id.VSub_DollarName '$svnrepo') <'\' &&\n'> 
          <'\tgit svn fetch --all\n'> <'\t'>
        )
      }
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:uuid)
          op: assign_op.Equal
          rhs: {<b48289b2-9c08-4d72-af37-0358a40b9c15>}
          spids: [51]
        )
      ]
    )
    (C {<test_expect_success>} {(SQ <'svk merges were represented coming in'>)} 
      {
        (DQ <'\n'> <'\t[ '> 
          (command_sub
            left_token: <Id.Left_DollarParen '$('>
            child: 
              (command.Pipeline
                children: [
                  (C {<git>} {<cat-file>} {<commit>} {<HEAD>})
                  (C {<grep>} {<parent>})
                  (C {<wc>} {<-l>})
                ]
                negated: F
              )
          ) <' -eq 2 ]\n'> <'\t'>
        )
      }
    )
    (C {<test_done>})
  ]
)