FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582

Posted: Thu May 27, 2010 06:22 AM

viewtopic.php?p=99125#p99125

regards, saludos

Antonio Linares
www.fivetechsoft.com
Patricio Avalos Aguirre
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM

Re: Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582

Posted: Thu May 27, 2010 02:19 PM
Hola

Faltan los archivos de ADS

ads.ch
rddAds.Lib
Ace32.Lib

Copie estos archivo desde el xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406)
pero no funcionan, un campo de 10 caracteres lo muestra como si fuera de 367 caracteres

alguien puede subir estos archivos

lo otro que al compilar FastReport salen estos warning o errorres

Code (fw): Select all Collapse
HB_FUNC( CALL_PROC_C )
{
聽 聽proc_C CurProc = (proc_C)hb_parnl(1);
聽 聽CurProc(hb_parc(2)); //linea 82
}

HB_FUNC( CALL_PROC_IC )
{
聽 聽proc_IC CurProc = (proc_IC)hb_parnl(1);
聽 聽CurProc(hb_parnl(2), hb_parc(3)); 聽//linea 88
}



Code (fw): Select all Collapse
Borland C++ 5.82 for Win32 Copyright (c) 1993, 2005 Borland
obj\FastRepH.c:
Warning W8075 .\\FastRepH.PRG 82: Suspicious pointer conversion in function HB_F
UN_CALL_PROC_C
Warning W8075 .\\FastRepH.PRG 88: Suspicious pointer conversion in function HB_F
UN_CALL_PROC_IC
Warning W8075 .\\FastRepH.PRG 94: Suspicious pointer conversion in function HB_F
UN_CALL_PROC_CC
Warning W8075 .\\FastRepH.PRG 100: Suspicious pointer conversion in function HB_
FUN_CALL_PROC_CCC
Warning W8075 .\\FastRepH.PRG 126: Suspicious pointer conversion in function HB_
FUN_CALL_FUNC_C_I
Warning W8075 .\\FastRepH.PRG 138: Suspicious pointer conversion in function HB_
FUN_CALL_FUNC_IC_I
Warning W8075 .\\FastRepH.PRG 144: Suspicious pointer conversion in function HB_
FUN_CALL_FUNC_CC_I
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582

Posted: Thu May 27, 2010 07:48 PM
Patricio,

Vuelve a descargar xHarbour desde el enlace que hemos proporcionado, que ya incluye las librerias y ch para ADS.

Puedes mirar en los ficheros de cabecera de FastReport como est谩 definido proc_C y proc_IC ? Copia aqui sus definiciones, gracias

Para construir las librerias de ADS hemos usado este batch:
Code (fw): Select all Collapse
set HB_DIR_ADS=c:\Program Files\Advantage 9.10\acesdk
set path=c:\bcc582\bin;c:\windows
make_b32.bat
regards, saludos

Antonio Linares
www.fivetechsoft.com
Patricio Avalos Aguirre
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM

Re: Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582

Posted: Thu May 27, 2010 10:32 PM
ADJUNTO LO SOLICITADO

Code (fw): Select all Collapse
#pragma BEGINDUMP

#include "windows.h"
#include "hbapiitm.h"
#include "hbvm.h"
#include "hbapirdd.h"
#include "hbxvm.h"

typedef void *pointer;

typedef void (*proc_)(void);
typedef void (*proc_I)(long param1);
typedef void (*proc_IP) (int funcnum, pointer adr);
typedef void (*proc_C)(char * param);
typedef void (*proc_IC)(int param1, char * param2);
typedef void (*proc_CC)(char * param1, char * param2);
typedef void (*proc_CCC)(char * param1, char * param2, char * param3);
typedef void (*proc_IIII)(long param1, long param2, long param3, long param4);

typedef LONG (*func__I)(void);
typedef LONG (*func_I_I)(long param);
typedef LONG (*func_C_I)(char * param);
typedef LONG (*func_II_I)(long param1, long param2);
typedef LONG (*func_IC_I)(long param1, char * param2);
typedef LONG (*func_CC_I)(char * param1, char * param2);
typedef LONG (*func_CCC_I)(char * param1, char * param2, char * param3);
typedef LONG (*func_CCI_I)(char * param1, char * param2, long param3);
typedef LONG (*func_III_I)(long param1, long param2, long param3);
typedef LONG (*func_CIII_I)(char * param1, long param2, long param3, long param4);

typedef LONG (*func_CICCCCCCCC_I)(char * param1, long param2, char * param3, char * param4, char * param5,
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 char * param6, char * param7, char * param8, char * param9, char * param10);

int TmpGetWA( AREAP area, void * ptr);
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582

Posted: Thu May 27, 2010 11:01 PM
Patricio,

Prueba asi:
Code (fw): Select all Collapse
HB_FUNC( CALL_PROC_C )
{
   proc_C CurProc = (proc_C)hb_parnl(1);
   CurProc((char *)hb_parc(2)); //linea 82
}

HB_FUNC( CALL_PROC_IC )
{
   proc_IC CurProc = (proc_IC)hb_parnl(1);
   CurProc(hb_parnl(2), (char *)hb_parc(3));  //linea 88
}
regards, saludos

Antonio Linares
www.fivetechsoft.com
Patricio Avalos Aguirre
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM

Re: Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582

Posted: Fri May 28, 2010 02:59 PM
Gracias Antonio

he cambiado todo lo que dice hb_parc(?) por (char *)hb_parc(?)

ya no salen los warning

Code (fw): Select all Collapse
HB_FUNC( CALL_FUNC_CICCCCCCCC_I )
{
聽 聽func_CICCCCCCCC_I CurFunc = (func_CICCCCCCCC_I)hb_parnl(1);
聽 聽hb_retnl(CurFunc((char *)hb_parc(2), hb_parnl(3), (char *)hb_parc(4), (char *)hb_parc(5), (char *)hb_parc(6), (char *)hb_parc(7), (char *)hb_parc(8),
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 (char *)hb_parc(9), (char *)hb_parc(10), (char *)hb_parc(11)));
}
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Nuevo xHarbour 1.2.1 revisi贸n 6714 para Borland C 582

Posted: Fri May 28, 2010 04:36 PM

Patricio,

Si, correcto.

Es que ahora hb_parc() est谩 definido como que devuelve un "const char " cuando habitualmente devolv铆a "char ", de hay que haga falta el "casting" (cambio de tipo).

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions