I explained it.
I remove some structure variables, not used when profile is not active.
it increases speed.
more later it was added altogether for blackguard compatibility with 3rd party
libraries. THEN return to be slow altogether.
if you don't use fmstat and use -DHB_NO_PROFILE
#ifndef HB_NO_PROFILER
ULONG ulCalls; /* profiler support */
ULONG ulTime; /* profiler support */
ULONG ulRecurse; /* profiler support */
#endif
and use new memory model under windows platform, then you can run speedtest.prg
more quick than harbour.
# define malloc( n ) ( void * ) HeapAlloc( GetProcessHeap(), 0, ( n ) )
# define realloc( p, n ) ( void * ) HeapReAlloc( GetProcessHeap(), 0, (
void * ) ( p ), ( n ) )
# define free( p ) HeapFree( GetProcessHeap(), 0, ( void * ) ( p ) )
Best regards,
Miguel Angel marchuet
Ron Pinkas escribió:
> But WHY is it slower now?
>
> I don't want to HIDE thinking that we CAN make it faster, I want to know
> what did we CHANGE to make it SLOWER?
>
> Is it true? Do we have any tests known to be slower than say few months
> ago?
>
> Ron
>
> --------------------------------------------------
> From: "Enrico Maria Giordano" <[EMAIL PROTECTED]>
> Sent: Thursday, November 27, 2008 4:02 AM
> To: "Miguel Angel Marchuet" <[EMAIL PROTECTED]>; "xharbour
> developer list" <xharbour-developers@lists.sourceforge.net>
> Subject: Re: [xHarbour-developers] Slowness
>
>>
>> -----Messaggio Originale----- Da: "Miguel Angel Marchuet"
>> <[EMAIL PROTECTED]>
>> A: "Enrico Maria Giordano" <[EMAIL PROTECTED]>; "xharbour
>> developer list" <xharbour-developers@lists.sourceforge.net>
>> Data invio: giovedì 27 novembre 2008 11.48
>> Oggetto: Re: [xHarbour-developers] Slowness
>>
>>
>>> and try compile speedtst with:
>>
>> I see slowness in my FWH apps. So I can't change classes.h, I think.
>>
>> 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
>>
>>
>> -------------------------------------------------------------------------
>> This SF.Net email is sponsored by the Moblin Your Move Developer's
>> challenge
>> Build the coolest Linux based applications with Moblin SDK & win great
>> prizes
>> Grand prize is a trip for two to an Open Source event anywhere in the
>> world
>> http://moblin-contest.org/redirect.php?banner_id=100&url=/
>> _______________________________________________
>> xHarbour-developers mailing list
>> xHarbour-developers@lists.sourceforge.net
>> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>>
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 3647 (20081127) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
> http://www.eset.com
>
>
>
>
-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
