hb@maths.lth.se
2002-Oct-13 23:34 UTC
The class attribute on an environment seems buggy (PR#2159)
Full_Name: Henrik Bengtsson Version: 1.6.0, 1.5.1 OS: WinXP Pro Submission from: (NULL) (128.250.252.82) The following example, which I tested on both R v1.5.1 and R v1.6.0 on WinXP Pro, shows the problem I encountered when trying to use the class attribute of an environment: # Define method print() for class Environment C print(e) # gives: # [1] "An Environment!" # Exit [R] q(save="yes") When restarting [R] and loading the previous workspace something goes wrong(?): % R print(e) # gives: # <environment: 01BE52F4> # attr(,"class") # [1] "Environment" print(class(e)) # gives: # [1] "Environment" print(unclass(e)) # gives: # <environment: 01BE52F4> # attr(,"class") # [1] "Environment" str(e) # gives because of the malfunctioning unclass(): # Class 'Environment' Class 'Environment' Class 'Environment' Class 'Environment' # Class 'Environment' Class 'Environment' Class 'Environment' Class 'Environment' # Class 'Environment' Class 'Environment' Class 'Environment' ... Note how unclass(e) does not work properly. More importantly, it the S3/UseMethod() method dispatching get confused and won't recognize the class attribute. Cheers Henrik Bengtsson Home: 201/445 Royale Parade, Parkville Office: Bioinformatics, WEHI, Parkville +61 (0)412 269 734 (cell), +61 (0)3 9387 791 (home), +61 (0)3 9345 2324 +(lab) hb@maths.lth.se, http://www.maths.lth.se/~hb/ Time zone: +10h UTC (Sweden +2h UTC, Calif. -7h UTC) -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html Send "info", "help", or "[un]subscribe" (in the "body", not the subject !) To: r-devel-request@stat.math.ethz.ch _._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._
John Chambers
2002-Oct-14 12:59 UTC
The class attribute on an environment seems buggy (PR#2159)
Any attribute of environments, not just the class, can be killed by operating on the object "locally" in a function. Example: R> f <- function(x){ y <- x; attr(y, "foo") <- NULL; y} R> ev <- new.env() R> attr(ev, "foo") <- "bar" R> ev <environment: 0x8b515d4> attr(,"foo") [1] "bar" R> f(ev) <environment: 0x8b515d4> R> ev <environment: 0x8b515d4> The reason is that the C routine `duplicate' does not duplicate an environment OR its attributes. I was bitten by this trying to use environments as reference objects in the Omegahat OOP package. Would there be a problem with a "fix" in which the environment was left unduplicated, but environments with attributes are "duplicated" by creating a copy of the attribute list, but with the copy still pointing to the same environment? If that is not possible, it would be good to have another datatype that had roughly those properties. Otherwise, it's difficult to build on this datatype in designing new classes. (The same issue applies to other types, such as external pointers.) hb@maths.lth.se wrote:> > Full_Name: Henrik Bengtsson > Version: 1.6.0, 1.5.1 > OS: WinXP Pro > Submission from: (NULL) (128.250.252.82) > > The following example, which I tested on both R v1.5.1 and R v1.6.0 on WinXP > Pro, shows the problem I encountered when trying to use the class attribute of > an environment: > > # Define method print() for class Environment > C > > print(e) > # gives: > # [1] "An Environment!" > > # Exit [R] > q(save="yes") > > When restarting [R] and loading the previous workspace something goes wrong(?): > % R > > print(e) > # gives: > # <environment: 01BE52F4> > # attr(,"class") > # [1] "Environment" > > print(class(e)) > # gives: > # [1] "Environment" > > print(unclass(e)) > # gives: > # <environment: 01BE52F4> > # attr(,"class") > # [1] "Environment" > > str(e) > # gives because of the malfunctioning unclass(): > # Class 'Environment' Class 'Environment' Class 'Environment' Class > 'Environment' > # Class 'Environment' Class 'Environment' Class 'Environment' Class > 'Environment' > # Class 'Environment' Class 'Environment' Class 'Environment' ... > > Note how unclass(e) does not work properly. More importantly, it the > S3/UseMethod() method dispatching get confused and won't recognize the class > attribute. > > Cheers > > Henrik Bengtsson > > Home: 201/445 Royale Parade, Parkville > Office: Bioinformatics, WEHI, Parkville > +61 (0)412 269 734 (cell), +61 (0)3 9387 791 (home), +61 (0)3 9345 2324 +(lab) > hb@maths.lth.se, http://www.maths.lth.se/~hb/ > Time zone: +10h UTC (Sweden +2h UTC, Calif. -7h UTC) > > -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- > r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html > Send "info", "help", or "[un]subscribe" > (in the "body", not the subject !) To: r-devel-request@stat.math.ethz.ch > _._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._-- John M. Chambers jmc@bell-labs.com Bell Labs, Lucent Technologies office: (908)582-2681 700 Mountain Avenue, Room 2C-282 fax: (908)582-3340 Murray Hill, NJ 07974 web: http://www.cs.bell-labs.com/~jmc -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html Send "info", "help", or "[un]subscribe" (in the "body", not the subject !) To: r-devel-request@stat.math.ethz.ch _._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._