Hi all, After no replies to my previous message I thought I might show some code to demonstrate the change and again seek any explanation for the error now thrown by my code after upgrading from 2.10.1 to 2.11.1.
Thanks Troy -------------------------------------------------------- setClass("PortableObject", representation(test1 = "character"), prototype( test1 = ""), contains = ".environment" ) setMethod("initialize", "PortableObject", function(.Object, ..., .xData=new.env(parent=emptyenv())) { .Object <- callNextMethod(.Object, ..., .xData=.xData) .obj...@test1 <- "Foo" # Following line works under 2.10.1 but now throws # Error: evaluation nested too deeply: infinite recursion / options(expressions=)? #####.Object[["test2"]] <- "Bar" # The following does what I want though .Object$test3 <- "Baa" return(.Object) } ) e <- new("PortableObject") alterEGo <- function(o = "EPOCObject") { o...@test1 <- "Boo" # Following line works under 2.10.1 but now throws # Error: evaluation nested too deeply: infinite recursion / options(expressions=)? ####o[["test2"]] <- "Who" # The following does what I want though o$test3 <- "Hoo" # NOTE: No return } alterEGo(e) e...@test1 e$test2 e[["test3"]] e...@.xdata[["test3"]] ___________________________________________________________________________ Australian Antarctic Division - Commonwealth of Australia IMPORTANT: This transmission is intended for the addressee only. If you are not the intended recipient, you are notified that use or dissemination of this communication is strictly prohibited by Commonwealth law. If you have received this transmission in error, please notify the sender immediately by e-mail or by telephoning +61 3 6232 3209 and DELETE the message. Visit our web site at http://www.antarctica.gov.au/ ___________________________________________________________________________ ______________________________________________ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel