For non-portable objects, inherited methods have extra reference to .__active__

[wch]

In this example, there are two references to .__active__, but there should only be one.

library(R6)
A <- R6Class("A",
  portable = FALSE,
  public = list(
    getx = function() self$x,
    x = 1
  ),
  active = list(
    x2 = function() 2 * self$x
  )
)

B <- R6Class("B",
  portable = FALSE,
  inherit = A
)


b <- B$new()

library(pryr)
#> Registered S3 method overwritten by 'pryr':
#>   method      from
#>   print.bytes Rcpp

rls(b$getx)
#> [[1]]
#> [1] ".__active__"
#> 
#> [[2]]
#> [1] ".__active__"     ".__enclos_env__" "clone"           "getx"           
#> [5] "self"            "super"           "x"               "x2"             
#> 
#> [[3]]
#> [1] "A" "b" "B"

[wch]

Hm, now that I've experimented with this, I think it might be necessary.