Results:

10/05/08 09:50:08 Windows XP 5.1.2600 Service Pack 2
Harbour 1.1.0dev (Rev. 9549) (MT)+ Borland C++ 5.5.1 (32 bit)
N_LOOPS: 1000000


 _1.th  _8.th     factor    _1.th  _4.th     factor
 ================   =================  ==============
 _2.34  _4.77 ->  0.49    _1.14  _2.33 ->  0.49   [ T001: x := L_C ]
 _1.94  _5.25 ->  0.37    _0.95  _1.95 ->  0.49   [ T002: x := L_N ]
 _1.91  _4.06 ->  0.47    _0.94  _1.97 ->  0.48   [ T003: x := L_D ]
 _2.33  _4.39 ->  0.53    _1.17  _2.05 ->  0.57   [ T004: x := S_C ]
 _1.89  _4.03 ->  0.47    _0.94  _1.78 ->  0.53   [ T005: x := S_N ]
 _1.95  _4.00 ->  0.49    _0.97  _1.94 ->  0.50   [ T006: x := S_D ]
 _2.47  _4.67 ->  0.53    _1.27  _2.26 ->  0.56   [ T007: x := M_C ]
 _2.05  _4.03 ->  0.51    _1.02  _1.98 ->  0.51   [ T008: x := M_N ]
 _2.03  _4.03 ->  0.50    _1.03  _1.91 ->  0.54   [ T009: x := M_D ]
 _2.11  _4.17 ->  0.51    _1.16  _2.08 ->  0.56   [ T010: x := P_C ]
 _2.05  _4.05 ->  0.51    _1.03  _1.95 ->  0.53   [ T011: x := P_N ]
 _2.05  _4.06 ->  0.50    _1.05  _1.94 ->  0.54   [ T012: x := P_D ]
 _3.89  _5.89 ->  0.66    _1.97  _2.88 ->  0.68   [ T013: x := F_C ]
 _3.28  _3.53 ->  0.93    _1.63  _1.75 ->  0.93   [ T014: x := F_N ]
 _2.34  _4.09 ->  0.57    _1.19  _2.00 ->  0.59   [ T015: x := F_D ]
 _4.24  _5.13 ->  0.83    _2.11  _2.47 ->  0.85   [ T016: x := o:GenCode ]
 _3.50  _5.83 ->  0.60    _1.74  _2.41 ->  0.72   [ T017: x := o[8] ]
 _4.58  _3.91 ->  1.17    _2.27  _1.75 ->  1.29   [ T018: round( i / 1000, 2
) ]
 _9.59  10.20 ->  0.94    _4.77  _5.78 ->  0.82   [ T019: str( i / 1000 ) ]
 _4.50  _3.02 ->  1.49    _2.27  _1.45 ->  1.56   [ T020: val( s ) ]
 _7.97  _8.09 ->  0.98    _3.99  _3.95 ->  1.01   [ T021: val( a [ i % 16 +
1 ] ) ]
 _7.72  _6.50 ->  1.19    _3.80  _3.33 ->  1.14   [ T022: dtos( d - i %
10000 ) ]
 _9.86  38.39 ->  0.26    _4.89  28.09 ->  0.17   [ T023: eval( { || i % 16
} ) ]
 _5.00  _7.63 ->  0.66    _2.53  _3.67 ->  0.69   [ T024: eval( bc := { || i
% 16 } ) ]
 _7.91  50.27 ->  0.16    _3.89  19.39 ->  0.20   [ T025: eval( { |x| x % 16
}, i ) ]
 _5.80  _8.59 ->  0.67    _2.86  _4.19 ->  0.68   [ T026: eval( bc := { |x|
x % 16 }, i ) ]
 _9.67  50.03 ->  0.19    _4.88  23.83 ->  0.20   [ T027: eval( { |x| f1( x
) }, i ) ]
 _7.53  11.28 ->  0.67    _3.75  _5.36 ->  0.70   [ T028: eval( bc := { |x|
f1( x ) }, i ) ]
 42.44  63.16 ->  0.67    21.55  31.52 ->  0.68   [ T029: x := &( "f1(" +
str(i) + ")" ) ]
 54.95  86.47 ->  0.64    27.41  43.08 ->  0.64   [ T030: bc := &(
"{|x|f1(x)}" ); eval( bc, i ) ]
 _8.72  10.16 ->  0.86    _4.42  _5.19 ->  0.85   [ T031: x := valtype( x )
+  valtype( i ) ]
 13.81  11.58 ->  1.19    _7.02  _6.17 ->  1.14   [ T032: x := strzero( i %
100, 2 ) $ a[ i % 16 + 1 ]
 _6.91  11.39 ->  0.61    _3.42  _5.55 ->  0.62   [ T033: x := a[ i % 16 + 1
] == s ]
 _7.30  10.92 ->  0.67    _3.66  _5.41 ->  0.68   [ T034: x := a[ i % 16 + 1
] = s ]
 _7.31  10.78 ->  0.68    _3.69  _5.28 ->  0.70   [ T035: x := a[ i % 16 + 1
] >= s ]
 _7.30  10.73 ->  0.68    _3.89  _5.20 ->  0.75   [ T036: x := a[ i % 16 + 1
] <= s ]
 _7.31  10.76 ->  0.68    _3.75  _5.33 ->  0.70   [ T037: x := a[ i % 16 + 1
] < s ]
 _7.31  10.76 ->  0.68    _3.76  _5.31 ->  0.71   [ T038: x := a[ i % 16 + 1
] > s ]
 _6.06  _5.98 ->  1.01    _3.09  _2.92 ->  1.06   [ T039: ascan( a, i % 16 )
]
 54.78  49.03 ->  1.12    _8.74  25.19 ->  1.14   [ T040: ascan( a, { |x| x
== i % 16 } ) ]
 20.95  35.94 ->  0.58    _0.61  16.73 ->  0.63   [ T041: if
i%1000==0;a:={};end; aadd(a,{i,1,.T.,s,s2
 _2.39  _4.81 ->  0.50    _1.17  _2.36 ->  0.50   [ T042: x := a ]
 _4.49  43.53 ->  0.10    _2.24  23.19 ->  0.10   [ T043: x := {} ]
 _2.36  _5.06 ->  0.47    _1.16  _2.34 ->  0.49   [ T044: f0() ]
 _3.63  _7.84 ->  0.46    _1.83  _3.78 ->  0.48   [ T045: f1( i ) ]
 _3.55  _7.51 ->  0.47    _1.75  _3.28 ->  0.53   [ T046: f2( c[1...8] ) ]
 _3.55  _7.72 ->  0.46    _1.76  _3.59 ->  0.49   [ T047: f2( c[1...40000]
)]
 _3.55  _7.70 ->  0.46    _1.75  _3.63 ->  0.48   [ T048: f2( @c[1...40000]
) ]
 _4.25  _9.14 ->  0.46    _2.06  _4.58 ->  0.45   [ T049: f2( @c[1...40000]
), c2 := c ]
 10.09  14.63 ->  0.69    _5.03  _7.30 ->  0.69   [ T050: f3( a, a2, s, i,
s2, bc, i, n, x ) ]
 _3.61  _7.63 ->  0.47    _1.77  _3.69 ->  0.48   [ T051: f2( a ) ]
 11.44  13.08 ->  0.87    _5.97  _6.61 ->  0.90   [ T052: x := f4() ]
 _6.98  _9.16 ->  0.76    _3.44  _4.47 ->  0.77   [ T053: x := f5() ]
 10.09  12.58 ->  0.80    _5.11  _6.23 ->  0.82   [ T054: f_prv( c ) ]
=================   ================   ===============
437.61 751.95 -> 0.58  221.20 374.35 -> 0.59   [   TOTAL   ]
=================   ================   ===============
...................1740.97   ....................828.50
...................1189.58   ....................595.59

Regards
Pritpal Bedi

PS : I think how the figures are displayed be be changed as above
because of non-proportional fonts on browsers. If you agree I can commit.


-- 
View this message in context: 
http://www.nabble.com/2008-10-05-17%3A53-UTC%2B0200-Przemyslaw-Czerpak-%28druzus-at-priv.onet.pl%29-tp19825946p19827182.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to