xHarbour y reporte de errores del compilador

[jose_murugosa]

Queridos colegas y amigos,

Escribo particularmente a los usuarios de xHarbour, Tengo dudas de si este tema se trata de un bug de xHarbour o si hay algo que quizá no hago bien al compilar.

Tuve muchos problemas al compilar con xharbour 1.2.1, ahora utilizo 1.2.3 y actualicé a la ultima versión 20141206 y funciona muy bien, pero cuando cometo algun error al escribir el código, me reporta "1 error".... y nada más... ni archivo... ni línea... ni nada.

Solo me pasa a mi?

Hay algo que estoy omitiendo?

Gracias desde ya por vuestra ayuda

[karinha]

Cual és el FLAG de compilación? /M/N ó otro?

Saludos.

[jose_murugosa]

Cual és el FLAG de compilación? /M/N ó otro?

Saludos.

Gracias por tu respuesta!!!!

Este es el flag:

/n /m /es2 /gc1

[karinha]

Acá esta funcionando normal con la ultima versión 20141206, mira:

Code: Select all  Expand view

Echo  .

Set hdir=C:\XHB061214
Set bcdir=C:\bcc582
Set fwhdir=C:\FwH1306

@If Exist *.Bak             Del *.Bak
@If Exist GERAPNFE.Obj      Del GERAPNFE.Obj
@If Exist *.Log             Del *.Log
@If Exist GERAPNFE.Map      Del GERAPNFE.Map
@If Exist GERAPNFE.PPO      Del GERAPNFE.Ppo
@If Exist GERAPNFE.TDS      Del GERAPNFE.TDS
@If Exist *.Bc              Del *.bc
@If Exist GERAPNFE.C        Del GERAPNFE.C
@If Exist GERAPNFE.HC       Del *.HC

If Exist GERAPNFE.Exe Del GERAPNFE.Exe

%hdir%\bin\harbour GERAPNFE      /m/n/gc0 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p > Erro.log


%bcdir%\bin\bcc32 -M -c -v -O2 -eGERAPNFE.exe -I%hdir%\include -I%bcdir%\include GERAPNFE.C       >> Erro.log


If ErrorLevel 1 Type Erro.log | More
If ErrorLevel 1 Goto Exit

%bcdir%\bin\BRC32.EXE -R XPLOOK.RC

:ENDCOMPILE

%bcdir%\bin\ilink32 -Gn -aa -Tpe -s @Cxp.Lnk

Echo .
IF ERRORLEVEL 1 GOTO LINKERROR
REM Cls
Echo .
Echo * Aplicacao Foi Desenvolvida Com Sucesso
Echo .
Echo * Aguarde um Momento, Compactando Aplicacao, Usando o UPX.EXE
Echo .
\UPX\UPX.EXE -9 GERAPNFE.EXE
Echo .
Echo * Aplicativo Foi Compactado Com Sucesso - Aguarde Execucao.
Echo .
Echo * Aguarde, Executando o Aplicativo, Gerado Com Sucesso Absoluto *
rem GERAPNFE
GOTO EXIT

:LINKERROR
PAUSE * Applicacao Nao Foi Desenvolvida Com Sucesso. Veja ERRO.LOG *
GOTO EXIT
Echo .
cls

:EXIT
 

Genera el erro.log via ERRSYSW.PRG perfectamente.

usted hice el download de este link:

viewtopic.php?f=16&t=29643&start=15

saludos.

[jose_murugosa]

Si, utilizo esa versión de xharbour, no se.. tal vez he sobreescrito algo al añadir mis clases de terceros, voy a revisar todo cuidadosamente, pero la verdad no he podido determinar que es lo que hace esto.

Gracias por toda tu ayuda

[cnavarro]

Prueba a incluir el fichero Errorsys.prg de la version de Fwh que estás usando en el proyecto

[jose_murugosa]

Prueba a incluir el fichero Errorsys.prg de la version de Fwh que estás usando en el proyecto

Lo hice, pero sin resultados, un post previo lo menciona, compilé junto a mi aplicación el c:\fwh\source\errorsys.prg y nada

Gracias por tu mensaje, aprecio mucho vuestra ayuda.

Voy a ver si recompilo todas mis libs y reviso las carpetas de fwh etc.. a ver si logro resolver este misterio misterioso

[hmpaquito]

El problema esta relacionado con los flags de compilacion, deja solo los /m /n.
El errsysw.prg, en tiempo de compilacion, no afecta.

[karinha]

Intenta asi:

Code: Select all  Expand view

/m/n/gc0
 

[jose_murugosa]

Intenta asi:

Code: Select all  Expand view

/m/n/gc0
 

Gracias nuevamente, probé y nada sigue igual

Sigo haciendo otras pruebas ...

[karinha]

Hola, que usas para compilar un CX.BAT y un CX.LNK por ejemplo? muestra el CX.LNK

Ejemplo:

Code: Select all  Expand view

C:\bcc582\lib\c0w32.Obj              +
GERAPNFE.Obj,                        +
GERAPNFE.exe,                        +
GERAPNFE.map,                        +
C:\FWH1306\lib\FiveHX.Lib            +
C:\FWH1306\lib\FiveHC.Lib            +
C:\XHB061214\lib\hbzip.Lib           +
C:\XHB061214\lib\zlib.Lib            +
C:\XHB061214\lib\rtl.Lib             +
C:\XHB061214\lib\vm.Lib              +
C:\XHB061214\lib\gtgui.Lib           +
C:\XHB061214\lib\lang.Lib            +
C:\XHB061214\lib\macro.Lib           +
C:\XHB061214\lib\rdd.Lib             +
C:\XHB061214\lib\dbfntx.Lib          +
C:\XHB061214\lib\dbfcdx.Lib          +
C:\XHB061214\lib\debug.Lib           +
C:\XHB061214\lib\common.Lib          +
C:\XHB061214\lib\tip.Lib             +
C:\XHB061214\lib\pp.Lib              +
C:\XHB061214\lib\dbffpt.Lib          +
c:\XHB061214\lib\hbsix.lib           +
C:\XHB061214\lib\codepage.Lib        +
c:\XHB061214\lib\libmisc.lib         +
C:\XHB061214\lib\PcRepos.Lib         +
C:\XHB061214\Lib\ct.Lib              +
C:\XHB061214\Lib\png.Lib             +
C:\Bcc582\lib\cw32.Lib               +
c:\bcc582\lib\import32.lib           +
c:\bcc582\lib\uuid.lib               +
c:\bcc582\lib\ws2_32.lib             +
C:\Bcc582\lib\psdk\msimg32.Lib       +
C:\Bcc582\lib\psdk\odbc32.Lib        +
C:\Bcc582\lib\psdk\rasapi32.Lib      +
C:\Bcc582\lib\psdk\nddeapi.Lib       +
C:\Bcc582\lib\psdk\psapi.Lib         +
c:\bcc582\lib\psdk\gdiplus.lib       +
C:\Bcc582\lib\psdk\iphlpapi.Lib      +
C:\Bcc582\lib\import32.Lib
 


Saludos.

[karinha]

Mira se tu carpeta de xHb\bin esta asi:

Code: Select all  Expand view

 Carpeta de C:\XHB061214\bin

10/12/2014  14:57    <DIR>          .
10/12/2014  14:57    <DIR>          ..
08/12/2014  15:47           738.816 harbour.exe
08/12/2014  15:48         1.072.128 hbdict.exe
08/12/2014  15:48         2.216.960 hbdoc.exe
08/12/2014  15:49           288.768 hbdocdll.exe
08/12/2014  15:48           920.576 hbextern.exe
08/12/2014  15:48           962.048 hbformat.exe
08/12/2014  15:47           130.048 hblib.exe
08/12/2014  15:48         1.150.976 hbmake.exe
08/12/2014  15:49           257.024 hbmakedll.exe
08/12/2014  15:48           232.960 hbpp.exe
08/12/2014  15:47           129.024 hbrc.exe
08/12/2014  15:47           121.856 hbrm.exe
08/12/2014  15:48         1.603.072 hbrun.exe
08/12/2014  15:49           173.568 hbrundll.exe
08/12/2014  15:48         1.660.928 hbrunmt.exe
08/12/2014  15:48         1.225.728 hbtest.exe
08/12/2014  15:49           392.192 hbtestdll.exe
08/12/2014  15:48         1.282.560 hbtestmt.exe
10/12/2014  14:57                 0 ss.txt
08/12/2014  15:48         1.902.592 xbscript.exe
08/12/2014  15:49           392.192 xbscriptdll.exe
              21 archivo(s)     16.854.016 bytes
 

Que pasa cuando compilas C:\fwh..\samples\TUTOR04.PRG?

Saludos.


[karinha]

BUILDX.BAT

Code: Select all  Expand view

@ECHO OFF
CLS
ECHO ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
ECHO ³ FiveWin for xHarbour 13.06 - Jun. 2013          xHarbour development power ³Ü
ECHO ³ (c) FiveTech, 1993-2013   for Microsoft Windows 9X/NT/200X/ME/XP/Vista/7/8 ³Û
ECHO ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙÛ
ECHO ÿ ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
 
if A%1 == A GOTO :SINTAX
if NOT EXIST %1.prg GOTO :NOEXIST
 
ECHO Compiling...
 
if "%FWDIR%" == "" set FWDIR=.\..\
if "%XHDIR%" == "" set XHDIR=c:\xhb061214
set GT=gtgui
 
set hdir=%XHDIR%
set hdirl=%hdir%\lib
set bcdir=c:\bcc582
set fwh=%FWDIR%
 
%hdir%\bin\harbour %1 /m/n /i%fwh%\include;%hdir%\include /w0 /p %2 %3 > comp.log
REM %hdir%\bin\harbour %1 /m/n /i..\include;%hdir%\include /w0 /p %2 %3 > clip.log
IF ERRORLEVEL 1 GOTO COMPILEERRORS
@type comp.log
 
echo -O2 -e%1.exe -I%hdir%\include -I%bcdir%\include %1.c > b32.bc
%bcdir%\bin\bcc32 -M -c -v @b32.bc
:ENDCOMPILE
 
IF EXIST %1.rc %bcdir%\bin\brc32 -r -I%bcdir%\include %1
 
echo %bcdir%\lib\c0w32.obj + > b32.bc
echo %1.obj, + >> b32.bc
echo %1.exe, + >> b32.bc
echo %1.map, + >> b32.bc
echo %fwh%\lib\Fivehx.lib %fwh%\lib\FiveHC.lib + >> b32.bc
echo %hdirl%\rtl.lib + >> b32.bc
echo %hdirl%\vm.lib + >> b32.bc
echo %hdirl%\%GT%.lib + >> b32.bc
echo %hdirl%\lang.lib + >> b32.bc
echo %hdirl%\codepage.lib + >> b32.bc
echo %hdirl%\macro.lib + >> b32.bc
echo %hdirl%\rdd.lib + >> b32.bc
echo %hdirl%\dbfntx.lib + >> b32.bc
echo %hdirl%\dbfcdx.lib + >> b32.bc
echo %hdirl%\dbffpt.lib + >> b32.bc
echo %hdirl%\hbsix.lib + >> b32.bc
echo %hdirl%\debug.lib + >> b32.bc
echo %hdirl%\common.lib + >> b32.bc
echo %hdirl%\pp.lib + >> b32.bc
echo %hdirl%\pcrepos.lib + >> b32.bc
echo %hdirl%\ct.lib + >> b32.bc
echo %hdirl%\zlib.lib + >> b32.bc
echo %hdirl%\hbzip.lib + >> b32.bc
echo %hdirl%\libmisc.lib + >> b32.bc
echo %hdirl%\tip.lib + >> b32.bc
echo %hdirl%\png.lib + >> b32.bc
rem echo %hdirl%\hbhpdf.lib + >> b32.bc
rem echo %hdirl%\libharu.lib + >> b32.bc
 
rem Uncomment these two lines to use Advantage RDD
rem echo %hdir%\lib\rddads.lib + >> b32.bc
rem echo %hdir%\lib\Ace32.lib + >> b32.bc
 
echo %bcdir%\lib\cw32.lib + >> b32.bc
echo %bcdir%\lib\import32.lib + >> b32.bc
echo %bcdir%\lib\uuid.lib + >> b32.bc
echo %bcdir%\lib\ws2_32.lib + >> b32.bc
 
echo %bcdir%\lib\psdk\odbc32.lib + >> b32.bc
echo %bcdir%\lib\psdk\rasapi32.lib + >> b32.bc
echo %bcdir%\lib\psdk\nddeapi.lib + >> b32.bc
echo %bcdir%\lib\psdk\msimg32.lib + >> b32.bc
echo %bcdir%\lib\psdk\psapi.lib + >> b32.bc
echo %bcdir%\lib\psdk\gdiplus.lib + >> b32.bc
echo %bcdir%\lib\psdk\iphlpapi.lib, >> b32.bc
 
IF EXIST %1.res echo %1.res >> b32.bc
 
rem uncomment this line to use the debugger and comment the following one
if %GT% == gtwin %bcdir%\bin\ilink32 -Gn -Tpe -s -v @b32.bc
IF ERRORLEVEL 1 GOTO LINKERROR
if %GT% == gtgui %bcdir%\bin\ilink32 -Gn -aa -Tpe -s -v @b32.bc
IF ERRORLEVEL 1 GOTO LINKERROR
ECHO * Application successfully built *
 
rem nuevo by Antonio Linares - 16/05/2013
rem mshta vbscript&#058;CreateObject("SAPI.SpVoice").Speak("Application successfully built")(Window.close)
mshta vbscript&#058;CreateObject("SAPI.SpVoice").Speak("Programa construido com sucesso")(Window.close)
 
%1
GOTO EXIT
ECHO
 
rem delete temporary files
@del %1.c
 
:COMPILEERRORS
@type comp.log
ECHO * Compile errors *
GOTO EXIT
 
:LINKERROR
ECHO * 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



[karinha]

Otro ejemplo, hay un error en C:\FWH..\SAMPLES\TSTBTNBM.PRG

Code: Select all  Expand view

Application
===========
   Path and name: C:\FWH1306\samples\TSTBTNBM.exe (32 bits)
   Size: 2,442,752 bytes
   Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20141206)
   FiveWin  Version: FWHX 13.05
   Windows version: 6.1, Build 7601 Service Pack 1

   Time from start: 0 hours 0 mins 5 secs
   Error occurred at: 12/10/14, 15:22:15
   Error description: Error FiveWin/3  Cannot create Dialog Box:
                      Resource: PRINC

Stack Calls
===========
   Called from: .\source\classes\DIALOG.PRG => CREATEDLGERROR( 539 )
   Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 277 )
   Called from: TSTBTNBM.prg => MAIN( 74 )
 

Porfa, compile y reporte para nosotros.

Solución:

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=29804

TSTBTNBM.RC

Code: Select all  Expand view

PRINC DIALOG -6, 13, 365, 311
STYLE WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX | WS_MAXIMIZEBOX
CAPTION "BitMap Buttons Test"
FONT 8, "MS Sans Serif"
{
 CONTROL "", 103, "TBtnBmp", 0 | WS_CHILD | WS_VISIBLE, 18, 97, 148, 38
 CONTROL "", 104, "TBtnBmp", 0 | WS_CHILD | WS_VISIBLE, 18, 146, 148, 32
 CONTROL "", 105, "TBtnBmp", 0 | WS_CHILD | WS_VISIBLE, 18, 188, 148, 32
 CONTROL "", 106, "TBtnBmp", 0 | WS_CHILD | WS_VISIBLE, 18, 230, 148, 32
 CONTROL "", 107, "TBtnBmp", 0 | WS_CHILD | WS_VISIBLE, 20, 271, 61, 30
 CONTROL "", 108, "TBtnBmp", 0 | WS_CHILD | WS_VISIBLE, 87, 271, 61, 31
 CONTROL "", 109, "TBtnBmp", 0 | WS_CHILD | WS_VISIBLE, 156, 272, 35, 30
}
 


Saludos.

[jose_murugosa]

Muchísimas gracias por tanta ayuda, voy a probar y reporto

La verdad aprecio mucho la gran voluntad de ayudar y la respuesta de este maravilloso foro.

Gracias João!!!!