Unverified Commit aabbb979 authored by Michael Frasco's avatar Michael Frasco Committed by GitHub
Browse files

use keyword arguments for internal functions in utils.R (#3604)

parent 0a9bd662
lgb.is.Booster <- function(x) { lgb.is.Booster <- function(x) {
lgb.check.r6.class(x, "lgb.Booster") lgb.check.r6.class(object = x, name = "lgb.Booster")
} }
lgb.is.Dataset <- function(x) { lgb.is.Dataset <- function(x) {
lgb.check.r6.class(x, "lgb.Dataset") lgb.check.r6.class(object = x, name = "lgb.Dataset")
} }
lgb.null.handle <- function() { lgb.null.handle <- function() {
...@@ -53,7 +53,7 @@ lgb.last_error <- function() { ...@@ -53,7 +53,7 @@ lgb.last_error <- function() {
) )
} }
stop("api error: ", lgb.encode.char(err_msg, act_len)) stop("api error: ", lgb.encode.char(arr = err_msg, len = act_len))
} }
lgb.call <- function(fun_name, ret, ...) { lgb.call <- function(fun_name, ret, ...) {
...@@ -104,7 +104,7 @@ lgb.call.return.str <- function(fun_name, ...) { ...@@ -104,7 +104,7 @@ lgb.call.return.str <- function(fun_name, ...) {
buf <- lgb.call(fun_name, ret = buf, ..., buf_len, act_len) buf <- lgb.call(fun_name, ret = buf, ..., buf_len, act_len)
} }
return(lgb.encode.char(buf, act_len)) return(lgb.encode.char(arr = buf, len = act_len))
} }
...@@ -163,10 +163,10 @@ lgb.params2str <- function(params, ...) { ...@@ -163,10 +163,10 @@ lgb.params2str <- function(params, ...) {
# Check ret length # Check ret length
if (length(ret) == 0L) { if (length(ret) == 0L) {
return(lgb.c_str("")) return(lgb.c_str(x = ""))
} }
return(lgb.c_str(paste0(ret, collapse = " "))) return(lgb.c_str(x = paste0(ret, collapse = " ")))
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment