1. Re: subscripts (Long Post)
Lewis,
Since you are unlikely to draw real blood from that particular stone,
try the folowing function, if you have to do it your way:
function fetch(object a, sequence b)
integer i,len
i = 1
len = length(b)
while i <= len do
a = a[b[i]]
i += 1
end while
return a
end function
Or, if you prefer a recursive variant:
function rfetch(object a, sequence b)
integer len
len = length(b)
if len>1 then
return rfetch(a[b[1]],b[2..length(b)])
else
return a[b[1]]
end if
end function
Btw, I have a strong feeling, the recursive beast can be improved, but
because the first function is always going to be slightly faster
anyway, I do not worry too much about it. jiri
