From 756cb0912add9a432881f12e87e988d152af6832 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Tue, 1 Aug 2000 19:07:01 +0000 Subject: [PATCH] 2000-08-01 21:03 UTC+0100 Victor Szakats --- harbour/ChangeLog | 6 ++++++ harbour/source/common/hbver.c | 24 +++++++++++++++++++++++- 2 files changed, 29 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 036fcc368d..4a53b93966 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,9 @@ +2000-08-01 21:03 UTC+0100 Victor Szakats + + * 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 * source/common/hbver.c ! fixed sprintf() warnings for OS/2 and removed revision number since it is always 0. diff --git a/harbour/source/common/hbver.c b/harbour/source/common/hbver.c index c43930c2c5..0f59ea7cdb 100644 --- a/harbour/source/common/hbver.c +++ b/harbour/source/common/hbver.c @@ -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 );