Displaying 1 result from an estimated 1 matches for "deref2".
Did you mean:
deref
2004 Jun 18
0
interpreter change from RW1.7 to RW1.8 reviewed at RW1.9
...)
system.time(
for(i in 1:nloop)
eval(substitute(m[1,1] <- i, list(i=i)), rm$loc)
)
# I also tried whether having deref use the the new 1.9.0 operators for
environments helps,
# but it doesn't
# under R 1.9 (8.84 seconds)
system.time(
for(i in 1:nloop)
deref2(rm)[1,1] <- i
)
# Again, coding with this 1.9.0 feature explicitely gives the real speed
# under R 1.9 (0.03 seconds)
system.time(
for(i in 1:nloop)
rm$loc[["m"]][1,1] <- i
)
# Function definitions
"deref2<-" <-
function(ref, value)
{...