Skip to content

Commit

Permalink
Corner case for %in%
Browse files Browse the repository at this point in the history
  • Loading branch information
krlmlr committed May 5, 2024
1 parent 1e3393e commit 974ec96
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions R/relational.R
Original file line number Diff line number Diff line change
Expand Up @@ -189,6 +189,9 @@ rel_translate <- function(
tryCatch(
{
values <- eval(expr[[3]], envir = env)
if (length(values) == 0) {
return(relexpr_constant(FALSE))
}
consts <- map(values, do_translate, in_window = in_window)
ops <- map(consts, list, do_translate(expr[[2]]))
cmp <- map(ops, relexpr_function, name = "___eq_na_matches_na")
Expand Down

0 comments on commit 974ec96

Please sign in to comment.