Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add missing S7_super method for Ops #359

Merged
merged 5 commits into from
Nov 29, 2023
Merged

Add missing S7_super method for Ops #359

merged 5 commits into from
Nov 29, 2023

Conversation

hadley
Copy link
Member

@hadley hadley commented Sep 15, 2023

Fixes #357

@hadley hadley requested a review from DavisVaughan September 15, 2023 20:11
R/method-ops.R Outdated
@@ -19,6 +19,9 @@ Ops.S7_object <- function(e1, e2) {
base_ops[[.Generic]](e1, e2)
}

#' @export
Ops.S7_super <- Ops.S7_object

#' @rawNamespace if (getRversion() >= "4.3.0") S3method(chooseOpsMethod, S7_object)
chooseOpsMethod.S7_object <- function(x, y, mx, my, cl, reverse) TRUE
Copy link
Collaborator

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Do we need this for S7_super?

Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Oh yeah, I bet we do.

@hadley hadley merged commit e9ebe6f into main Nov 29, 2023
12 checks passed
@hadley hadley deleted the ops-super branch November 29, 2023 22:47
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

Successfully merging this pull request may close these issues.

super() needs to work with Ops
2 participants