(command.CommandList
  children: [
    (command.ShFunction
      name: test_alias
      body: 
        (BraceGroup
          children: [
            (C {<_Dbg_alias_add>} {<u>} {<up>})
            (command.Sentence
              child: (C {<typeset>} {<Id.Lit_VarLike 'expanded_alias='> (SQ )})
              terminator: <Id.Op_Semi _>
            )
            (C {<_Dbg_alias_expand>} {<u>})
            (C {<assertEquals>} {(SQ <up>)} {($ Id.VSub_DollarName '$expanded_alias')})
            (C {<_Dbg_alias_add>} {<q>} {<quit>})
            (command.Sentence
              child: 
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:expanded_alias)
                      op: assign_op.Equal
                      rhs: {(SQ )}
                      spids: [49]
                    )
                  ]
                )
              terminator: <Id.Op_Semi _>
            )
            (C {<_Dbg_alias_expand>} {<q>})
            (C {<assertEquals>} {(SQ <quit>)} {($ Id.VSub_DollarName '$expanded_alias')})
            (C {<typeset>} {<Id.Lit_VarLike 'aliases_found='> (SQ )})
            (C {<_Dbg_alias_find_aliased>} {<quit>})
            (C {<assertEquals>} {(SQ <q>)} {(DQ ($ Id.VSub_DollarName '$aliases_found'))})
            (C {<_Dbg_alias_add>} {<Id.ControlFlow_Exit exit>} {<quit>})
            (C {<_Dbg_alias_find_aliased>} {<quit>})
            (C {<assertEquals>} {(SQ <'exit, q'>)} {(DQ ($ Id.VSub_DollarName '$aliases_found'))})
            (C {<_Dbg_alias_remove>} {<q>})
            (command.Sentence
              child: 
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:expanded_alias)
                      op: assign_op.Equal
                      rhs: {(SQ )}
                      spids: [122]
                    )
                  ]
                )
              terminator: <Id.Op_Semi _>
            )
            (C {<_Dbg_alias_expand>} {<q>})
            (C {<assertEquals>} {(SQ <q>)} {($ Id.VSub_DollarName '$expanded_alias')})
            (C {<_Dbg_alias_find_aliased>} {<quit>})
            (C {<assertEquals>} {(SQ <exit>)} {(DQ ($ Id.VSub_DollarName '$aliases_found'))})
            (command.Sentence
              child: 
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:expanded_alias)
                      op: assign_op.Equal
                      rhs: {(SQ )}
                      spids: [159]
                    )
                  ]
                )
              terminator: <Id.Op_Semi _>
            )
            (C {<_Dbg_alias_expand>} {<u>})
            (C {<assertEquals>} {(SQ <up>)} {($ Id.VSub_DollarName '$expanded_alias')})
          ]
        )
    )
    (command.If
      arms: [
        (if_arm
          cond: 
            (condition.Shell
              commands: [
                (command.Sentence
                  child: 
                    (C {<Id.Lit_LBracket '['>} {(SQ <'/src/external-vcs/sourceforge/bashdb'>)} 
                      {<Id.Lit_Equals '='>} {(SQ )} {<Id.Lit_RBracket ']'>}
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          action: [
            (C {<echo>} {(DQ <'Something is wrong: abs_top_srcdir is not set.'>)})
            (command.ControlFlow token:<Id.ControlFlow_Exit exit> arg_word:{<1>})
          ]
          spids: [180 197]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:abs_top_srcdir)
          op: assign_op.Equal
          rhs: {<'/src/external-vcs/sourceforge/bashdb'>}
          spids: [213]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:abs_top_srcdir)
          op: assign_op.Equal
          rhs: 
            {
              (braced_var_sub
                token: <Id.VSub_Name abs_top_srcdir>
                suffix_op: (suffix_op.Unary tok:<Id.VOp1_DPercent '%%'> arg_word:{<Id.Lit_Slash '/'>})
              ) <'/'>
            }
          spids: [219]
        )
      ]
    )
    (C {<.>} {(${ Id.VSub_Name abs_top_srcdir) <'test/unit/helper.sh'>})
    (C {<.>} {($ Id.VSub_DollarName '$abs_top_srcdir') <'/lib/help.sh'>})
    (C {<.>} {($ Id.VSub_DollarName '$abs_top_srcdir') <'/lib/alias.sh'>})
    (C {<set>} {<-->})
    (command.AndOr
      ops: [Id.Op_DAmp]
      children: [
        (command.DBracket
          expr: 
            (bool_expr.Binary
              op_id: Id.BoolBinary_GlobDEqual
              left: {($ Id.VSub_Number '$0')}
              right: {(${ Id.VSub_Name BASH_SOURCE)}
            )
        )
        (C {<.>} {(${ Id.VSub_Name shunit_file)})
      ]
    )
  ]
)