dispatch => {
      A => sub { $self->suba(@_) },
      B => sub { $self->subb(@_) },
    }