(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:USAGE) op:Equal rhs:{(SQ <'[--prune]'>)} spids:[16])]
      spids: [16]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:SUBDIRECTORY_OK) op:Equal rhs:{(Yes)} spids:[21])]
      spids: [21]
    )
    (C {(.)} {(git-sh-setup)})
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:no_prune) op:Equal rhs:{(Lit_Other ':')} spids:[29])]
      spids: [29]
    )
    (While
      cond: [(C {(test)} {($ VSub_Pound '$#')} {(KW_Bang '!') (Lit_Other '=')} {(0)})]
      body: 
        (DoGroup
          children: [
            (Case
              to_match: {(DQ ($ VSub_Number '$1'))}
              arms: [
                (case_arm
                  pat_list: [{(--prune)}]
                  action: [
                    (Assignment
                      keyword: Assign_None
                      pairs: [
                        (assign_pair
                          lhs: (LhsName name:no_prune)
                          op: Equal
                          rhs: {(EmptyPart)}
                          spids: [59]
                        )
                      ]
                      spids: [59]
                    )
                  ]
                  spids: [55 56 62 16777215]
                )
                (case_arm
                  pat_list: [{(--)}]
                  action: [(C {(usage)})]
                  spids: [65 66 72 16777215]
                )
              ]
              spids: [46 52 75]
            )
            (C {(shift)})
          ]
          spids: [43 80]
        )
    )
    (Case
      to_match: 
        {
          (DQ 
            (CommandSubPart
              command_list: (CommandList children:[(C {(git)} {(config)} {(--get)} {(gc.packrefs)})])
              left_token: <Left_CommandSub '$('>
              spids: [86 94]
            )
          )
        }
      arms: [
        (case_arm
          pat_list: [{(notbare)} {(DQ )}]
          action: [
            (AndOr
              ops: [Op_DPipe]
              children: [
                (C {(test)} 
                  {
                    (CommandSubPart
                      command_list: (CommandList children:[(C {(is_bare_repository)})])
                      left_token: <Left_CommandSub '$('>
                      spids: [108 110]
                    )
                  } {(Lit_Other '=')} {(true)}
                )
                (Assignment
                  keyword: Assign_None
                  pairs: [
                    (assign_pair
                      lhs: (LhsName name:pack_refs)
                      op: Equal
                      rhs: {(true)}
                      spids: [118]
                    )
                  ]
                  spids: [118]
                )
              ]
            )
          ]
          spids: [99 103 120 16777215]
        )
        (case_arm
          pat_list: [{(Lit_Other '*')}]
          action: [
            (Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (LhsName name:pack_refs)
                  op: Equal
                  rhs: 
                    {
                      (CommandSubPart
                        command_list: 
                          (CommandList
                            children: [(C {(git)} {(config)} {(--bool)} {(--get)} {(gc.packrefs)})]
                          )
                        left_token: <Left_CommandSub '$('>
                        spids: [127 137]
                      )
                    }
                  spids: [126]
                )
              ]
              spids: [126]
            )
          ]
          spids: [122 123 16777215 139]
        )
      ]
      spids: [83 97 139]
    )
    (AndOr
      ops: [Op_DPipe Op_DAmp Op_DAmp Op_DAmp Op_DAmp Op_DPipe]
      children: [
        (C {(test)} {(DQ (true))} {(KW_Bang '!') (Lit_Other '=')} {(DQ ($ VSub_Name '$pack_refs'))})
        (C {(git)} {(pack-refs)} {(--prune)})
        (C {(git)} {(reflog)} {(expire)} {(--all)})
        (C {(git-repack)} {(-a)} {(-d)} {(-l)})
        (C {($ VSub_Name '$no_prune')} {(git)} {(prune)})
        (C {(git)} {(rerere)} {(gc)})
        (ControlFlow token:<ControlFlow_Exit exit>)
      ]
    )
  ]
)