It seems that Clipper use a cloned copy of the original array to do the loop,
and supply these orininal values to the codeblock. Bug or a feature?
---tt44.prg---
Proc Test
? "a10.b 9.c 8.d 7.e 6.f 5.g 4.h 3.i 2.j 1. 0 - Clipper"
? "a10.b 9.c 8.d 7.e 6. 5 - Harbour"
? TAEVSM()
RETURN
STATIC FUNCTION TAEVSM()
LOCAL cString := ""
LOCAL aArray := { 'a','b','c','d','e','f','g','h','i','j' }
AEval( aArray, {| x | cString += x + Str( Len( aArray ), 2 ) + ".", ASize(
aArray, Len( aArray ) - 1 ) } )
RETURN cString + Str( Len( aArray ) )
--------------
Chen.
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
