From edc33edcfdd7cb55a98102050d07ea5f16e30e73 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Tue, 1 Jul 2008 18:49:47 +0000 Subject: [PATCH] 2008-07-01 20:48 UTC+0200 Viktor Szakats (harbour.01 syenar hu) * source/vm/extrap.c ! Fixed MSVC error in new code. --- harbour/ChangeLog | 4 ++++ harbour/source/vm/extrap.c | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 85e9dd2629..2eb1c12de2 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,10 @@ 2008-12-31 13:59 UTC+0100 Foo Bar */ +2008-07-01 20:48 UTC+0200 Viktor Szakats (harbour.01 syenar hu) + * source/vm/extrap.c + ! Fixed MSVC error in new code. + 2008-07-01 19:05 UTC+0200 Viktor Szakats (harbour.01 syenar hu) * doc/whatsnew.txt + Added RC2 changes. diff --git a/harbour/source/vm/extrap.c b/harbour/source/vm/extrap.c index e911ce135f..5af534d702 100644 --- a/harbour/source/vm/extrap.c +++ b/harbour/source/vm/extrap.c @@ -129,7 +129,7 @@ LONG WINAPI hb_win32ExceptionHandler( struct _EXCEPTION_POINTERS * pExceptionInf ( UINT32 ) pCtx->EFlags ); hb_strncat( errmsg, " CS:EIP:", errmsglen ); - pc = ( void * ) pCtx->Eip; + pc = ( unsigned char * ) pCtx->Eip; for( i = 0; i < 16; i++ ) { if( IsBadReadPtr( pc, 1 ) ) @@ -138,7 +138,7 @@ LONG WINAPI hb_win32ExceptionHandler( struct _EXCEPTION_POINTERS * pExceptionInf hb_strncat( errmsg, buf, errmsglen ); } hb_strncat( errmsg, "\n SS:ESP:", errmsglen ); - sc = ( void * ) pCtx->Esp; + sc = ( unsigned int * ) pCtx->Esp; for( i = 0; i < 16; i++ ) { if( IsBadReadPtr( sc, 4 ) )