(command.CommandList
  children: [
    (command.ShFunction
      name: this_filename
      body: 
        (BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:ctr)
                  op: assign_op.Equal
                  rhs: {<0>}
                  spids: [16]
                )
              ]
            )
            (command.WhileUntil
              keyword: <Id.KW_While while>
              cond: [(command.Sentence child:(C {<true>}) terminator:<Id.Op_Semi _>)]
              body: 
                (command.DoGroup
                  children: [
                    (command.If
                      arms: [
                        (if_arm
                          cond: [
                            (command.Sentence
                              child: 
                                (command.DBracket
                                  expr: 
                                    (bool_expr.Unary
                                      op_id: Id.BoolUnary_z
                                      child: 
                                        {
                                          (DQ 
                                            (braced_var_sub
                                              token: <Id.VSub_Name FUNCNAME>
                                              bracket_op: 
                                                (bracket_op.ArrayIndex
                                                  expr: {($ Id.VSub_DollarName '$ctr')}
                                                )
                                            )
                                          )
                                        }
                                    )
                                )
                              terminator: <Id.Op_Semi _>
                            )
                          ]
                          action: [
                            (command.Simple
                              words: [{<echo>} {(DQ <'Error: couldn\'t find this_filename'>)}]
                              redirects: [
                                (redir
                                  op: <Id.Redir_GreatAnd '1>&'>
                                  loc: (redir_loc.Fd fd:1)
                                  arg: {<2>}
                                )
                              ]
                              do_fork: T
                            )
                            (command.ControlFlow
                              token: <Id.ControlFlow_Exit exit>
                              arg_word: {<1>}
                            )
                          ]
                          spids: [28 46]
                        )
                      ]
                    )
                    (command.If
                      arms: [
                        (if_arm
                          cond: [
                            (command.Sentence
                              child: 
                                (command.DBracket
                                  expr: 
                                    (bool_expr.Binary
                                      op_id: Id.BoolBinary_GlobDEqual
                                      left: 
                                        {
                                          (DQ 
                                            (braced_var_sub
                                              token: <Id.VSub_Name FUNCNAME>
                                              bracket_op: 
                                                (bracket_op.ArrayIndex
                                                  expr: {($ Id.VSub_DollarName '$ctr')}
                                                )
                                            )
                                          )
                                        }
                                      right: {(DQ <this_filename>)}
                                    )
                                )
                              terminator: <Id.Op_Semi _>
                            )
                          ]
                          action: [
                            (C {<echo>} 
                              {
                                (braced_var_sub
                                  token: <Id.VSub_Name BASH_SOURCE>
                                  bracket_op: 
                                    (bracket_op.ArrayIndex
                                      expr: {($ Id.VSub_DollarName '$ctr')}
                                    )
                                )
                              }
                            )
                            (command.ControlFlow
                              token: <Id.ControlFlow_Exit exit>
                              arg_word: {<0>}
                            )
                          ]
                          spids: [67 89]
                        )
                      ]
                    )
                    (command.ShAssignment
                      pairs: [
                        (assign_pair
                          lhs: (sh_lhs_expr.Name name:ctr)
                          op: assign_op.Equal
                          rhs: 
                            {
                              (word_part.ArithSub
                                anode: 
                                  (arith_expr.Binary
                                    op_id: Id.Arith_Plus
                                    left: {($ Id.VSub_DollarName '$ctr')}
                                    right: {<Id.Lit_Digits 1>}
                                  )
                              )
                            }
                          spids: [110]
                        )
                      ]
                    )
                  ]
                )
            )
          ]
        )
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:LIBALLOCS_BASE)
          op: assign_op.Equal
          rhs: 
            {
              (DQ 
                (braced_var_sub
                  token: <Id.VSub_Name LIBALLOCS_BASE>
                  suffix_op: 
                    (suffix_op.Unary
                      op_id: Id.VTest_ColonHyphen
                      arg_word: 
                        {
                          (command_sub
                            left_token: <Id.Left_DollarParen '$('>
                            child: 
                              (C {<dirname>} 
                                {
                                  (DQ 
                                    (command_sub
                                      left_token: <Id.Left_DollarParen '$('>
                                      child: (C {<this_filename>})
                                    )
                                  )
                                }
                              )
                          ) <Id.Lit_Slash '/'> <..>
                        }
                    )
                )
              )
            }
          spids: [128]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:USEDTYPES)
          op: assign_op.Equal
          rhs: 
            {
              (braced_var_sub
                token: <Id.VSub_Name USEDTYPES>
                suffix_op: 
                  (suffix_op.Unary
                    op_id: Id.VTest_ColonHyphen
                    arg_word: 
                      {(${ Id.VSub_Name LIBALLOCS_BASE) <Id.Lit_Slash '/'> <tools> <Id.Lit_Slash '/'> 
                        <usedtypes>
                      }
                  )
              )
            }
          spids: [149]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:BASE_TYPES_TRANSLATION)
          op: assign_op.Equal
          rhs: 
            {
              (braced_var_sub
                token: <Id.VSub_Name BASE_TYPES_TRANSLATION>
                suffix_op: 
                  (suffix_op.Unary
                    op_id: Id.VTest_ColonHyphen
                    arg_word: 
                      {(${ Id.VSub_Name LIBALLOCS_BASE) <Id.Lit_Slash '/'> <tools> <Id.Lit_Slash '/'> 
                        <lang> <Id.Lit_Slash '/'> <c> <Id.Lit_Slash '/'> <bin> <Id.Lit_Slash '/'> <base-types-translation>
                      }
                  )
              )
            }
          spids: [162]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:CC)
          op: assign_op.Equal
          rhs: 
            {
              (braced_var_sub
                token: <Id.VSub_Name CC>
                suffix_op: 
                  (suffix_op.Unary
                    op_id: Id.VTest_ColonHyphen
                    arg_word: 
                      {(command_sub left_token:<Id.Left_DollarParen '$('> child:(C {<which>} {<cc>}))}
                  )
              )
            }
          spids: [181]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:LD)
          op: assign_op.Equal
          rhs: 
            {
              (braced_var_sub
                token: <Id.VSub_Name LD>
                suffix_op: 
                  (suffix_op.Unary
                    op_id: Id.VTest_ColonHyphen
                    arg_word: 
                      {(command_sub left_token:<Id.Left_DollarParen '$('> child:(C {<which>} {<ld>}))}
                  )
              )
            }
          spids: [192]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:OBJCOPY)
          op: assign_op.Equal
          rhs: 
            {
              (braced_var_sub
                token: <Id.VSub_Name OBJCOPY>
                suffix_op: 
                  (suffix_op.Unary
                    op_id: Id.VTest_ColonHyphen
                    arg_word: 
                      {
                        (command_sub
                          left_token: <Id.Left_DollarParen '$('>
                          child: (C {<which>} {<objcopy>})
                        )
                      }
                  )
              )
            }
          spids: [203]
        )
      ]
    )
    (command.ShFunction
      name: compile
      body: 
        (BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:src)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number '$1'))}
                  spids: [223]
                )
              ]
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:dest)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number '$2'))}
                  spids: [229]
                )
              ]
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:asm)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (DQ 
                        (command_sub
                          left_token: <Id.Left_DollarParen '$('>
                          child: (C {<mktemp>} {<--suffix> <Id.Lit_Equals '='> <.s>})
                        )
                      )
                    }
                  spids: [235]
                )
              ]
            )
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp]
              children: [
                (C {<gcc>} {<-S>} {<-x>} {<c>} {<-o>} {(DQ ($ Id.VSub_DollarName '$asm'))} 
                  {(DQ ($ Id.VSub_DollarName '$src'))}
                )
                (C {<gcc>} {<-c>} {<-o>} {(DQ ($ Id.VSub_DollarName '$dest'))} 
                  {(DQ ($ Id.VSub_DollarName '$asm'))}
                )
                (command.Simple
                  words: [{<echo>} {(DQ <'Compiler generated '> ($ Id.VSub_DollarName '$dest'))}]
                  redirects: [(redir op:<Id.Redir_GreatAnd '1>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
                  do_fork: T
                )
              ]
            )
          ]
        )
    )
    (command.ShFunction
      name: link_defining_aliases
      body: 
        (BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:our_objfile)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number '$1'))}
                  spids: [314]
                )
              ]
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:our_usedtypes_obj)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number '$2'))}
                  spids: [320]
                )
              ]
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:temporary_out)
                  op: assign_op.Equal
                  rhs: {(command_sub left_token:<Id.Left_DollarParen '$('> child:(C {<mktemp>}))}
                  spids: [326]
                )
              ]
            )
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp]
              children: [
                (C {(${ Id.VSub_Name LD)} {<-o>} {(DQ ($ Id.VSub_DollarName '$temporary_out'))} {<-r>} 
                  {(DQ ($ Id.VSub_DollarName '$our_objfile'))} {(DQ ($ Id.VSub_DollarName '$our_usedtypes_obj'))}
                )
                (command.Simple
                  words: [
                    {<echo>}
                    {
                      (DQ <'Linker generated '> (${ Id.VSub_Name temporary_out) <', moving to '> 
                        (${ Id.VSub_Name our_objfile)
                      )
                    }
                  ]
                  redirects: [(redir op:<Id.Redir_GreatAnd '1>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
                  do_fork: T
                )
                (C {<mv>} {(DQ ($ Id.VSub_DollarName '$temporary_out'))} 
                  {(DQ ($ Id.VSub_DollarName '$our_objfile'))}
                )
              ]
            )
          ]
        )
    )
    (command.ShFunction
      name: symbol_redefinitions
      body: 
        (BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:f)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number '$1'))}
                  spids: [411]
                )
              ]
            )
            (command.Pipeline
              children: [
                (C {<nm>} {<-fposix>} {<--defined-only>} {(DQ ($ Id.VSub_DollarName '$f'))})
                (C {<tr>} {<-s>} {(SQ <'[:blank:]'>)} {(SQ <'\\t'>)})
                (C {<cut>} {<-f1>})
                (C {<egrep>} {(SQ <'__uniqtype_([0-9a-f]{8})_'>)})
                (C {<sed>} {<-r>} 
                  {
                    (SQ 
                      <
's/__uniqtype_([0-9a-f]{8})_(.*)/--redefine-sym __uniqtype__\\2=__uniqtype_\\1_\\2/'
                      >
                    )
                  }
                )
              ]
              negated: F
            )
          ]
        )
    )
    (command.ShFunction
      name: objcopy_and_redefine_codeless_names
      body: 
        (BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:our_objfile)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number '$1'))}
                  spids: [488]
                )
              ]
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:our_usedtypes_obj)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number '$2'))}
                  spids: [494]
                )
              ]
            )
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp]
              children: [
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:second_redefinition_args)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (DQ 
                            (command_sub
                              left_token: <Id.Left_DollarParen '$('>
                              child: 
                                (C {<symbol_redefinitions>} 
                                  {(DQ ($ Id.VSub_DollarName '$our_usedtypes_obj'))}
                                )
                            )
                          )
                        }
                      spids: [506]
                    )
                  ]
                )
                (command.Simple
                  words: [
                    {<echo>}
                    {(${ Id.VSub_Name OBJCOPY)}
                    {($ Id.VSub_DollarName '$second_redefinition_args')}
                    {(DQ ($ Id.VSub_DollarName '$our_objfile'))}
                  ]
                  redirects: [(redir op:<Id.Redir_GreatAnd '1>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
                  do_fork: T
                )
                (C {(${ Id.VSub_Name OBJCOPY)} {($ Id.VSub_DollarName '$second_redefinition_args')} 
                  {(DQ ($ Id.VSub_DollarName '$our_objfile'))}
                )
                (command.Simple
                  words: [
                    {<echo>}
                    {
                      (DQ <'objcopy renamed symbols in '> ($ Id.VSub_DollarName '$our_objfile') 
                        <' according to '> ($ Id.VSub_DollarName '$second_redefinition_args')
                      )
                    }
                  ]
                  redirects: [(redir op:<Id.Redir_GreatAnd '1>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
                  do_fork: T
                )
              ]
            )
          ]
        )
    )
  ]
)