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

2000-08-01 21:03 UTC+0100 Victor Szakats <info@szelvesz.hu>

Browse Source
This commit is contained in:
Viktor Szakats
2000-08-01 19:07:01 +00:00
parent 4001919af0
commit 756cb0912a
2 changed files with 29 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -1,3 +1,9 @@
2000-08-01 21:03 UTC+0100 Victor Szakats <info@szelvesz.hu>
* source/common/hbver.c
+ Added CPP info to the build info page.
+ Added 16bit vs 32bit to the Borland compiler info.
20000801-19:28 GMT+2 Maurilio Longo <maurilio.longo@libero.it>
* source/common/hbver.c
! fixed sprintf() warnings for OS/2 and removed revision number since it is always 0.

24
harbour/source/common/hbver.c
View File

@@ -161,7 +161,7 @@ char * hb_verPlatform( void )
if( rc == 0 )
sprintf( pszPlatform, "OS/2 %ld.%02ld",
aulQSV[ QSV_VERSION_MAJOR ] / 10,
aulQSV[ QSV_VERSION_MINOR ]);
aulQSV[ QSV_VERSION_MINOR ] );
else
sprintf( pszPlatform, "OS/2" );
}
@@ -373,6 +373,20 @@ char * hb_verCompiler( void )
strcat( pszCompiler, szSub );
}
#elif defined(__BORLANDC__)
{
switch( sizeof( int ) )
{
case 2:
strcat( pszCompiler, " (16 bit)" );
break;
case 4:
strcat( pszCompiler, " (32 bit)" );
break;
}
}
#endif
return pszCompiler;
@@ -515,6 +529,14 @@ void hb_verBuildInfo( void )
#endif
hb_conOutErr( hb_conNewLine(), 0 );
hb_conOutErr( "C++ mode: ", 0 );
#if defined(__cplusplus)
hb_conOutErr( "On", 0 );
#else
hb_conOutErr( "Off", 0 );
#endif
hb_conOutErr( hb_conNewLine(), 0 );
hb_conOutErr( "Compiler YACC debug mode: ", 0 );
#if defined( HARBOUR_YYDEBUG )
hb_conOutErr( "On", 0 );