Hello Przemek
Here are the logs:
03/17/09 16:36:34 Windows XP 5.1.2600 Service Pack 2
Harbour 1.1.0dev (Rev. 10633) Borland C++ 5.5.1 (32-bit)
THREADS: 0
N_LOOPS: 1000000
[ T000: empty loop overhead ]...................................0.05
====================================================================
[ T001: x := L_C ]..............................................0.06
[ T002: x := L_N ]..............................................0.05
[ T003: x := L_D ]..............................................0.05
[ T004: x := S_C ]..............................................0.08
[ T005: x := S_N ]..............................................0.08
[ T006: x := S_D ]..............................................0.06
[ T007: x := M->M_C ]...........................................0.08
[ T008: x := M->M_N ]...........................................0.09
[ T009: x := M->M_D ]...........................................0.08
[ T010: x := M->P_C ]...........................................0.08
[ T011: x := M->P_N ]...........................................0.08
[ T012: x := M->P_D ]...........................................0.08
[ T013: x := F_C ]..............................................0.17
[ T014: x := F_N ]..............................................0.27
[ T015: x := F_D ]..............................................0.14
[ T016: x := o:Args ]...........................................0.22
[ T017: x := o[2] ].............................................0.16
[ T018: round( i / 1000, 2 ) ]..................................0.30
[ T019: str( i / 1000 ) ].......................................0.91
[ T020: val( s ) ]..............................................0.31
[ T021: val( a [ i % 16 + 1 ] ) ]...............................0.56
[ T022: dtos( d - i % 10000 ) ].................................0.53
[ T023: eval( { || i % 16 } ) ].................................0.52
[ T024: eval( bc := { || i % 16 } ) ]...........................0.30
[ T025: eval( { |x| x % 16 }, i ) ].............................0.42
[ T026: eval( bc := { |x| x % 16 }, i ) ].......................0.33
[ T027: eval( { |x| f1( x ) }, i ) ]............................0.50
[ T028: eval( bc := { |x| f1( x ) }, i ) ]......................0.44
[ T029: eval( bc := &("{ |x| f1( x ) }"), i ) ].................0.42
[ T030: x := &( "f1(" + str(i) + ")" ) ]........................3.42
[ T031: bc := &( "{|x|f1(x)}" ), eval( bc, i ) ]................4.38
[ T032: x := valtype( x ) + valtype( i ) ].....................0.48
[ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........1.00
[ T034: x := a[ i % 16 + 1 ] == s ].............................0.41
[ T035: x := a[ i % 16 + 1 ] = s ]..............................0.44
[ T036: x := a[ i % 16 + 1 ] >= s ].............................0.44
[ T037: x := a[ i % 16 + 1 ] <= s ].............................0.44
[ T038: x := a[ i % 16 + 1 ] < s ]..............................0.45
[ T039: x := a[ i % 16 + 1 ] > s ]..............................0.44
[ T040: ascan( a, i % 16 ) ]....................................0.41
[ T041: ascan( a, { |x| x == i % 16 } ) ].......................3.63
[ T042: iif( i%1000==0, a:={}, ) , aadd(a,{i,1,.T.,s,s2,a2 ]....1.06
[ T043: x := a ]................................................0.06
[ T044: x := {} ]...............................................0.16
[ T045: f0() ]..................................................0.09
[ T046: f1( i ) ]...............................................0.19
[ T047: f2( c[1...8] ) ]........................................0.17
[ T048: f2( c[1...40000] ) ]....................................0.14
[ T049: f2( @c[1...40000] ) ]...................................0.16
[ T050: f2( @c[1...40000] ), c2 := c ]..........................0.17
[ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.58
[ T052: f2( a ) ]...............................................0.16
[ T053: x := f4() ].............................................0.91
[ T054: x := f5() ].............................................0.28
[ T055: x := space(16) ]........................................0.23
[ T056: f_prv( c ) ]............................................0.44
====================================================================
[ total application time: ]....................................30.70
[ total real time: ]...........................................30.78
03/17/09 16:33:46 Windows XP 5.1.2600 Service Pack 2
Harbour 1.1.0dev (Rev. 10633) (MT) Borland C++ 5.5.1 (32-bit)
THREADS: 0
N_LOOPS: 1000000
[ T000: empty loop overhead ]...................................0.06
====================================================================
[ T001: x := L_C ]..............................................0.09
[ T002: x := L_N ]..............................................0.03
[ T003: x := L_D ]..............................................0.06
[ T004: x := S_C ]..............................................0.14
[ T005: x := S_N ]..............................................0.06
[ T006: x := S_D ]..............................................0.06
[ T007: x := M->M_C ]...........................................0.16
[ T008: x := M->M_N ]...........................................0.09
[ T009: x := M->M_D ]...........................................0.08
[ T010: x := M->P_C ]...........................................0.14
[ T011: x := M->P_N ]...........................................0.08
[ T012: x := M->P_D ]...........................................0.08
[ T013: x := F_C ]..............................................0.34
[ T014: x := F_N ]..............................................0.27
[ T015: x := F_D ]..............................................0.14
[ T016: x := o:Args ]...........................................0.31
[ T017: x := o[2] ].............................................0.20
[ T018: round( i / 1000, 2 ) ]..................................0.38
[ T019: str( i / 1000 ) ].......................................1.17
[ T020: val( s ) ]..............................................0.44
[ T021: val( a [ i % 16 + 1 ] ) ]...............................0.75
[ T022: dtos( d - i % 10000 ) ].................................0.80
[ T023: eval( { || i % 16 } ) ].................................0.94
[ T024: eval( bc := { || i % 16 } ) ]...........................0.39
[ T025: eval( { |x| x % 16 }, i ) ].............................0.70
[ T026: eval( bc := { |x| x % 16 }, i ) ].......................0.41
[ T027: eval( { |x| f1( x ) }, i ) ]............................0.84
[ T028: eval( bc := { |x| f1( x ) }, i ) ]......................0.56
[ T029: eval( bc := &("{ |x| f1( x ) }"), i ) ].................0.56
[ T030: x := &( "f1(" + str(i) + ")" ) ]........................5.42
[ T031: bc := &( "{|x|f1(x)}" ), eval( bc, i ) ]................6.56
[ T032: x := valtype( x ) + valtype( i ) ].....................0.83
[ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........1.33
[ T034: x := a[ i % 16 + 1 ] == s ].............................0.56
[ T035: x := a[ i % 16 + 1 ] = s ]..............................0.61
[ T036: x := a[ i % 16 + 1 ] >= s ].............................0.61
[ T037: x := a[ i % 16 + 1 ] <= s ].............................0.61
[ T038: x := a[ i % 16 + 1 ] < s ]..............................0.61
[ T039: x := a[ i % 16 + 1 ] > s ]..............................0.61
[ T040: ascan( a, i % 16 ) ]....................................0.59
[ T041: ascan( a, { |x| x == i % 16 } ) ].......................5.72
[ T042: iif( i%1000==0, a:={}, ) , aadd(a,{i,1,.T.,s,s2,a2 ]....1.80
[ T043: x := a ]................................................0.11
[ T044: x := {} ]...............................................0.36
[ T045: f0() ]..................................................0.13
[ T046: f1( i ) ]...............................................0.20
[ T047: f2( c[1...8] ) ]........................................0.25
[ T048: f2( c[1...40000] ) ]....................................0.23
[ T049: f2( @c[1...40000] ) ]...................................0.25
[ T050: f2( @c[1...40000] ), c2 := c ]..........................0.27
[ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.84
[ T052: f2( a ) ]...............................................0.23
[ T053: x := f4() ].............................................1.19
[ T054: x := f5() ].............................................0.67
[ T055: x := space(16) ]........................................0.45
[ T056: f_prv( c ) ]............................................1.02
====================================================================
[ total application time: ]....................................45.86
[ total real time: ]...........................................46.16
03/17/09 16:44:28 Windows XP 5.1.2600 Service Pack 2
Harbour 1.1.0dev (Rev. 10633) (MT)+ Borland C++ 5.5.1 (32-bit)
THREADS: 2
N_LOOPS: 1000000
[ T000: empty loop overhead ]...................................0.13
====================================================================
[ T001: x := L_C ]..............................................0.39
[ T002: x := L_N ]..............................................0.27
[ T003: x := L_D ]..............................................0.09
[ T004: x := S_C ]..............................................0.25
[ T005: x := S_N ]..............................................0.13
[ T006: x := S_D ]..............................................0.13
[ T007: x := M->M_C ]...........................................0.28
[ T008: x := M->M_N ]...........................................0.16
[ T009: x := M->M_D ]...........................................0.19
[ T010: x := M->P_C ]...........................................0.31
[ T011: x := M->P_N ]...........................................0.16
[ T012: x := M->P_D ]...........................................0.16
[ T013: x := F_C ]..............................................0.69
[ T014: x := F_N ]..............................................0.56
[ T015: x := F_D ]..............................................0.31
[ T016: x := o:Args ]...........................................0.59
[ T017: x := o[2] ].............................................0.44
[ T018: round( i / 1000, 2 ) ]..................................0.72
[ T019: str( i / 1000 ) ].......................................2.17
[ T020: val( s ) ]..............................................0.81
[ T021: val( a [ i % 16 + 1 ] ) ]...............................1.42
[ T022: dtos( d - i % 10000 ) ].................................2.34
[ T023: eval( { || i % 16 } ) ].................................2.95
[ T024: eval( bc := { || i % 16 } ) ]...........................1.28
[ T025: eval( { |x| x % 16 }, i ) ].............................1.61
[ T026: eval( bc := { |x| x % 16 }, i ) ].......................1.44
[ T027: eval( { |x| f1( x ) }, i ) ]............................1.89
[ T028: eval( bc := { |x| f1( x ) }, i ) ]......................1.50
[ T029: eval( bc := &("{ |x| f1( x ) }"), i ) ].................1.20
[ T030: x := &( "f1(" + str(i) + ")" ) ].......................29.48
[ T031: bc := &( "{|x|f1(x)}" ), eval( bc, i ) ]...............34.52
[ T032: x := valtype( x ) + valtype( i ) ].....................3.23
[ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........4.00
[ T034: x := a[ i % 16 + 1 ] == s ].............................1.30
[ T035: x := a[ i % 16 + 1 ] = s ]..............................1.25
[ T036: x := a[ i % 16 + 1 ] >= s ].............................1.22
[ T037: x := a[ i % 16 + 1 ] <= s ].............................1.22
[ T038: x := a[ i % 16 + 1 ] < s ]..............................1.25
[ T039: x := a[ i % 16 + 1 ] > s ]..............................1.22
[ T040: ascan( a, i % 16 ) ]....................................1.16
[ T041: ascan( a, { |x| x == i % 16 } ) ]......................12.95
[ T042: iif( i%1000==0, a:={}, ) , aadd(a,{i,1,.T.,s,s2,a2 ]....4.91
[ T043: x := a ]................................................0.22
[ T044: x := {} ]...............................................1.33
[ T045: f0() ]..................................................0.28
[ T046: f1( i ) ]...............................................0.39
[ T047: f2( c[1...8] ) ]........................................0.48
[ T048: f2( c[1...40000] ) ]....................................0.50
[ T049: f2( @c[1...40000] ) ]...................................0.50
[ T050: f2( @c[1...40000] ), c2 := c ]..........................0.53
[ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................1.80
[ T052: f2( a ) ]...............................................0.56
[ T053: x := f4() ].............................................2.98
[ T054: x := f5() ].............................................1.89
[ T055: x := space(16) ]........................................2.23
[ T056: f_prv( c ) ]............................................2.08
====================================================================
[ total application time: ]....................................72.86
[ total real time: ]...........................................37.30
03/17/2009 16:15:40 Windows XP 05.01 Build 02600 Service Pack 2
Xbase++ (R) Version 1.90 (MT)
THREADS: 0
N_LOOPS: 1000000
[ T000: empty loop overhead ]...................................0.03
====================================================================
[ T001: x := L_C ]..............................................0.07
[ T002: x := L_N ]..............................................0.03
[ T003: x := L_D ]..............................................0.00
[ T004: x := S_C ]..............................................0.05
[ T005: x := S_N ]..............................................0.03
[ T006: x := S_D ]..............................................0.04
[ T007: x := M->M_C ]...........................................0.14
[ T008: x := M->M_N ]...........................................0.09
[ T009: x := M->M_D ]...........................................0.10
[ T010: x := M->P_C ]...........................................0.14
[ T011: x := M->P_N ]...........................................0.11
[ T012: x := M->P_D ]...........................................0.11
[ T013: x := F_C ]..............................................0.20
[ T014: x := F_N ]..............................................0.18
[ T015: x := F_D ]..............................................0.17
[ T016: x := o:Args ]...........................................0.13
[ T017: x := o[2] ].............................................0.03
[ T018: round( i / 1000, 2 ) ]..................................0.42
[ T019: str( i / 1000 ) ].......................................2.04
[ T020: val( s ) ]..............................................0.26
[ T021: val( a [ i % 16 + 1 ] ) ]...............................0.39
[ T022: dtos( d - i % 10000 ) ].................................0.49
[ T023: eval( { || i % 16 } ) ].................................0.89
[ T024: eval( bc := { || i % 16 } ) ]...........................0.60
[ T025: eval( { |x| x % 16 }, i ) ].............................0.42
[ T026: eval( bc := { |x| x % 16 }, i ) ].......................0.34
[ T027: eval( { |x| f1( x ) }, i ) ]............................0.51
[ T028: eval( bc := { |x| f1( x ) }, i ) ]......................0.43
[ T029: eval( bc := &("{ |x| f1( x ) }"), i ) ].................0.68
[ T030: x := &( 'f1(' + str(i) + ')' ) ]........................9.77
[ T031: bc := &( '{|x|f1(x)}' ), eval( bc, i ) ]...............13.55
[ T032: x := valtype( x ) + valtype( i ) ].....................0.27
[ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........2.14
[ T034: x := a[ i % 16 + 1 ] == s ].............................0.22
[ T035: x := a[ i % 16 + 1 ] = s ]..............................0.31
[ T036: x := a[ i % 16 + 1 ] >= s ].............................0.31
[ T037: x := a[ i % 16 + 1 ] <= s ].............................0.32
[ T038: x := a[ i % 16 + 1 ] < s ]..............................0.33
[ T039: x := a[ i % 16 + 1 ] > s ]..............................0.31
[ T040: ascan( a, i % 16 ) ]....................................0.67
[ T041: ascan( a, { |x| x == i % 16 } ) ].......................4.29
[ T042: iif( i%1000==0, a:={}, ), aadd(a,{i,1,.t.,s,s2,a2, ]....6.34
[ T043: x := a ]................................................0.00
[ T044: x := {} ]...............................................0.22
[ T045: f0() ]..................................................0.08
[ T046: f1( i ) ]...............................................0.16
[ T047: f2( c[1...8] ) ]........................................0.19
[ T048: f2( c[1...40000] ) ]....................................0.11
[ T049: f2( @c[1...40000] ) ]...................................0.11
[ T050: f2( @c[1...40000] ), c2 := c ]..........................0.14
[ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.24
[ T052: f2( a ) ]...............................................0.09
[ T053: x := f4() ].............................................0.71
[ T054: x := f5() ].............................................0.30
[ T055: x := space(16) ]........................................0.20
[ T056: f_prv( c ) ]............................................0.44
====================================================================
[ total application time: ]....................................52.60
[ total real time: ]...........................................52.60
Harbour -DHB_FM_STATISTICS_OFF
speedtst.exe hbmk2.exe speedtst -gc3 | -mt -gc3
Processor Intel Core 2 Duo
Regards
Pritpal Bedi
--
View this message in context:
http://www.nabble.com/SF.net-SVN%3A-harbour-project%3A-10630--trunk-harbour-tp22561423p22570234.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
