1
2#' @rdname wk_handle
3#' @export
4wk_handle.wk_wkt <- function(handleable, handler, ...) {
5  handler <- as_wk_handler(handler)
6  wk_cpp_handle_wkt(handleable, handler, reveal_size = TRUE)
7}
8
9#' Test handlers for handling of unknown size vectors
10#'
11#' @inheritParams wk_handle
12#' @export
13#'
14#' @examples
15#' handle_wkt_without_vector_size(wkt(), wk_vector_meta_handler())
16#'
17handle_wkt_without_vector_size <- function(handleable, handler) {
18  handler <- as_wk_handler(handler)
19  wk_cpp_handle_wkt(handleable, handler, reveal_size = FALSE)
20}
21