Here are the results:
03/16/09 23:42:47 Windows XP 5.1.2600 Service Pack 3
Harbour 1.1.0dev (Rev. 10624) (MT)+ MinGW GNU C 4.3.2 (32-bit)
THREADS: 1
N_LOOPS: 1000000
[ T000: empty loop overhead ]...................................0.05
====================================================================
[ T001: x := L_C ]..............................................0.13
[ T002: x := L_N ]..............................................0.03
[ T003: x := L_D ]..............................................0.02
[ T004: x := S_C ]..............................................0.14
[ T005: x := S_N ]..............................................0.05
[ T006: x := S_D ]..............................................0.05
[ T007: x := M_C ]..............................................0.14
[ T008: x := M_N ]..............................................0.06
[ T009: x := M_D ]..............................................0.06
[ T010: x := P_C ]..............................................0.14
[ T011: x := P_N ]..............................................0.06
[ T012: x := P_D ]..............................................0.06
[ T013: x := F_C ]..............................................0.45
[ T014: x := F_N ]..............................................0.34
[ T015: x := F_D ]..............................................0.16
[ T016: x := o:Args ]...........................................0.30
[ T017: x := o[2] ].............................................0.22
[ T018: round( i / 1000, 2 ) ]..................................0.52
[ T019: str( i / 1000 ) ].......................................3.28
[ T020: val( s ) ]..............................................0.50
[ T021: val( a [ i % 16 + 1 ] ) ]...............................0.81
[ T022: dtos( d - i % 10000 ) ].................................0.83
[ T023: eval( { || i % 16 } ) ].................................1.41
[ T024: eval( bc := { || i % 16 } ) ]...........................0.47
[ T025: eval( { |x| x % 16 }, i ) ].............................0.89
[ T026: eval( bc := { |x| x % 16 }, i ) ].......................0.45
[ T027: eval( { |x| f1( x ) }, i ) ]............................0.94
[ T028: eval( bc := { |x| f1( x ) }, i ) ]......................0.53
[ T029: x := &( "f1(" + str(i) + ")" ) ]........................7.00
[ T030: bc := &( "{|x|f1(x)}" ); eval( bc, i ) ]................9.53
[ T031: x := valtype( x ) + valtype( i ) ].....................0.88
[ T032: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........2.66
[ T033: x := a[ i % 16 + 1 ] == s ].............................0.64
[ T034: x := a[ i % 16 + 1 ] = s ]..............................0.67
[ T035: x := a[ i % 16 + 1 ] >= s ].............................0.66
[ T036: x := a[ i % 16 + 1 ] <= s ].............................0.66
[ T037: x := a[ i % 16 + 1 ] < s ]..............................0.67
[ T038: x := a[ i % 16 + 1 ] > s ]..............................0.67
[ T039: ascan( a, i % 16 ) ]....................................0.53
[ T040: ascan( a, { |x| x == i % 16 } ) ].......................6.17
[ T041: if i%1000==0;a:={};end; aadd(a,{i,1,.T.,s,s2,a2,bc ]....2.30
[ T042: x := a ]................................................0.13
[ T043: x := {} ]...............................................0.56
[ T044: f0() ]..................................................0.14
[ T045: f1( i ) ]...............................................0.17
[ T046: f2( c[1...8] ) ]........................................0.25
[ T047: f2( c[1...40000] ) ]....................................0.25
[ T048: f2( @c[1...40000] ) ]...................................0.25
[ T049: f2( @c[1...40000] ), c2 := c ]..........................0.28
[ T050: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.88
[ T051: f2( a ) ]...............................................0.27
[ T052: x := f4() ].............................................1.47
[ T053: x := f5() ].............................................0.69
[ T054: x := space(16) ]........................................0.56
[ T055: f_prv( c ) ]............................................1.16
====================================================================
[ total application time: ]....................................55.80
[ total real time: ]...........................................55.83
03/16/09 23:43:43 Windows XP 5.1.2600 Service Pack 3
Harbour 1.1.0dev (Rev. 10624) (MT)+ MinGW GNU C 4.3.2 (32-bit)
THREADS: 2
N_LOOPS: 1000000
[ T000: empty loop overhead ]...................................0.05
====================================================================
[ T001: x := L_C ]..............................................0.83
[ T002: x := L_N ]..............................................0.39
[ T003: x := L_D ]..............................................0.42
[ T004: x := S_C ]..............................................0.91
[ T005: x := S_N ]..............................................0.47
[ T006: x := S_D ]..............................................0.48
[ T007: x := M_C ]..............................................1.08
[ T008: x := M_N ]..............................................0.61
[ T009: x := M_D ]..............................................0.61
[ T010: x := P_C ]..............................................1.08
[ T011: x := P_N ]..............................................0.58
[ T012: x := P_D ]..............................................0.55
[ T013: x := F_C ]..............................................1.83
[ T014: x := F_N ]..............................................1.64
[ T015: x := F_D ]..............................................0.95
[ T016: x := o:Args ]...........................................1.70
[ T017: x := o[2] ].............................................1.20
[ T018: round( i / 1000, 2 ) ]..................................1.77
[ T019: str( i / 1000 ) ].......................................8.95
[ T020: val( s ) ]..............................................1.80
[ T021: val( a [ i % 16 + 1 ] ) ]...............................2.77
[ T022: dtos( d - i % 10000 ) ].................................3.39
[ T023: eval( { || i % 16 } ) ].................................6.27
[ T024: eval( bc := { || i % 16 } ) ]...........................2.23
[ T025: eval( { |x| x % 16 }, i ) ].............................4.52
[ T026: eval( bc := { |x| x % 16 }, i ) ].......................2.27
[ T027: eval( { |x| f1( x ) }, i ) ]............................4.17
[ T028: eval( bc := { |x| f1( x ) }, i ) ]......................2.70
[ T029: x := &( "f1(" + str(i) + ")" ) ].......................42.59
[ T030: bc := &( "{|x|f1(x)}" ); eval( bc, i ) ]...............46.25
[ T031: x := valtype( x ) + valtype( i ) ].....................4.27
[ T032: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........8.64
[ T033: x := a[ i % 16 + 1 ] == s ].............................2.36
[ T034: x := a[ i % 16 + 1 ] = s ]..............................2.55
[ T035: x := a[ i % 16 + 1 ] >= s ].............................2.55
[ T036: x := a[ i % 16 + 1 ] <= s ].............................2.92
[ T037: x := a[ i % 16 + 1 ] < s ]..............................3.08
[ T038: x := a[ i % 16 + 1 ] > s ]..............................2.95
[ T039: ascan( a, i % 16 ) ]....................................2.61
[ T040: ascan( a, { |x| x == i % 16 } ) ]......................23.55
[ T041: if i%1000==0;a:={};end; aadd(a,{i,1,.T.,s,s2,a2,bc ]....8.58
[ T042: x := a ]................................................0.61
[ T043: x := {} ]...............................................2.27
[ T044: f0() ]..................................................0.73
[ T045: f1( i ) ]...............................................0.95
[ T046: f2( c[1...8] ) ]........................................1.23
[ T047: f2( c[1...40000] ) ]....................................1.20
[ T048: f2( @c[1...40000] ) ]...................................1.23
[ T049: f2( @c[1...40000] ), c2 := c ]..........................1.33
[ T050: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................3.39
[ T051: f2( a ) ]...............................................1.23
[ T052: x := f4() ].............................................7.14
[ T053: x := f5() ].............................................2.92
[ T054: x := space(16) ]........................................2.61
[ T055: f_prv( c ) ]............................................2.14
====================================================================
[ total application time: ]...................................120.86
[ total real time: ]...........................................61.06
Brgds,
Viktor
On Mon, Mar 16, 2009 at 10:30 PM, Przemyslaw Czerpak <[email protected]>wrote:
> On Mon, 16 Mar 2009, Szak�ts Viktor wrote:
>
> Hi,
>
> > Oh, just one :) an old one, it's still a P4 2.6 / 800 with
> Hyperthreading.
> > [ Last week I was checking the market, but I just don't feel
> > like assembling yet another junk PC, so for now I keep waiting,
> > maybe a new Mac Mini will be the answer with native Linux
> > or OSX. Nothing has matured yet. For me power consumption,
> > noise and size are the major factors, it also has to be future
> > proof as I tend not to swap machines every few years. ]
>
> :-)
>
> Two notes about your results.
> 1. they were nearly linear. Please look at real time not CPU time.
> 2. it's intereseting that you have noticable real time difference.
> I do not have it on single CPU machine. HT should rather reduce
> the real time not increase (I do not have any computer with HT
> to make tests) and here I would like to ask you about testing
> MinGW builds for:
> speedtst --thread=1
> and:
> speedtst --thread=2
> what is the real time difference.
>
> best regards,
> Przemek
> _______________________________________________
> Harbour mailing list
> [email protected]
> http://lists.harbour-project.org/mailman/listinfo/harbour
>
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour