-----Messaggio Originale-----
Da: "Przemyslaw Czerpak" <[EMAIL PROTECTED]>
A: "Harbour Project Main Developer List." <harbour@harbour-project.org>
Data invio: domenica 5 ottobre 2008 21.04
Oggetto: Re: [Harbour] 2008-10-05 17:53 UTC+0200
PrzemyslawCzerpak(druzus/at/priv.onet.pl)
If you can please also make test for:
speedtst --thread=2 --scale --exclude=mem
Here it is:
E:\HARBOUR>speedtst --thread=2 --scale --exclude=mem
10/05/08 21:37:52 Windows XP 5.1.2600 Service Pack 3
Harbour 1.1.0dev (Rev. 9550) (MT)+ Borland C++ 5.5.1 (32 bit)
THREADS: 2
N_LOOPS: 1000000
excluded tests: 029 030 023 025 027 040 041 043 052 053 019 022 031 032
1 th. 2 th. factor
============================================================================
[ T001: x := L_C ]____________________________________ 0.42 0.20 -> 2.06
[ T002: x := L_N ]____________________________________ 0.30 0.14 -> 2.11
[ T003: x := L_D ]____________________________________ 0.31 0.16 -> 2.00
[ T004: x := S_C ]____________________________________ 0.52 0.34 -> 1.50
[ T005: x := S_N ]____________________________________ 0.41 0.20 -> 2.00
[ T006: x := S_D ]____________________________________ 0.39 0.20 -> 1.93
[ T007: x := M_C ]____________________________________ 0.56 0.30 -> 1.89
[ T008: x := M_N ]____________________________________ 0.45 0.22 -> 2.07
[ T009: x := M_D ]____________________________________ 0.45 0.24 -> 1.93
[ T010: x := P_C ]____________________________________ 0.51 0.28 -> 1.83
[ T011: x := P_N ]____________________________________ 0.45 0.23 -> 1.94
[ T012: x := P_D ]____________________________________ 0.45 0.22 -> 2.07
[ T013: x := F_C ]____________________________________ 0.92 1.25 -> 0.74
[ T014: x := F_N ]____________________________________ 0.78 0.39 -> 2.01
[ T015: x := F_D ]____________________________________ 0.55 0.26 -> 2.06
[ T016: x := o:GenCode ]______________________________ 1.03 0.51 -> 2.00
[ T017: x := o[8] ]___________________________________ 0.80 0.53 -> 1.50
[ T018: round( i / 1000, 2 ) ]________________________ 1.00 0.50 -> 2.00
[ T020: val( s ) ]____________________________________ 1.11 0.56 -> 1.97
[ T021: val( a [ i % 16 + 1 ] ) ]_____________________ 1.97 1.00 -> 1.97
[ T024: eval( bc := { || i % 16 } ) ]_________________ 1.30 0.70 -> 1.84
[ T026: eval( bc := { |x| x % 16 }, i ) ]_____________ 1.36 0.69 -> 1.98
[ T028: eval( bc := { |x| f1( x ) }, i ) ]____________ 1.77 0.91 -> 1.95
[ T033: x := a[ i % 16 + 1 ] == s ]___________________ 1.64 0.86 -> 1.91
[ T034: x := a[ i % 16 + 1 ] = s ]____________________ 1.77 1.00 -> 1.77
[ T035: x := a[ i % 16 + 1 ] >= s ]___________________ 1.78 0.95 -> 1.87
[ T036: x := a[ i % 16 + 1 ] <= s ]___________________ 1.77 0.95 -> 1.85
[ T037: x := a[ i % 16 + 1 ] < s ]____________________ 1.76 0.97 -> 1.82
[ T038: x := a[ i % 16 + 1 ] > s ]____________________ 1.74 0.92 -> 1.88
[ T039: ascan( a, i % 16 ) ]__________________________ 1.53 0.94 -> 1.64
[ T042: x := a ]______________________________________ 0.45 0.22 -> 2.07
[ T044: f0() ]________________________________________ 0.51 0.27 -> 1.94
[ T045: f1( i ) ]_____________________________________ 0.77 0.38 -> 2.04
[ T046: f2( c[1...8] ) ]______________________________ 0.81 0.41 -> 2.00
[ T047: f2( c[1...40000] ) ]__________________________ 0.81 0.41 -> 2.00
[ T048: f2( @c[1...40000] ) ]_________________________ 0.80 0.41 -> 1.96
[ T049: f2( @c[1...40000] ), c2 := c ]________________ 0.84 0.42 -> 2.00
[ T050: f3( a, a2, s, i, s2, bc, i, n, x ) ]__________ 2.41 1.22 -> 1.97
[ T051: f2( a ) ]_____________________________________ 0.83 0.41 -> 2.04
[ T054: f_prv( c ) ]__________________________________ 2.31 1.42 -> 1.63
============================================================================
[ TOTAL ]_________________________________________ 40.34 22.19 -> 1.82
============================================================================
[ total application time: ]....................................84.09
[ total real time: ]...........................................62.64
EMG
--
EMAG Software Homepage: http://www.emagsoftware.it
The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum
The Best of Spectrum Games: http://www.emagsoftware.it/tbosg
The EMG Music page: http://www.emagsoftware.it/emgmusic
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
