oil AST

(CommandList
  children: [
    (If
      arms: [
        (if_arm
          cond: [
            (C {(Lit_Other '[')} {($ VSub_Pound '$#')} {(KW_Bang '!') (Lit_Other '=')} {(0)} 
              {(Lit_Other ']')}
            )
          ]
          action: [(C {(cd)} {($ VSub_Number '$1')})]
          spids: [16777215 22]
        )
      ]
      spids: [16777215 28]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:dname)
          op: Equal
          rhs: 
            {
              (CommandSubPart
                command_list: (CommandList children:[(C {(pwd)})])
                left_token: <Left_Backtick '`'>
                spids: [31 33]
              )
            }
          spids: [30]
        )
      ]
      spids: [30]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:fdname) op:Equal rhs:{($ VSub_Number '$2')} spids:[35])]
      spids: [35]
    )
    (If
      arms: [
        (if_arm
          cond: [
            (C {(Lit_Other '[')} {($ VSub_Name '$dname')} {(KW_Bang '!') (Lit_Other '=')} {(/)} 
              {(Lit_Other ']')}
            )
          ]
          action: [
            (Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (LhsName name:dname)
                  op: Equal
                  rhs: {(${ VSub_Name dname) (/)}
                  spids: [54]
                )
              ]
              spids: [54]
            )
          ]
          spids: [16777215 51]
        )
      ]
      spids: [16777215 60]
    )
    (C {(echo)} {(DQ ('<HTML>'))})
    (C {(echo)} {(DQ ('<TITLE>'))})
    (C {(echo)} {(Directory)} {(of)} {($ VSub_Name '$fdname')})
    (C {(echo)} {(DQ ('</TITLE>'))})
    (C {(echo)} {(DQ ('<H1>'))})
    (C {(echo)} {(Directory)} {(of)} {($ VSub_Name '$fdname')})
    (C {(echo)} {(DQ ('</H1>'))})
    (C {(echo)} {(DQ ('<HR>'))})
    (Pipeline
      children: [
        (C {(ls)} {($ VSub_Name '$dname')})
        (BraceGroup
          children: [
            (While
              cond: [(C {(read)} {(fname)})]
              body: 
                (DoGroup
                  children: [
                    (Assignment
                      keyword: Assign_None
                      pairs: [
                        (assign_pair
                          lhs: (LhsName name:lname)
                          op: Equal
                          rhs: {($ VSub_Name '$fdname') ($ VSub_Name '$fname')}
                          spids: [133]
                        )
                      ]
                      spids: [133]
                    )
                    (C {(echo)} {(DQ ('<H3>'))})
                    (C {(echo)} {(-n)} 
                      {(DQ ('<A HREF=') (EscapedLiteralPart token:<Lit_EscapedChar '\\"'>))}
                    )
                    (C {(echo)} {(-n)} {($ VSub_Name '$lname')})
                    (C {(echo)} {(-n)} {(DQ (EscapedLiteralPart token:<Lit_EscapedChar '\\"'>) ('>'))})
                    (C {(echo)} {(-n)} {($ VSub_Name '$fname')})
                    (C {(echo)} {(DQ ('</A><BR>'))})
                    (C {(echo)} {(DQ ('</H3>'))})
                  ]
                  spids: [131 185]
                )
            )
          ]
          spids: [123]
        )
      ]
      negated: False
    )
    (C {(echo)} {(DQ ('<HR>'))})
    (C {(echo)} {(DQ ('<H6>'))})
    (C {(echo)} {(Directory)} {(Generated)} {(at)} 
      {
        (CommandSubPart
          command_list: (CommandList children:[(C {(date)})])
          left_token: <Left_Backtick '`'>
          spids: [209 211]
        )
      }
    )
    (C {(echo)} {(DQ ('</H6>'))})
    (C {(echo)} {(DQ ('</HTML>'))})
    (C {(exit)} {(0)})
  ]
)