(command.AndOr
  ops: [Id.Op_DAmp]
  children: [
    (command.ShFunction
      name: _file_roller
      body: 
        (BraceGroup
          children: [
            (C {<local>} {<cur>} {<prev>} {<words>} {<cword>} {<split>})
            (command.AndOr
              ops: [Id.Op_DPipe]
              children: [
                (C {<_init_completion>} {<-s>})
                (command.ControlFlow token:<Id.ControlFlow_Return return>)
              ]
            )
            (C {<local>} 
              {<Id.Lit_VarLike 'exts='> 
                (SQ 
                  <
'@(7z|ace|alz|ar|arj|[bglx]z|bz2|tb?(z)2|cab|cb[rz]|iso?(9660)|Z|t[abglx]z|cpio|deb|rar|?(g)tar|gem|lh[az]|lzh|?(t)lrz|lzma|lzo|wim|swm|rpm|sit|zoo)'
                  >
                )
              }
            )
            (command.Case
              to_match: {($ Id.VSub_DollarName '$prev')}
              arms: [
                (case_arm
                  pat_list: [
                    {<-> (SQ <'?'>)}
                    {<--help>}
                    {<--help-all>}
                    {<--help-gtk>}
                    {<--help-sm-client>}
                  ]
                  action: [(command.ControlFlow token:<Id.ControlFlow_Return return>)]
                  spids: [50 62 68 -1]
                )
                (case_arm
                  pat_list: [{<--sm-client-state-file>}]
                  action: [(C {<_filedir>}) (command.ControlFlow token:<Id.ControlFlow_Return return>)]
                  spids: [71 72 81 -1]
                )
                (case_arm
                  pat_list: [{<-a>} {<--add-to>}]
                  action: [
                    (C {<_filedir_xspec>} {<unzip>})
                    (C {<_filedir>} {(DQ ($ Id.VSub_DollarName '$exts'))})
                    (command.ControlFlow token:<Id.ControlFlow_Return return>)
                  ]
                  spids: [84 87 105 -1]
                )
                (case_arm
                  pat_list: [{<-e>} {<--extract-to>} {<--default-dir>}]
                  action: [
                    (C {<_filedir>} {<-d>})
                    (command.ControlFlow token:<Id.ControlFlow_Return return>)
                  ]
                  spids: [108 113 124 -1]
                )
              ]
            )
            (command.AndOr
              ops: [Id.Op_DAmp]
              children: [
                (C {($ Id.VSub_DollarName '$split')})
                (command.ControlFlow token:<Id.ControlFlow_Return return>)
              ]
            )
            (command.If
              arms: [
                (if_arm
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (command.DBracket
                              expr: 
                                (bool_expr.Binary
                                  op_id: Id.BoolBinary_GlobDEqual
                                  left: {($ Id.VSub_DollarName '$cur')}
                                  right: {<-> <Id.Lit_Other '*'>}
                                )
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  action: [
                    (command.ShAssignment
                      pairs: [
                        (assign_pair
                          lhs: (sh_lhs_expr.Name name:COMPREPLY)
                          op: assign_op.Equal
                          rhs: 
                            {
                              (sh_array_literal
                                left: <Id.Op_LParen _>
                                words: [
                                  {
                                    (command_sub
                                      left_token: <Id.Left_DollarParen '$('>
                                      child: 
                                        (C {<compgen>} {<-W>} {(SQ <'$( _parse_help "$1" --help-all )'>)} 
                                          {<-->} {(DQ ($ Id.VSub_DollarName '$cur'))}
                                        )
                                    )
                                  }
                                ]
                              )
                            }
                          spids: [156]
                        )
                      ]
                    )
                    (command.AndOr
                      ops: [Id.Op_DAmp]
                      children: [
                        (command.DBracket
                          expr: 
                            (bool_expr.Binary
                              op_id: Id.BoolBinary_GlobDEqual
                              left: {($ Id.VSub_DollarName '$COMPREPLY')}
                              right: {<Id.Lit_Other '*'> <Id.BoolBinary_GlobEqual '='>}
                            )
                        )
                        (C {<compopt>} {<-o>} {<nospace>})
                      ]
                    )
                    (command.ControlFlow token:<Id.ControlFlow_Return return>)
                  ]
                  spids: [139 153]
                )
              ]
            )
            (C {<_filedir_xspec>} {<unzip>})
            (C {<_filedir>} {(DQ ($ Id.VSub_DollarName '$exts'))})
          ]
        )
    )
    (C {<complete>} {<-F>} {<_file_roller>} {<file-roller>})
  ]
)