Hi Chen,
I would guess it's intentional as this solution seems to
need some kind of additional logic to work like it does
in Clipper.
Brgds,
Viktor
On 2008.09.08., at 15:51, Chen Kedem wrote:
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
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
