-----Messaggio Originale-----
Da: "Miguel Angel Marchuet" <[EMAIL PROTECTED]>
A: "xharbour developer list" <[email protected]>
Data invio: venerdì 24 ottobre 2008 9.39
Oggetto: [xHarbour-developers] 2008-10-24 09:39 UTC+0100 Miguel
AngelMarchuet <[EMAIL PROTECTED]>
> 2008-10-23 17:52 UTC+0100 Miguel Angel Marchuet <[EMAIL PROTECTED]>
> * source\vm\fm.c
> * restored the use of memory, now to test DL_ALLOC will be explicit
> with macro -DHB_FM_DL_ALLOC
> #if defined( HB_FM_DL_ALLOC ) && ( defined( _MSC_VER ) || defined(
> __BORLANDC__ ) || defined( __MINGW32__ ) )
> #undef HB_FM_STD_ALLOC
> #undef HB_FM_WIN32_ALLOC
> #elif defined( __EXPORT__ ) && !defined( HB_FM_WIN32_ALLOC )
> #define HB_FM_WIN32_ALLOC
> #undef HB_FM_DL_ALLOC
> #undef HB_FM_STD_ALLOC
> #elif defined( HB_FM_WIN32_ALLOC )
> #undef HB_FM_DL_ALLOC
> #undef HB_FM_STD_ALLOC
> #elif defined( HB_FM_STD_ALLOC )
> #undef HB_FM_DL_ALLOC
> #undef HB_FM_WIN32_ALLOC
> #else
> #define HB_FM_STD_ALLOC
> #undef HB_FM_DL_ALLOC
> #undef HB_FM_WIN32_ALLOC
> #endif
Now I get GPF on the following sample when RECNO() reaches 17500.
FUNCTION MAIN()
USE TEST
WHILE !EOF()
IF RECNO() % 100 = 0; ? RECNO(); ENDIF
SKIP
ENDDO
CLOSE
INKEY( 0 )
RETURN NIL
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
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
