Hey Walter,
Thanks for the results. Can you please post the original TXT file? The email
is scrambled here.
Patrick
On Fri, Mar 26, 2010 at 12:56 PM, Walter Negro <wne...@vstour.com> wrote:
>
> 03/24/10 11:09:52 Windows XP Professional 5.01.2600 Service Pack 2
> Processor: Intel Core(TM)2 Duo E6750 2.66GHz - Ram: 2Gb
> xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 6693) Microsoft Visual C++
> 14.00.50727 ?
> Harbour 2.1.0dev (Rev. 13840) Microsoft Visual C++ 14.0.50727 (32-bit) x86
> THREADS: 0 xHarb
> xHarb Harb Harb
> N_LOOPS: 1000000 malloc
> dlmalloc dlmalloc malloc
> [ T000: empty loop overhead
> ]...................................0.06.....0.06.........0.05.....0.05
>
> ===================================================================================================
> [ T001: x := L_C
>
> ]..............................................0.05.....0.05.........0.03.....0.03
> [ T002: x := L_N
>
> ]..............................................0.05.....0.06.........0.02.....0.00
> [ T003: x := L_D
>
> ]..............................................0.05.....0.06.........0.03.....0.02
> [ T004: x := S_C
>
> ]..............................................0.05.....0.03.........0.03.....0.02
> [ T005: x := S_N
>
> ]..............................................0.03.....0.05.........0.02.....0.02
> [ T006: x := S_D
>
> ]..............................................0.03.....0.02.........0.02.....0.03
> [ T007: x := M->M_C
>
> ]...........................................0.05.....0.05.........0.02.....0.03
> [ T008: x := M->M_N
>
> ]...........................................0.05.....0.06.........0.03.....0.02
> [ T009: x := M->M_D
>
> ]...........................................0.03.....0.05.........0.02.....0.03
> [ T010: x := M->P_C
>
> ]...........................................0.05.....0.05.........0.03.....0.03
> [ T011: x := M->P_N
>
> ]...........................................0.05.....0.05.........0.03.....0.03
> [ T012: x := M->P_D
>
> ]...........................................0.03.....0.05.........0.02.....0.02
> [ T013: x := F_C
>
> ]..............................................0.34.....0.13.........0.11.....0.20
> [ T014: x := F_N
>
> ]..............................................0.16.....0.19.........0.16.....0.14
> [ T015: x := F_D
>
> ]..............................................0.09.....0.11.........0.08.....0.08
> [ T016: x := o:Args
>
> ]...........................................0.25.....0.13.........0.11.....0.09
> [ T017: x := o[2]
>
> ].............................................0.06.....0.08.........0.08.....0.06
> [ T018: round( i / 1000, 2 )
> ]..................................0.39.....0.27.........0.17.....0.16
> [ T019: str( i / 1000 )
> ].......................................1.02.....0.69.........0.41.....0.50
> [ T020: val( s )
>
> ]..............................................0.38.....0.28.........0.19.....0.17
> [ T021: val( a [ i % 16 + 1 ] )
> ]...............................0.56.....0.42.........0.31.....0.34
> [ T022: dtos( d - i % 10000 )
> ].................................0.48.....0.38.........0.25.....0.38
> [ T023: eval( { || i % 16 } )
> ].................................0.64.....0.39.........0.25.....0.45
> [ T024: eval( bc := { || i % 16 } )
> ]...........................0.38.....0.23.........0.14.....0.14
> [ T025: eval( { |x| x % 16 }, i )
> ].............................0.53.....0.33.........0.22.....0.33
> [ T026: eval( bc := { |x| x % 16 }, i )
> ].......................0.38.....0.27.........0.17.....0.19
> [ T027: eval( { |x| f1( x ) }, i )
> ]............................0.83.....0.45.........0.27.....0.36
> [ T028: eval( bc := { |x| f1( x ) }, i )
> ]......................0.59.....0.41.........0.20.....0.20
> [ T029: eval( bc := &("{ |x| f1( x ) }"), i )
> ].................0.59.....0.41.........0.22.....0.22
> [ T030: x := &( "f1(" + str(i) + ")" )
> ]........................5.28.....4.23.........2.02.....2.69
> [ T031: bc := &( "{|x|f1(x)}" ), eval( bc, i )
> ]................5.58.....4.53.........2.38.....3.06
> [ T032: x := valtype( x ) + valtype( i )
> ].....................0.91.....0.45.........0.23.....0.34
> [ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ]
> ]..........1.03.....0.69.........0.53.....0.67
> [ T034: x := a[ i % 16 + 1 ] == s
> ].............................0.28.....0.28.........0.17.....0.20
> [ T035: x := a[ i % 16 + 1 ] = s
> ]..............................0.27.....0.27.........0.22.....0.23
> [ T036: x := a[ i % 16 + 1 ] >= s
> ].............................0.27.....0.25.........0.22.....0.23
> [ T037: x := a[ i % 16 + 1 ] <= s
> ].............................0.28.....0.27.........0.22.....0.20
> [ T038: x := a[ i % 16 + 1 ] < s
> ]..............................0.25.....0.22.........0.22.....0.23
> [ T039: x := a[ i % 16 + 1 ] > s
> ]..............................0.30.....0.25.........0.19.....0.23
> [ T040: ascan( a, i % 16 )
> ]....................................0.47.....0.34.........0.28.....0.22
> [ T041: ascan( a, { |x| x == i % 16 } )
> ].......................4.00.....2.91.........1.92.....2.27
> [ T042: iif( i%1000==0, a:={}, ) , aadd(a,{i,1,.T.,s,s2,a2
> ]....1.50.....0.81.........0.66.....1.23
> [ T043: x := a
>
> ]................................................0.03.....0.03.........0.03.....0.03
> [ T044: x := {}
>
> ]...............................................0.19.....0.11.........0.08.....0.16
> [ T045: f0()
>
> ]..................................................0.25.....0.14.........0.03.....0.06
> [ T046: f1( i )
>
> ]...............................................0.31.....0.19.........0.11.....0.08
> [ T047: f2( c[1...8] )
>
> ]........................................0.31.....0.19.........0.08.....0.09
> [ T048: f2( c[1...40000] )
> ]....................................0.31.....0.17.........0.08.....0.08
> [ T049: f2( @c[1...40000] )
> ]...................................0.28.....0.17.........0.08.....0.08
> [ T050: f2( @c[1...40000] ), c2 := c
> ]..........................0.34.....0.20.........0.13.....0.11
> [ T051: f3( a, a2, s, i, s2, bc, i, n, x )
> ]....................0.59.....0.48.........0.38.....0.36
> [ T052: f2( a )
>
> ]...............................................0.30.....0.17.........0.09.....0.08
> [ T053: x := f4()
>
> ].............................................1.39.....0.84.........0.59.....0.77
> [ T054: x := f5()
>
> ].............................................0.84.....0.44.........0.17.....0.30
> [ T055: x := space(16)
>
> ]........................................0.55.....0.23.........0.11.....0.20
> [ T056: f_prv( c )
>
> ]............................................1.03.....0.63.........0.27.....0.39
>
> ===================================================================================================
> [ total application time:
> ]....................................38.88....28.78........17.75....21.63
> [ total real time:
>
> ]...........................................39.31....29.14........18.00....21.92
>
> Walter Negro
>
>
>
> __________ Información de NOD32, revisión 4976 (20100326) __________
>
> Este mensaje ha sido analizado con NOD32 antivirus system
> http://www.nod32.com
>
>
>
> __________ Información de NOD32, revisión 4976 (20100326) __________
>
> Este mensaje ha sido analizado con NOD32 antivirus system
> http://www.nod32.com
>
>
>
>
>
>
>
> ------------------------------------------------------------------------------
> Download Intel® Parallel Studio Eval
> Try the new software tools for yourself. Speed compiling, find bugs
> proactively, and fine-tune applications for parallel performance.
> See why Intel Parallel Studio got high marks during beta.
> http://p.sf.net/sfu/intel-sw-dev
> _______________________________________________
> xHarbour-developers mailing list
> xHarbour-developers@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>
------------------------------------------------------------------------------
Download Intel® Parallel Studio Eval
Try the new software tools for yourself. Speed compiling, find bugs
proactively, and fine-tune applications for parallel performance.
See why Intel Parallel Studio got high marks during beta.
http://p.sf.net/sfu/intel-sw-dev
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers