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

See ChangeLog entry 2000-01-21 14:05 GMT-5 David G. Holm <dholm@ sd-llc.com>

Browse Source
This commit is contained in:
David G. Holm
2000-01-21 19:06:13 +00:00
parent b35d519bd3
commit 51d83779a0
2 changed files with 9 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -1,3 +1,9 @@
2000-01-21 14:05 GMT-5 David G. Holm <dholm@ sd-llc.com>
* source/rtl/environ.c
! Fixed bug in setting end of string for case VER_PLATFORM_WIN32_WINDOWS:
! Put Windows support for MingW32 back in after accidentally removing it.
20000121-17:57 GMT+3 Alexander Kresin
* source/pp/hbpp.c
* now can be used truncated preprocessor directives ( #defi, #inclu, ... )

6
harbour/source/rtl/environ.c
View File

@@ -165,7 +165,7 @@ HARBOUR HB_OS( void )
/* TODO: add MSVC support but MSVC cannot detect any OS except Windows! */
#if defined(__TURBOC__) || defined(__BORLANDC__) || defined(_MSC_VER) || defined(__MINGW32__)
#if defined(_WINDOWS_)
#if defined(_WINDOWS_) || defined(__MINGW32__)
/* NOTE:
Support for determining the window version by Luiz Rafael Culik
@@ -210,7 +210,7 @@ HARBOUR HB_OS( void )
else
hb_os = "Windows";
strncpy( szBuild, osVer.szCSDVersion, sizeof( szBuild ) );
szBuild[ sizeof( szBuild ) ] = '\0';
szBuild[ sizeof( szBuild ) - 1 ] = '\0';
break;
case VER_PLATFORM_WIN32_NT:
@@ -363,7 +363,7 @@ HARBOUR HB_OS( void )
if( ! hb_os ) strcpy( version, "Unknown" );
else if( hb_osmajor == -1 ) strcpy( version, hb_os );
else if( hb_osmajor == -2 ) { /* NOP */ }
#ifdef _WINDOWS_
#if defined(_WINDOWS_) || defined(__MINGW32__)
else sprintf( version, cformat, hb_os, szBuild, hb_osmajor, hb_osminor, hb_osletter );
#else
else sprintf( version, cformat, hb_os, hb_osmajor, hb_osminor, hb_osletter );