FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour xHarbour y reporte de errores del compilador
jose_murugosa
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
xHarbour y reporte de errores del compilador
Posted: Tue Dec 09, 2014 04:14 PM

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 :)

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: xHarbour y reporte de errores del compilador
Posted: Tue Dec 09, 2014 04:18 PM

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

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
jose_murugosa
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: xHarbour y reporte de errores del compilador
Posted: Tue Dec 09, 2014 04:48 PM
karinha wrote:Cual és el FLAG de compilación? /M/N ó otro?

Saludos.



Gracias por tu respuesta!!!!

Este es el flag:

/n /m /es2 /gc1
Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: xHarbour y reporte de errores del compilador
Posted: Tue Dec 09, 2014 05:24 PM
Acá esta funcionando normal con la ultima versión 20141206, mira:
Code (fw): Select all Collapse
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.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
jose_murugosa
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 09:06 AM

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 :)

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
cnavarro
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 09:08 AM

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

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
jose_murugosa
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 12:49 PM
cnavarro wrote: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 :-)
Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
hmpaquito
Posts: 1515
Joined: Thu Oct 30, 2008 02:37 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 01:10 PM

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

karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 01:18 PM
Intenta asi:

Code (fw): Select all Collapse
/m/n/gc0
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
jose_murugosa
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 04:41 PM
karinha wrote:Intenta asi:

Code (fw): Select all Collapse
/m/n/gc0



Gracias nuevamente, probé y nada :-) sigue igual

Sigo haciendo otras pruebas ...
Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 04:54 PM
Hola, que usas para compilar un CX.BAT y un CX.LNK por ejemplo? muestra el CX.LNK

Ejemplo:

Code (fw): Select all Collapse
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.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 05:00 PM
Mira se tu carpeta de xHb\bin esta asi:

Code (fw): Select all Collapse
 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.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 05:04 PM
BUILDX.BAT

Code (fw): Select all Collapse
@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:CreateObject("SAPI.SpVoice").Speak("Application successfully built")(Window.close)
mshta vbscript: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


João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: xHarbour y reporte de errores del compilador
Posted: Wed Dec 10, 2014 05:27 PM
Otro ejemplo, hay un error en C:\FWH..\SAMPLES\TSTBTNBM.PRG

Code (fw): Select all Collapse
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 (fw): Select all Collapse
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.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
jose_murugosa
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: xHarbour y reporte de errores del compilador
Posted: Thu Dec 11, 2014 08:44 AM

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!!!! :D

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
Static archive · New replies & topics via GitHub Discussions