Displaying 1 result from an estimated 1 matches for "callio".
Did you mean:
callid
2002 May 15
0
language: bug or feature: vector-subscript of list (PR#1558)
....., value) {
i_ c( ...)
if( length( i)<2)
return( .Primitive( '[[<-')( var, i, value))
pa_ .Primitive( '[[<-')
pg_ .Primitive( '[[')
vario_ as.name( 'var')
for( ii in i[ -length(i)])
vario_ call( 'pg', vario, ii)
# print( vario)
callio_ substitute( value, envir=parent.frame())
for( ii in rev( i)) {
callio_ call( 'pa', vario, ii, callio)
if( length( vario)>1)
vario_ vario[[ 2]]
}
# print( callio)
return( eval( callio))
})
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-....