Enrico with this build.bat
FW705 + HB_FM_WIN32_ALLOC + BCC55 | BCC58 | BCC59
or
FW705 + HB_FM_STD_ALLOC + BCC55 | BCC58 | BCC59
Can be a problem of fwh release ?
please try compile with full debug info and report me the results.
HB_FM_WIN32_ALLOC is automatically used when you compile xharbour
with this macro or __EXPORT__, and is the apropiated clause for
windows aplications.
I use to build xharbour the next settings:
SET HB_ARCHITECTURE=w32
SET HB_COMPILER=bcc32
SET PRG_USR=-l
SET C_USR=-DHB_FM_WIN32_ALLOC
SET BCCDIR=c:\utl\bcc4.0
SET CC_DIR=c:\utl\bcc4.0
SET BISON_DIR=C:\UTL\GnuWin32\bin
SET PATH=%BCCDIR%\BIN;C:\UTL\GnuWin32\bin;%PATH%
your sample runs fine here
#include "Fivewin.ch"
FUNCTION MAIN()
LOCAL oDlg
DEFINE DIALOG oDlg
ACTIVATE DIALOG oDlg;
CENTER
RETURN NIL
build.bat -------------------------------
@ECHO OFF
CLS
if A%1 == A GOTO :SINTAX
if NOT EXIST %1.prg GOTO :NOEXIST
ECHO Compiling...
set hdir=C:\CVS-Developers\xharbour
set bcdir=c:\utl\bcc4.0\bin
set fwdir=c:\utl\fwh705
%hdir%\bin\harbour %1 /w2 /es2 /n /i;%fwdir%\include;%hdir%\include %2 %3 >
clip.log
@type clip.log
IF ERRORLEVEL 1 PAUSE
IF ERRORLEVEL 1 GOTO EXIT
echo -O2 -e%1.exe -I%hdir%\include %1.c > b32.bc
%bcdir%\bcc32 -M -c @b32.bc
:ENDCOMPILE
echo c0w32.obj + > b32.bc
echo %1.obj, + >> b32.bc
echo %1.exe, + >> b32.bc
echo %1.map, + >> b32.bc
echo %hdir%\lib\rtl.lib + >> b32.bc
echo %hdir%\lib\vm.lib + >> b32.bc
echo %hdir%\lib\gtwin.lib + >> b32.bc
echo %hdir%\lib\lang.lib + >> b32.bc
echo %hdir%\lib\macro.lib + >> b32.bc
echo %hdir%\lib\rdd.lib + >> b32.bc
echo %fwdir%\lib\fiveHx.lib + >> b32.bc
echo %fwdir%\lib\fiveHC.lib + >> b32.bc
echo %hdir%\lib\dbfntx.lib + >> b32.bc
echo %hdir%\lib\dbffpt.lib + >> b32.bc
echo %hdir%\lib\hbsix.lib + >> b32.bc
echo %hdir%\lib\pcrepos.lib + >> b32.bc
echo %hdir%\lib\zlib.lib + >> b32.bc
echo %hdir%\lib\common.lib + >> b32.bc
echo %hdir%\lib\pp.lib + >> b32.bc
echo %bcdir%\lib\cw32.lib + >> b32.bc
echo %bcdir%\lib\import32.lib, >> b32.bc
ECHO *
ECHO Linking...
%bcdir%\ilink32 -Gn -Tpe -s -x @b32.bc
IF ERRORLEVEL 1 GOTO LINKERROR
ECHO * Application successfully built
@del clip.log
@del %1.c
@del %1.obj
@del %1.tds
@del b32.bc
%1 %2
GOTO EXIT
ECHO
:LINKERROR
rem PAUSE * Linking errors *
GOTO EXIT
:SINTAX
ECHO SYNTAX: Build [Program] {-- No especifiques la extensi¢n PRG
ECHO {-- Don't specify .PRG extension
GOTO EXIT
:NOEXIST
ECHO The specified PRG %1 does not exist
:EXIT
Enrico Maria Giordano escribió:
>
> -----Messaggio Originale----- Da: "Miguel Angel Marchuet"
> <[EMAIL PROTECTED]>
> A: "Enrico Maria Giordano" <[EMAIL PROTECTED]>
> Cc: "Vicente Guerra" <[EMAIL PROTECTED]>; "Xharbour-Developers"
> <xharbour-developers@lists.sourceforge.net>
> Data invio: lunedì 27 ottobre 2008 9.32
> Oggetto: Re: [xHarbour-developers] Any FWH programs GPF using latest CVS
>
>
>> Please i need more information so to solve problems of last CVS.
>>
>> We have a FWH aplications running without problems, and more fast
>> than previous cvs.
>>
>> I you send me a code to reproduce the problem i can solve it.
>>
>> I know that all code need to recompile with actual CVS. But i don't need
>> to recompile FWH to work for example.
>>
>> Please help me ;) sending selfcontained problem.
>
> Here it is:
>
> #include "Fivewin.ch"
>
>
> FUNCTION MAIN()
>
> LOCAL oDlg
>
> DEFINE DIALOG oDlg
>
> ACTIVATE DIALOG oDlg;
> CENTER
>
> RETURN NIL
>
> Result: GPF
>
> 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
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 3559 (20081027) __________
>
> 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
