Skip to content

Commit

Permalink
no RCall. needed
Browse files Browse the repository at this point in the history
  • Loading branch information
schlichtanders committed May 6, 2024
1 parent c7dfe5f commit 05a680e
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions src/callback.jl
Original file line number Diff line number Diff line change
Expand Up @@ -146,12 +146,12 @@ function sexp(::Type{RClass{:function}}, f)
nprotect = 2
local clos
try
args = RCall.protect(RCall.sexp_arglist_dots())
args = protect(sexp_arglist_dots())
nprotect += 1
lang = RCall.rlang_p(:function, args, body)
clos = RCall.reval_p(lang)
lang = rlang_p(:function, args, body)
clos = reval_p(lang)
finally
RCall.unprotect(nprotect)
unprotect(nprotect)
end
clos
end
Expand Down

0 comments on commit 05a680e

Please sign in to comment.