2023-05-22 11:06:41 Windows 10 10.0 Harbour 3.2.0dev (r2305191429) MinGW GNU C 13.1 (64-bit) x86-64 THREADS: 0 N_LOOPS: 1000000 [ T000: empty loop overhead ]...................................0.02 ==================================================================== [ T001: x := L_C ]..............................................0.02 [ T002: x := L_N ]..............................................0.02 [ T003: x := L_D ]..............................................0.02 [ T004: x := S_C ]..............................................0.02 [ T005: x := S_N ]..............................................0.02 [ T006: x := S_D ]..............................................0.03 [ T007: x := M->M_C ]...........................................0.02 [ T008: x := M->M_N ]...........................................0.03 [ T009: x := M->M_D ]...........................................0.02 [ T010: x := M->P_C ]...........................................0.03 [ T011: x := M->P_N ]...........................................0.02 [ T012: x := M->P_D ]...........................................0.03 [ T013: x := F_C ]..............................................0.02 [ T014: x := F_N ]..............................................0.02 [ T015: x := F_D ]..............................................0.02 [ T016: x := o:Args ]...........................................0.05 [ T017: x := o[ 2 ] ]...........................................0.03 [ T018: Round( i / 1000, 2 ) ]..................................0.09 [ T019: Str( i / 1000 ) ].......................................0.28 [ T020: Val( s ) ]..............................................0.06 [ T021: Val( a [ i % 16 + 1 ] ) ]...............................0.11 [ T022: DToS( d - i % 10000 ) ].................................0.13 [ T023: Eval( {|| i % 16 } ) ]..................................0.16 [ T024: Eval( bc := {|| i % 16 } ) ]............................0.09 [ T025: Eval( {| x | x % 16 }, i ) ]............................0.11 [ T026: Eval( bc := {| x | x % 16 }, i ) ]......................0.06 [ T027: Eval( {| x | f1( x ) }, i ) ]...........................0.13 [ T028: Eval( bc := {| x | f1( x ) }, i ) ].....................0.11 [ T029: Eval( bc := &( "{| x | f1( x ) }" ), i ) ]..............0.08 [ T030: x := &( "f1(" + Str( i ) + ")" ) ]......................0.80 [ T031: bc := &( "{| x | f1( x ) }" ), Eval( bc, i ) ]..........0.88 [ T032: x := ValType( x ) + ValType( i ) ]......................0.11 [ T033: x := StrZero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........0.25 [ T034: x := a[ i % 16 + 1 ] == s ].............................0.09 [ T035: x := a[ i % 16 + 1 ] = s ]..............................0.09 [ T036: x := a[ i % 16 + 1 ] >= s ].............................0.09 [ T037: x := a[ i % 16 + 1 ] <= s ].............................0.09 [ T038: x := a[ i % 16 + 1 ] < s ]..............................0.09 [ T039: x := a[ i % 16 + 1 ] > s ]..............................0.09 [ T040: AScan( a, i % 16 ) ]....................................0.11 [ T041: AScan( a, {| x | x == i % 16 } ) ]......................0.94 [ T042: iif( i % 1000 == 0, a := {}, ), AAdd(a,{i,1,.T.,s, ]....0.30 [ T043: x := a ]................................................0.00 [ T044: x := {} ]...............................................0.03 [ T045: f0() ]..................................................0.02 [ T046: f1( i ) ]...............................................0.05 [ T047: f2( c[1...8] ) ]........................................0.03 [ T048: f2( c[1...40000] ) ]....................................0.02 [ T049: f2( @c[1...40000] ) ]...................................0.03 [ T050: f2( @c[1...40000] ), c2 := c ]..........................0.05 [ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.09 [ T052: f2( a ) ]...............................................0.03 [ T053: x := f4() ].............................................0.13 [ T054: x := f5() ].............................................0.08 [ T055: x := Space( 16 ) ]......................................0.06 [ T056: f_prv( c ) ]............................................0.09 ==================================================================== [ total application time: ].....................................7.33 [ total real time: ]............................................7.42 2023-05-22 12:22:53 Windows 10 10.0 Harbour 3.2.0dev (r2302030146) Microsoft Visual C++ 19.34.31937 (64-bit) x86-64 THREADS: 0 N_LOOPS: 1000000 [ T000: empty loop overhead ]...................................0.02 ==================================================================== [ T001: x := L_C ]..............................................0.00 [ T002: x := L_N ]..............................................0.02 [ T003: x := L_D ]..............................................0.02 [ T004: x := S_C ]..............................................0.02 [ T005: x := S_N ]..............................................0.02 [ T006: x := S_D ]..............................................0.02 [ T007: x := M->M_C ]...........................................0.02 [ T008: x := M->M_N ]...........................................0.02 [ T009: x := M->M_D ]...........................................0.02 [ T010: x := M->P_C ]...........................................0.02 [ T011: x := M->P_N ]...........................................0.02 [ T012: x := M->P_D ]...........................................0.02 [ T013: x := F_C ]..............................................0.02 [ T014: x := F_N ]..............................................0.02 [ T015: x := F_D ]..............................................0.02 [ T016: x := o:Args ]...........................................0.06 [ T017: x := o[ 2 ] ]...........................................0.05 [ T018: Round( i / 1000, 2 ) ]..................................0.06 [ T019: Str( i / 1000 ) ].......................................0.17 [ T020: Val( s ) ]..............................................0.08 [ T021: Val( a [ i % 16 + 1 ] ) ]...............................0.13 [ T022: DToS( d - i % 10000 ) ].................................0.14 [ T023: Eval( {|| i % 16 } ) ]..................................0.14 [ T024: Eval( bc := {|| i % 16 } ) ]............................0.08 [ T025: Eval( {| x | x % 16 }, i ) ]............................0.11 [ T026: Eval( bc := {| x | x % 16 }, i ) ]......................0.09 [ T027: Eval( {| x | f1( x ) }, i ) ]...........................0.13 [ T028: Eval( bc := {| x | f1( x ) }, i ) ].....................0.11 [ T029: Eval( bc := &( "{| x | f1( x ) }" ), i ) ]..............0.11 [ T030: x := &( "f1(" + Str( i ) + ")" ) ]......................0.81 [ T031: bc := &( "{| x | f1( x ) }" ), Eval( bc, i ) ]..........0.92 [ T032: x := ValType( x ) + ValType( i ) ]......................0.13 [ T033: x := StrZero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........0.23 [ T034: x := a[ i % 16 + 1 ] == s ].............................0.08 [ T035: x := a[ i % 16 + 1 ] = s ]..............................0.09 [ T036: x := a[ i % 16 + 1 ] >= s ].............................0.09 [ T037: x := a[ i % 16 + 1 ] <= s ].............................0.09 [ T038: x := a[ i % 16 + 1 ] < s ]..............................0.08 [ T039: x := a[ i % 16 + 1 ] > s ]..............................0.09 [ T040: AScan( a, i % 16 ) ]....................................0.14 [ T041: AScan( a, {| x | x == i % 16 } ) ]......................1.02 [ T042: iif( i % 1000 == 0, a := {}, ), AAdd(a,{i,1,.T.,s, ]....0.33 [ T043: x := a ]................................................0.02 [ T044: x := {} ]...............................................0.03 [ T045: f0() ]..................................................0.02 [ T046: f1( i ) ]...............................................0.03 [ T047: f2( c[1...8] ) ]........................................0.03 [ T048: f2( c[1...40000] ) ]....................................0.03 [ T049: f2( @c[1...40000] ) ]...................................0.05 [ T050: f2( @c[1...40000] ), c2 := c ]..........................0.05 [ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.13 [ T052: f2( a ) ]...............................................0.03 [ T053: x := f4() ].............................................0.13 [ T054: x := f5() ].............................................0.08 [ T055: x := Space( 16 ) ]......................................0.05 [ T056: f_prv( c ) ]............................................0.11 ==================================================================== [ total application time: ].....................................7.44 [ total real time: ]............................................7.47 2023-05-22 12:27:19 Windows 10 10.0 Harbour 3.2.0dev (r2304211101) Embarcadero C++ 7.40 (64-bit) x86-64 THREADS: 0 N_LOOPS: 1000000 [ T000: empty loop overhead ]...................................0.03 ==================================================================== [ T001: x := L_C ]..............................................0.00 [ T002: x := L_N ]..............................................0.00 [ T003: x := L_D ]..............................................0.00 [ T004: x := S_C ]..............................................0.02 [ T005: x := S_N ]..............................................0.02 [ T006: x := S_D ]..............................................0.00 [ T007: x := M->M_C ]...........................................0.02 [ T008: x := M->M_N ]...........................................0.03 [ T009: x := M->M_D ]...........................................0.02 [ T010: x := M->P_C ]...........................................0.02 [ T011: x := M->P_N ]...........................................0.02 [ T012: x := M->P_D ]...........................................0.02 [ T013: x := F_C ]..............................................0.00 [ T014: x := F_N ]..............................................0.02 [ T015: x := F_D ]..............................................0.00 [ T016: x := o:Args ]...........................................0.05 [ T017: x := o[ 2 ] ]...........................................0.05 [ T018: Round( i / 1000, 2 ) ]..................................0.06 [ T019: Str( i / 1000 ) ].......................................0.25 [ T020: Val( s ) ]..............................................0.06 [ T021: Val( a [ i % 16 + 1 ] ) ]...............................0.13 [ T022: DToS( d - i % 10000 ) ].................................0.11 [ T023: Eval( {|| i % 16 } ) ]..................................0.14 [ T024: Eval( bc := {|| i % 16 } ) ]............................0.09 [ T025: Eval( {| x | x % 16 }, i ) ]............................0.11 [ T026: Eval( bc := {| x | x % 16 }, i ) ]......................0.08 [ T027: Eval( {| x | f1( x ) }, i ) ]...........................0.11 [ T028: Eval( bc := {| x | f1( x ) }, i ) ].....................0.09 [ T029: Eval( bc := &( "{| x | f1( x ) }" ), i ) ]..............0.09 [ T030: x := &( "f1(" + Str( i ) + ")" ) ]......................0.88 [ T031: bc := &( "{| x | f1( x ) }" ), Eval( bc, i ) ]..........1.08 [ T032: x := ValType( x ) + ValType( i ) ]......................0.11 [ T033: x := StrZero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........0.25 [ T034: x := a[ i % 16 + 1 ] == s ].............................0.09 [ T035: x := a[ i % 16 + 1 ] = s ]..............................0.09 [ T036: x := a[ i % 16 + 1 ] >= s ].............................0.11 [ T037: x := a[ i % 16 + 1 ] <= s ].............................0.09 [ T038: x := a[ i % 16 + 1 ] < s ]..............................0.09 [ T039: x := a[ i % 16 + 1 ] > s ]..............................0.11 [ T040: AScan( a, i % 16 ) ]....................................0.11 [ T041: AScan( a, {| x | x == i % 16 } ) ]......................1.02 [ T042: iif( i % 1000 == 0, a := {}, ), AAdd(a,{i,1,.T.,s, ]....0.34 [ T043: x := a ]................................................0.02 [ T044: x := {} ]...............................................0.03 [ T045: f0() ]..................................................0.02 [ T046: f1( i ) ]...............................................0.03 [ T047: f2( c[1...8] ) ]........................................0.02 [ T048: f2( c[1...40000] ) ]....................................0.02 [ T049: f2( @c[1...40000] ) ]...................................0.02 [ T050: f2( @c[1...40000] ), c2 := c ]..........................0.03 [ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.11 [ T052: f2( a ) ]...............................................0.03 [ T053: x := f4() ].............................................0.28 [ T054: x := f5() ].............................................0.08 [ T055: x := Space( 16 ) ]......................................0.06 [ T056: f_prv( c ) ]............................................0.11 ==================================================================== [ total application time: ].....................................8.56 [ total real time: ]............................................8.63