(v1.7.1.9064) eucast 3.3 for mdro(), major change to repeated calling

R/vctrs.R

@@ -28,6 +28,18 @@
 # They are to convert AMR-specific classes to bare characters and integers.
 # All of them will be exported using s3_register() in R/zzz.R when loading the package.
 
+# S3: ab_selector
+# see https://github.com/tidyverse/dplyr/issues/5955 why this is required
+vec_ptype2.character.ab_selector <- function(x, y, ...) {
+  x
+}
+vec_ptype2.ab_selector.character <- function(x, y, ...) {
+  y
+}
+vec_cast.character.ab_selector <- function(x, to, ...) {
+  unclass(x)
+}
+
 # S3: ab
 vec_ptype2.character.ab <- function(x, y, ...) {
   x
@@ -60,15 +72,3 @@ vec_ptype2.disk.integer <- function(x, y, ...) {
 vec_cast.integer.disk <- function(x, to, ...) {
   unclass(x)
 }
-
-# S3: ab_selector
-# see https://github.com/tidyverse/dplyr/issues/5955 why this is required
-vec_ptype2.character.ab_selector <- function(x, y, ...) {
-  x
-}
-vec_ptype2.ab_selector.character <- function(x, y, ...) {
-  y
-}
-vec_cast.character.ab_selector <- function(x, to, ...) {
-  unclass(x)
-}