/dports/devel/R-cran-vctrs/vctrs/R/ |
H A D | type-bare.R | 9 vec_ptype2.logical <- function(x, y, ..., x_arg = "", y_arg = "") { argument 16 vec_ptype2.integer <- function(x, y, ..., x_arg = "", y_arg = "") { argument 23 vec_ptype2.double <- function(x, y, ..., x_arg = "", y_arg = "") { argument 44 vec_ptype2.raw <- function(x, y, ..., x_arg = "", y_arg = "") { argument 51 vec_ptype2.list <- function(x, y, ..., x_arg = "", y_arg = "") { argument 182 out <- shape_broadcast(out, to, x_arg = x_arg, to_arg = to_arg) 184 maybe_lossy_cast(out, x, to, lossy, x_arg = x_arg, to_arg = to_arg) 190 out <- shape_broadcast(out, to, x_arg = x_arg, to_arg = to_arg) 192 maybe_lossy_cast(out, x, to, lossy, x_arg = x_arg, to_arg = to_arg) 219 out <- shape_broadcast(out, to, x_arg = x_arg, to_arg = to_arg) [all …]
|
H A D | type2.R | 73 return(vec_ptype2_asis_left(x, y, x_arg = x_arg, y_arg = y_arg)) 76 return(vec_ptype2_asis_right(x, y, x_arg = x_arg, y_arg = y_arg)) 97 return(vec_ptype(x, x_arg = x_arg)) 116 x_arg = x_arg, 214 x_arg = "", argument 223 x_arg = "", argument 229 vec_ptype2_opts(x, y, opts = opts, x_arg = x_arg, y_arg = y_arg) 237 vec_ptype2_opts(x, y, ..., , opts = opts, x_arg = x_arg, y_arg = y_arg) 283 x_arg = "", argument 294 x_arg, [all …]
|
H A D | cast.R | 65 vec_cast <- function(x, to, ..., x_arg = "", to_arg = "") { argument 69 return(.Call(vctrs_cast, x, to, x_arg, to_arg)) 72 vec_cast_dispatch <- function(x, to, ..., x_arg = "", to_arg = "") { argument 79 vec_cast_dispatch_native <- function(x, to, ..., x_arg = "", to_arg = "") { argument 81 .Call(vctrs_cast_dispatch_native, x, to, fallback_opts, x_arg, to_arg) 111 vec_default_cast <- function(x, to, ..., x_arg = "", to_arg = "") { argument 113 return(vec_cast_from_asis(x, to, x_arg = x_arg, to_arg = to_arg)) 116 return(vec_cast_to_asis(x, to, x_arg = x_arg, to_arg = to_arg)) 120 return(vctr_cast(x, to, x_arg = x_arg, to_arg = to_arg)) 145 x_arg = x_arg, [all …]
|
H A D | conditions.R | 102 x_arg, 112 x_arg = x_arg, 135 x_arg = x_arg, 181 x_arg <- arg_as_string(x_arg) 299 x_arg = x_arg, 321 x_arg <- arg_as_string(cnd$x_arg) functionVar 411 x_arg = x_arg, 437 x_arg = x_arg, 488 x_arg = x_arg, 525 x_arg = x_arg, [all …]
|
H A D | type-factor.R | 121 vec_ptype2.ordered.factor <- function(x, y, ..., x_arg = "", y_arg = "") { argument 122 stop_incompatible_type(x, y, x_arg = x_arg, y_arg = y_arg) 125 vec_ptype2.factor.ordered <- function(x, y, ..., x_arg = "", y_arg = "") { argument 126 stop_incompatible_type(x, y, x_arg = x_arg, y_arg = y_arg) 140 fct_cast <- function(x, to, ..., x_arg = "", to_arg = "") { argument 141 fct_cast_impl(x, to, ..., x_arg = x_arg, to_arg = to_arg, ordered = FALSE) 144 fct_cast_impl <- function(x, to, ..., x_arg = "", to_arg = "", ordered = FALSE) { argument 163 x_arg = x_arg, 190 ord_cast <- function(x, to, ..., x_arg = "", to_arg = "") { argument 191 fct_cast_impl(x, to, ..., x_arg = x_arg, to_arg = to_arg, ordered = TRUE)
|
H A D | type-misc.R | 49 vec_cast.omit.integer <- function(x, to, ..., x_arg = "", to_arg = "") { argument 50 stop_incompatible_cast(x, to, x_arg = x_arg, to_arg = to_arg) 57 vec_cast.omit.double <- function(x, to, ..., x_arg = "", to_arg = "") { argument 58 stop_incompatible_cast(x, to, x_arg = x_arg, to_arg = to_arg) 103 vec_cast.exclude.integer <- function(x, to, ..., x_arg = "", to_arg = "") { argument 104 stop_incompatible_cast(x, to, x_arg = x_arg, to_arg = to_arg) 111 vec_cast.exclude.double <- function(x, to, ..., x_arg = "", to_arg = "") { argument 112 stop_incompatible_cast(x, to, x_arg = x_arg, to_arg = to_arg)
|
H A D | type-data-frame.R | 253 df_ptype2 <- function(x, y, ..., x_arg = "", y_arg = "") { argument 258 df_cast <- function(x, to, ..., x_arg = "", to_arg = "") { argument 262 df_ptype2_opts <- function(x, y, ..., opts, x_arg = "", y_arg = "") { argument 263 .Call(vctrs_df_ptype2_opts, x, y, opts = opts, x_arg, y_arg) 270 x_arg = "", argument 272 .Call(vctrs_df_cast_opts, x, to, opts, x_arg, to_arg) 277 x_arg = "", argument 285 df_cast_opts(x, to, opts = opts, x_arg = x_arg, to_arg = to_arg) 386 x_arg, y_arg, 458 df_cast(x, to, x_arg = x_arg, to_arg = to_arg) [all …]
|
H A D | cast-list.R | 17 vec_list_cast <- function(x, to, ..., x_arg = "", to_arg = "") { argument 33 vec_slice(out, i) <- vec_cast(val, to, x_arg = x_arg, to_arg = to_arg) 37 out <- shape_broadcast(out, to, x_arg = x_arg, to_arg = to_arg) 45 x_arg = x_arg,
|
H A D | shape.R | 10 vec_shaped_ptype <- function(ptype, x, y, ..., x_arg = "", y_arg = "") { argument 14 .Call(vctrs_shaped_ptype, ptype, x, y, x_arg, y_arg) 17 vec_shape2 <- function(x, y, ..., x_arg = "", y_arg = "") { argument 21 .Call(vctrs_shape2, x, y, x_arg, y_arg) 25 shape_broadcast <- function(x, to, ..., x_arg, to_arg) { argument 43 x_arg = x_arg, 56 x_arg = x_arg,
|
H A D | type-tibble.R | 3 tib_ptype2 <- function(x, y, ..., x_arg = "", y_arg = "") { argument 8 x_arg = x_arg, 14 tib_cast <- function(x, to, ..., x_arg = "", to_arg = "") { argument 19 x_arg = x_arg,
|
/dports/math/R-cran-wk/wk/R/ |
H A D | compat-vctrs.R | 98 vec_ptype2.wk_wkb.default <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 99 vctrs::vec_default_ptype2(x, y, x_arg = x_arg, y_arg = y_arg) # nocov 104 vec_ptype2.wk_wkb.wk_wkb <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 110 vec_ptype2.wk_wkb.wk_wkt <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 116 vec_ptype2.wk_wkb.wk_xy <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 122 vec_ptype2.wk_wkb.wk_xyz <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 128 vec_ptype2.wk_wkb.wk_xym <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 140 vec_ptype2.wk_wkb.wk_rct <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 146 vec_ptype2.wk_wkb.wk_crc <- function(x, y, ..., x_arg = "x", y_arg = "y") { argument 238 vctrs::vec_default_ptype2(x, y, x_arg = x_arg, y_arg = y_arg) # nocov [all …]
|
/dports/devel/R-cran-vctrs/vctrs/src/ |
H A D | type2.c | 17 SEXP x_arg, in vctrs_ptype2_opts() argument 19 struct vctrs_arg c_x_arg = vec_as_arg(x_arg); in vctrs_ptype2_opts() 33 struct vctrs_arg* x_arg = opts->x_arg; in vec_ptype2_opts_impl() local 56 stop_scalar_type(x, x_arg); in vec_ptype2_opts_impl() 77 mut_opts.x = PROTECT(vec_ptype(x, x_arg)); in vec_ptype2_opts_impl() 102 struct vctrs_arg* x_arg = opts->x_arg; in vec_ptype2_switch_native() local 165 .x_arg = other_arg, in vec_ptype2_from_unspecified() 216 SEXP x_arg, in vctrs_is_coercible() argument 218 struct vctrs_arg c_x_arg = vec_as_arg(x_arg); in vctrs_is_coercible() 230 struct vctrs_arg x_arg_ = vec_as_arg(x_arg); in vctrs_ptype2() [all …]
|
H A D | ptype2.h | 32 struct vctrs_arg* x_arg; member 48 struct vctrs_arg* x_arg, in vec_ptype2_params() argument 55 .x_arg = x_arg, in vec_ptype2_params() 67 struct vctrs_arg* x_arg, in vec_ptype2() argument 73 .x_arg = x_arg, in vec_ptype2() 85 struct vctrs_arg* x_arg, 95 SEXP x_arg_sym, SEXP x_arg,
|
H A D | cast.h | 9 struct vctrs_arg* x_arg; member 18 SEXP df_cast(SEXP x, SEXP to, struct vctrs_arg* x_arg, struct vctrs_arg* to_arg) { in df_cast() argument 22 .x_arg = x_arg, in df_cast() 33 struct vctrs_arg* x_arg, in vec_cast_params() argument 40 .x_arg = x_arg, in vec_cast_params() 60 struct vctrs_arg* x_arg, 74 SEXP x_arg,
|
H A D | cast-dispatch.c | 14 struct vctrs_arg* x_arg = opts->x_arg; in vec_cast_dispatch_native() local 26 return fct_as_character(x, x_arg); in vec_cast_dispatch_native() 33 return ord_as_character(x, x_arg); in vec_cast_dispatch_native() 37 return fct_as_factor(x, to, lossy, x_arg, to_arg); in vec_cast_dispatch_native() 91 SEXP x_arg, in vctrs_cast_dispatch_native() argument 93 struct vctrs_arg c_x_arg = vec_as_arg(x_arg); in vctrs_cast_dispatch_native() 102 return vec_cast_default(x, to, x_arg, to_arg, &c_opts.fallback); in vctrs_cast_dispatch_native()
|
H A D | type-tibble.c | 19 struct vctrs_arg x_arg = vec_as_arg(x_arg_); in vctrs_tib_ptype2() local 25 .x_arg = &x_arg, in vctrs_tib_ptype2() 43 SEXP vctrs_tib_cast(SEXP x, SEXP to, SEXP x_arg, SEXP to_arg) { in vctrs_tib_cast() argument 44 struct vctrs_arg c_x_arg = vec_as_arg(x_arg); in vctrs_tib_cast() 50 .x_arg = &c_x_arg, in vctrs_tib_cast()
|
/dports/devel/R-cran-vctrs/vctrs/tests/testthat/ |
H A D | test-conditions.R | 20 stop_incompatible_cast(1, 1, x_arg = "x", to_arg = "to"), 27 expect_error(stop_incompatible_type(1, 1, x_arg = "", y_arg = "", action = "c")) 28 expect_error(stop_incompatible_type(1, 1, x_arg = "", y_arg = "", action = 1)) 116 stop_incompatible_type(1, 2, message = "my message", x_arg = "x", y_arg = "y"), 149 expect_error(stop_incompatible_size(1:2, 3:5, 2L, 3L, x_arg = "", y_arg = "")) 171 stop_incompatible_type(1, 1, x_arg = "", y_arg = "", action = "conver") 172 stop_incompatible_type(1, 1, x_arg = "", y_arg = "", action = 1) 216 stop_incompatible_size(1:2, 3:5, 2L, 3L, x_arg = "", y_arg = "") 217 stop_incompatible_size(1:2, 3:5, 2L, 3L, x_arg = quote(foo), y_arg = "") 218 stop_incompatible_size(1:2, 3:5, 2L, 3L, x_arg = "", y_arg = "bar") [all …]
|
H A D | test-type2.R | 105 expect_args(new_hidden(), lgl(), x_arg = "foo", y_arg = "bar") 106 expect_args(lgl(), new_hidden(), x_arg = "foo", y_arg = "bar") 107 expect_args(int(), new_hidden(), x_arg = "foo", y_arg = "bar") 108 expect_args(dbl(), new_hidden(), x_arg = "foo", y_arg = "bar") 109 expect_args(chr(), new_hidden(), x_arg = "foo", y_arg = "bar") 110 expect_args(list(), new_hidden(), x_arg = "foo", y_arg = "bar") nameattr 113 expect_args(Sys.Date(), new_hidden(), x_arg = "foo", y_arg = "bar") 115 expect_args(factor(), new_hidden(), x_arg = "foo", y_arg = "bar") 117 expect_args(ordered(""), factor(), x_arg = "foo", y_arg = "bar") 325 vec_ptype2(quote(x), NULL, x_arg = "foo") [all …]
|
/dports/math/R-cran-haven/haven/R/ |
H A D | labelled_spss.R | 28 na_values <- vec_cast_named(na_values, x, x_arg = "na_values", to_arg = "x") 137 data_type <- vec_ptype2(vec_data(x), vec_data(y), ..., x_arg = x_arg, y_arg = y_arg) 140 x_labels <- vec_cast_named(attr(x, "labels"), data_type, x_arg = x_arg) 141 y_labels <- vec_cast_named(attr(y, "labels"), data_type, x_arg = y_arg) 147 x_na_values <- vec_cast(attr(x, "na_values"), data_type, x_arg = x_arg) 148 y_na_values <- vec_cast(attr(y, "na_values"), data_type, x_arg = y_arg) 186 out_data <- vec_cast(vec_data(x), vec_data(to), ..., x_arg = x_arg, to_arg = to_arg) 209 x_arg = x_arg, 219 x_arg = x_arg, 238 x_arg = x_arg, [all …]
|
H A D | labelled.R | 43 labels <- vec_cast_named(labels, x, x_arg = "labels", to_arg = "x") 232 vec_ptype2.haven_labelled.haven_labelled <- function(x, y, ..., x_arg = "", y_arg = "") { argument 233 data_type <- vec_ptype2(vec_data(x), vec_data(y), ..., x_arg = x_arg, y_arg = y_arg) 236 x_labels <- vec_cast_named(attr(x, "labels"), data_type, x_arg = x_arg) 237 y_labels <- vec_cast_named(attr(y, "labels"), data_type, x_arg = y_arg) 261 vec_cast.haven_labelled.haven_labelled <- function(x, to, ..., x_arg = "", to_arg = "") { argument 262 out_data <- vec_cast(vec_data(x), vec_data(to), ..., x_arg = x_arg, to_arg = to_arg) 277 x_arg = x_arg, 287 x_arg = x_arg, 289 details = paste0("Values are labelled in `", x_arg, "` but not in `", to_arg, "`.")
|
/dports/devel/R-cran-blob/blob/R/ |
H A D | coerce.R | 10 vec_ptype2.blob <- function(x, y, ..., x_arg = "", y_arg = "") UseMethod("vec_ptype2.blob", y) argument 14 vec_ptype2.blob.default <- function(x, y, ..., x_arg = "", y_arg = "") { argument 15 vec_default_ptype2(x, y, x_arg = x_arg, y_arg = y_arg) 26 vec_ptype2.blob.list <- function(x, y, ..., x_arg = "", y_arg = "") { argument 33 vec_ptype2.list.blob <- function(x, y, ..., x_arg = "", y_arg = "") { argument 34 check_raw_list(x, x_arg)
|
/dports/math/R-cran-units/units/R/ |
H A D | tidyverse.R | 44 vec_ptype2.units.units = function(x, y, ..., x_arg = "", y_arg = "") { argument 49 vctrs::stop_incompatible_type(x, y, x_arg = x_arg, y_arg = y_arg) 53 common = vctrs::vec_ptype2(x_bare, y_bare, ..., x_arg = x_arg, y_arg = y_arg) 59 vec_cast.units.units = function(x, to, ..., x_arg = "", to_arg = "") { argument 64 vctrs::stop_incompatible_cast(x, to, x_arg = x_arg, to_arg = to_arg) 72 out = vctrs::vec_cast(out_bare, to_bare, ..., x_arg = x_arg, to_arg = to_arg)
|
/dports/math/octave/octave-6.4.0/libinterp/corefcn/ |
H A D | besselj.cc | 117 octave_value x_arg = args(1); in do_bessel() local 119 if (alpha_arg.is_single_type () || x_arg.is_single_type ()) in do_bessel() 125 if (x_arg.is_scalar_type ()) in do_bessel() 127 FloatComplex x = x_arg.xfloat_complex_value ("%s: X must be a scalar or matrix", fn); in do_bessel() 165 = x_arg.xfloat_complex_column_vector_value ("%s: X must be a scalar or matrix", fn); in do_bessel() 180 if (x_arg.is_scalar_type ()) in do_bessel() 215 if (x_arg.is_scalar_type ()) in do_bessel() 217 Complex x = x_arg.xcomplex_value ("%s: X must be a scalar or matrix", fn); in do_bessel() 255 = x_arg.xcomplex_column_vector_value ("%s: X must be a scalar or matrix", fn); in do_bessel() 270 if (x_arg.is_scalar_type ()) in do_bessel() [all …]
|
/dports/shells/oksh/oksh-7.0/ |
H A D | emacs.c | 327 x_arg = -1; in x_emacs() 492 while (x_arg < col && isu8cont(xcp[-x_arg])) in x_del_back() 493 x_arg++; in x_del_back() 510 while (x_arg < nleft && isu8cont(xcp[x_arg])) in x_del_char() 511 x_arg++; in x_del_char() 733 while (x_arg < col && isu8cont(xcp[-x_arg])) in x_mv_back() 734 x_arg++; in x_mv_back() 750 while (x_arg < nleft && isu8cont(xcp[x_arg])) in x_mv_forw() 751 x_arg++; in x_mv_forw() 1180 while (x_arg < lastcol && isu8cont(xbuf[x_arg])) in x_kill() [all …]
|
/dports/www/py-flask-migrate/Flask-Migrate-3.1.0/src/flask_migrate/ |
H A D | __init__.py | 71 def get_config(self, directory=None, x_arg=None, opts=None): argument 82 if x_arg is not None: 84 if isinstance(x_arg, list) or isinstance(x_arg, tuple): 85 for x in x_arg: 88 config.cmd_opts.x.append(x_arg) 151 branch_label=None, version_path=None, rev_id=None, x_arg=None): argument 154 directory, opts=['autogenerate'], x_arg=x_arg) 181 def upgrade(directory=None, revision='head', sql=False, tag=None, x_arg=None): argument 184 x_arg=x_arg) 189 def downgrade(directory=None, revision='-1', sql=False, tag=None, x_arg=None): argument [all …]
|