CPU: Intel Core 2 CPU 6320 - 2 GB RAM ST
Startup loop to increase CPU clock... 10/04/08 14:49:39 Windows XP 5.1.2600 Service Pack 3 Harbour 1.1.0dev (Rev. 9542) Borland C++ 5.5.1 (32 bit) N_LOOPS = 1000000 [ empty loop overhead ].........................................0.08 ==================================================================== [ x := L_C ]....................................................0.08 [ x := L_N ]....................................................0.06 [ x := L_D ]....................................................0.06 [ x := S_C ]....................................................0.13 [ x := S_N ]....................................................0.11 [ x := S_D ]....................................................0.11 [ x := M_C ]....................................................0.13 [ x := M_N ]....................................................0.13 [ x := M_D ]....................................................0.13 [ x := P_C ]....................................................0.14 [ x := P_N ]....................................................0.13 [ x := P_D ]....................................................0.11 [ x := F_C ]....................................................0.20 [ x := F_N ]....................................................0.31 [ x := F_D ]....................................................0.17 [ x := o:GenCode ]..............................................0.28 [ x := 0 ]......................................................0.00 [ round( i / 1000, 2 ) ]........................................0.34 [ str( i / 1000 ) ].............................................1.08 [ val( s ) ]....................................................0.38 [ val( a [ i % 16 + 1 ] ) ].....................................0.70 [ dtos( d - i % 10000 ) ].......................................0.61 [ eval( { || i % 16 } ) ].......................................0.64 [ eval( bc := { || i % 16 } ) ].................................0.44 [ eval( { |x| x % 16 }, i ) ]...................................0.52 [ eval( bc := { |x| x % 16 }, i ) ].............................0.45 [ eval( { |x| f1( x ) }, i ) ]..................................0.67 [ eval( bc := { |x| f1( x ) }, i ) ]............................0.63 [ x := &( "f1(" + str(i) + ")" ) ]..............................3.64 [ bc := &( "{|x|f1(x)}" ); eval( bc, i ) ]......................4.48 [ x := valtype( x ) + valtype( i ) ]...........................0.64 [ x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]................1.33 [ x := a[ i % 16 + 1 ] == s ]...................................0.58 [ x := a[ i % 16 + 1 ] = s ]....................................0.59 [ x := a[ i % 16 + 1 ] >= s ]...................................0.63 [ x := a[ i % 16 + 1 ] <= s ]...................................0.59 [ x := a[ i % 16 + 1 ] < s ]....................................0.61 [ x := a[ i % 16 + 1 ] > s ]....................................0.61 [ ascan( a, i % 16 ) ]..........................................0.48 [ ascan( a, { |x| x == i % 16 } ) ].............................4.88 [ if i%1000==0;a:={};end; aadd(a,{i,1,.T.,s,s2,a2,bc}) ]........1.58 [ x := a ]......................................................0.08 [ x := {} ].....................................................0.19 [ f0() ]........................................................0.11 [ f1( i ) ].....................................................0.25 [ f2( c[1...8] ) ]..............................................0.19 [ f2( c[1...40000] ) ]..........................................0.20 [ f2( @c[1...40000] ) ].........................................0.19 [ f2( @c[1...40000] ), c2 := c ]................................0.22 [ f3( a, a2, s, i, s2, bc, i, n, x ) ]..........................0.80 [ f2( a ) ].....................................................0.19 [ x := f4() ]...................................................4.39 [ x := f5() ]...................................................0.36 ==================================================================== [ total application time: ]....................................40.75 [ total real time: ]...........................................40.83 MT Startup loop to increase CPU clock... 10/04/08 14:58:19 Windows XP 5.1.2600 Service Pack 3 Harbour 1.1.0dev (Rev. 9542) (MT) Borland C++ 5.5.1 (32 bit) N_LOOPS = 1000000 [ empty loop overhead ].........................................0.08 ==================================================================== [ x := L_C ]....................................................0.14 [ x := L_N ]....................................................0.06 [ x := L_D ]....................................................0.06 [ x := S_C ]....................................................0.19 [ x := S_N ]....................................................0.13 [ x := S_D ]....................................................0.13 [ x := M_C ]....................................................0.19 [ x := M_N ]....................................................0.14 [ x := M_D ]....................................................0.14 [ x := P_C ]....................................................0.19 [ x := P_N ]....................................................0.14 [ x := P_D ]....................................................0.14 [ x := F_C ]....................................................0.38 [ x := F_N ]....................................................0.31 [ x := F_D ]....................................................0.19 [ x := o:GenCode ]..............................................0.41 [ x := 0 ]......................................................0.03 [ round( i / 1000, 2 ) ]........................................0.44 [ str( i / 1000 ) ].............................................1.08 [ val( s ) ]....................................................0.45 [ val( a [ i % 16 + 1 ] ) ].....................................0.88 [ dtos( d - i % 10000 ) ].......................................0.88 [ eval( { || i % 16 } ) ].......................................1.16 [ eval( bc := { || i % 16 } ) ].................................0.53 [ eval( { |x| x % 16 }, i ) ]...................................0.88 [ eval( bc := { |x| x % 16 }, i ) ].............................0.55 [ eval( { |x| f1( x ) }, i ) ]..................................1.09 [ eval( bc := { |x| f1( x ) }, i ) ]............................0.78 [ x := &( "f1(" + str(i) + ")" ) ]..............................5.55 [ bc := &( "{|x|f1(x)}" ); eval( bc, i ) ]......................6.92 [ x := valtype( x ) + valtype( i ) ]...........................0.98 [ x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]................1.59 [ x := a[ i % 16 + 1 ] == s ]...................................0.75 [ x := a[ i % 16 + 1 ] = s ]....................................0.81 [ x := a[ i % 16 + 1 ] >= s ]...................................0.81 [ x := a[ i % 16 + 1 ] <= s ]...................................0.81 [ x := a[ i % 16 + 1 ] < s ]....................................0.81 [ x := a[ i % 16 + 1 ] > s ]....................................0.83 [ ascan( a, i % 16 ) ]..........................................0.66 [ ascan( a, { |x| x == i % 16 } ) ].............................6.77 [ if i%1000==0;a:={};end; aadd(a,{i,1,.T.,s,s2,a2,bc}) ]........2.53 [ x := a ]......................................................0.16 [ x := {} ].....................................................0.48 [ f0() ]........................................................0.17 [ f1( i ) ].....................................................0.30 [ f2( c[1...8] ) ]..............................................0.31 [ f2( c[1...40000] ) ]..........................................0.31 [ f2( @c[1...40000] ) ].........................................0.31 [ f2( @c[1...40000] ), c2 := c ]................................0.34 [ f3( a, a2, s, i, s2, bc, i, n, x ) ]..........................1.11 [ f2( a ) ].....................................................0.31 [ x := f4() ]...................................................4.80 [ x := f5() ]...................................................0.77 ==================================================================== [ total application time: ]....................................55.09 [ total real time: ]...........................................55.20 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