diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 5f860c4cc0..c4b68beab3 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,10 @@ 2008-12-31 13:59 UTC+0100 Foo Bar */ +2008-08-07 15:06 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) + * harbour/contrib/gtwvg/wvgutils.c + ! fixed OpenWatcom compilation + 2008-08-07 14:58 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/harbour-ce-spec * harbour/harbour-w32-spec diff --git a/harbour/contrib/gtwvg/wvgutils.c b/harbour/contrib/gtwvg/wvgutils.c index 219ac9f3f6..dc187e18ac 100644 --- a/harbour/contrib/gtwvg/wvgutils.c +++ b/harbour/contrib/gtwvg/wvgutils.c @@ -600,7 +600,12 @@ HB_FUNC( WVT_SETPOINTER ) break; } +#if !defined(HB_ARCH_64BIT) && ( defined( __WATCOMC__ ) || \ + ( defined(_MSC_VER) && ( _MSC_VER <= 1200 || defined(HB_WINCE) ) ) ) + SetClassLong( _s->hWnd, GCLP_HCURSOR, ( DWORD ) hCursor ); +#else SetClassLongPtr( _s->hWnd, GCLP_HCURSOR, ( LONG_PTR ) hCursor ); +#endif } //-------------------------------------------------------------------//