remove na placeholder values

Author: cdueben

DESCRIPTION

@@ -12,7 +12,7 @@ License: MIT + file LICENSE
 Imports: base (>= 4.0.0), methods, Rcpp
 LinkingTo: Rcpp
 SystemRequirements: C++20
-RoxygenNote: 7.3.2
+RoxygenNote: 7.3.3
 Collate: 
     'RcppExports.R'
     'utils.R'

R/print.R

@@ -34,16 +34,16 @@ process_print_ellipsis_ordered <- function(x, e, index) {
     use_from <- FALSE
     use_to <- FALSE
     if(index) {
-      from <- to <- NA_integer_
+      from <- to <- 0L
     } else {
       from <- to <- assign_na(get_type(x))
     }
   } else {
-    n <- NA_integer_
+    n <- 0L
     if(is.null(from)) {
       use_from <- FALSE
       if(index) {
-        from <- NA_integer_
+        from <- 0L
       } else {
         from <- assign_na(get_type(x))
       }
@@ -55,7 +55,7 @@ process_print_ellipsis_ordered <- function(x, e, index) {
     if(is.null(to)) {
       use_to <- FALSE
       if(index) {
-        to <- NA_integer_
+        to <- 0L
       } else {
         to <- assign_na(get_type(x))
       }

R/to_r.R

@@ -83,16 +83,16 @@ process_to_r_args_ordered <- function(x, n, from, to, index) {
     use_from <- FALSE
     use_to <- FALSE
     if(index) {
-      from <- to <- NA_integer_
+      from <- to <- 0L
     } else {
       from <- to <- assign_na(get_type(x))
     }
   } else {
-    n <- NA_integer_
+    n <- 0L
     if(is.null(from)) {
       use_from <- FALSE
       if(index) {
-        from <- NA_integer_
+        from <- 0L
       } else {
         from <- assign_na(get_type(x))
       }
@@ -104,7 +104,7 @@ process_to_r_args_ordered <- function(x, n, from, to, index) {
     if(is.null(to)) {
       use_to <- FALSE
       if(index) {
-        to <- NA_integer_
+        to <- 0L
       } else {
         to <- assign_na(get_type(x))
       }

R/utils.R

@@ -38,10 +38,10 @@ check_type <- function(x_type, i, index) {
 
 assign_na <- function(x_type) {
   return(switch(x_type,
-    integer = NA_integer_,
-    double = NA_real_,
-    string = NA_character_,
-    boolean = NA
+    integer = 0L,
+    double = 0,
+    string = "",
+    boolean = FALSE
   ))
 }