fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Viktor Szakats
1999-08-01 20:24:40 +00:00
parent bb2f99132a
commit 71dc973e68
3 changed files with 10 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
harbour/ChangeLog
View File

@@ -1,3 +1,10 @@
19990801-21:58 GMT+1 Victor Szel <info@szelvesz.hu>
% source/rtl/descend.c
#include <ctype.h> removed
! source/compiler/harbour.y -
hb_INITSTATICS() -> HB_INITSTATICS() (case adjusted)
Change undone. Comment added to make this clear.
19990801-21:58 GMT+1 Bruno Cantero <bruno@issnet.net>
* source/rdd/dbcmd.c
Fixed a GPF with MSVC, thaks Paul

6
harbour/source/compiler/harbour.y
View File

@@ -2137,7 +2137,7 @@ void GenCCode( char *szFileName, char *szName ) /* generates the C languag
fprintf( yyc, "static " );
if( pFunc == _pInitFunc )
fprintf( yyc, "HARBOUR HB_INITSTATICS( void );\n" );
fprintf( yyc, "HARBOUR hb_INITSTATICS( void );\n" ); /* NOTE: hb_ intentionally in lower case */
else
fprintf( yyc, "HARBOUR HB_%s( void );\n", pFunc->szName );
pFunc = pFunc->pNext;
@@ -2170,7 +2170,7 @@ void GenCCode( char *szFileName, char *szName ) /* generates the C languag
* we are using these two bits to mark the special function used to
* initialize static variables
*/
fprintf( yyc, "{ \"(_INITSTATICS)\", FS_INIT | FS_EXIT, HB_INITSTATICS, 0}" );
fprintf( yyc, "{ \"(_INITSTATICS)\", FS_INIT | FS_EXIT, hb_INITSTATICS, 0}" ); /* NOTE: hb_ intentionally in lower case */
}
else
{
@@ -2224,7 +2224,7 @@ void GenCCode( char *szFileName, char *szName ) /* generates the C languag
fprintf( yyc, "static " );
if( pFunc == _pInitFunc ) /* Is it (_INITSTATICS) */
fprintf( yyc, "HARBOUR HB_INITSTATICS( void )\n{\n static BYTE pcode[] = { \n" );
fprintf( yyc, "HARBOUR hb_INITSTATICS( void )\n{\n static BYTE pcode[] = { \n" ); /* NOTE: hb_ intentionally in lower case */
else
fprintf( yyc, "HARBOUR HB_%s( void )\n{\n static BYTE pcode[] = { \n", pFunc->szName );

1
harbour/source/rtl/descend.c
View File

@@ -62,7 +62,6 @@
* $END$
*/
#include <ctype.h>
#include "extend.h"
#include "itemapi.h"
#include "init.h"