2023-05-19 16:29 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* include/hbclass.ch
! fixed declaration stripping when HB_CLS_NO_DECLARATIONS is defined
* src/compiler/hbmain.c
! do not generate warnings for undeclared methods when -w[12] is used.
They should be emitted only for -w3 or higher (if any in the future).
Thanks to Toninho for the information about the problem.
This commit is contained in:
@@ -7,6 +7,15 @@
|
||||
Entries may not always be in chronological/commit order.
|
||||
See license at the end of file. */
|
||||
|
||||
2023-05-19 16:29 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
|
||||
* include/hbclass.ch
|
||||
! fixed declaration stripping when HB_CLS_NO_DECLARATIONS is defined
|
||||
|
||||
* src/compiler/hbmain.c
|
||||
! do not generate warnings for undeclared methods when -w[12] is used.
|
||||
They should be emitted only for -w3 or higher (if any in the future).
|
||||
Thanks to Toninho for the information about the problem.
|
||||
|
||||
2023-05-12 18:13 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
|
||||
* src/compiler/hbmain.c
|
||||
! fixed GPFs in dummy and never finished code for strong typing and message
|
||||
|
||||
@@ -139,8 +139,8 @@
|
||||
#xcommand _HB_CLASS <name> <name> =>
|
||||
#xcommand _HB_MEMBER <name> =>
|
||||
#xcommand DECLARE <*decl*> =>
|
||||
#xtranslate AS <type> =>
|
||||
#xtranslate AS CLASS <name> =>
|
||||
#xtranslate AS <!type!> =>
|
||||
#xtranslate AS CLASS <!name!> =>
|
||||
#endif
|
||||
|
||||
/* should we inherit from HBObject class by default ? */
|
||||
|
||||
@@ -1122,6 +1122,9 @@ PHB_HDECLARED hb_compMethodAdd( HB_COMP_DECL, PHB_HCLASS pClass, const char * sz
|
||||
{
|
||||
PHB_HDECLARED pMethod;
|
||||
|
||||
if( HB_COMP_PARAM->iWarnings < 3 )
|
||||
return NULL;
|
||||
|
||||
if( ! pClass )
|
||||
{
|
||||
char buffer[ 80 ];
|
||||
@@ -1137,9 +1140,6 @@ PHB_HDECLARED hb_compMethodAdd( HB_COMP_DECL, PHB_HCLASS pClass, const char * sz
|
||||
printf( "\nDeclaring Method: %s of Class: %s Pointer: %li\n", szMethodName, pClass->szName, pClass );
|
||||
#endif
|
||||
|
||||
if( HB_COMP_PARAM->iWarnings < 3 )
|
||||
return NULL;
|
||||
|
||||
if( ( pMethod = hb_compMethodFind( pClass, szMethodName ) ) != NULL )
|
||||
{
|
||||
hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_DUP_DECLARATION, "method", szMethodName );
|
||||
|
||||
Reference in New Issue
Block a user