DIMENSION m.sqrt[1],m.int(1) ? m.sqrt[1],m.int(1),m.sqrt(1),m.int[1] ? sqrt[1],int(1),sqrt(1),int[1]It is useful only for implement a cache table function on an parametric code program, where a function can, at runtime, be replaced from an computed Array ( if func calc time is long ... ).
CLEAR ? calcFunc[5],calcFunc(5) DIMENSION calcFunc(10) * VFP search on var list, and after on procedure list FOR k=1 TO 10 m.calcFunc(m.k)=calcFunc(m.k) NEXT ? calcFunc[5],calcFunc(5) RELEASE calcFunc DIMENSION dummy(10) FOR k=1 TO 10 dummy(m.k)=calcFunc(m.k) NEXT DIMENSION calcFunc(10) ACOPY(dummy,calcFunc) * now VFP ignore function ? calcFunc[5],calcFunc(5) FUNCTION calcFunc(p1) ?? 'X' RETURN p1%20 ENDFUNCbut this is a very crypt code.