From af1de815a45c8d9b019fa22e904e626760196182 Mon Sep 17 00:00:00 2001 From: "Alexander S.Kresin" Date: Mon, 4 Feb 2002 10:03:08 +0000 Subject: [PATCH] 2002-02-04 13:12 UTC+0300 Alexander Kresin --- harbour/ChangeLog | 4 ++++ harbour/source/vm/runner.c | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index bfc5e7c85d..f3e6d4f5e8 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -7,6 +7,10 @@ For example: 2002-12-01 23:12 UTC+0100 Foo Bar */ + * Fix for hb_dbfGoTo(), posted by Horacio Roldˇn + +2002-02-04 16:45 UTC+0100 Ignacio Ortiz + * source/rtl/Tget.prg * source/rtl/Tgetlist.prg * Minor modifications proposed by Walter Negro diff --git a/harbour/source/vm/runner.c b/harbour/source/vm/runner.c index 56972dfe24..a21918953e 100644 --- a/harbour/source/vm/runner.c +++ b/harbour/source/vm/runner.c @@ -507,13 +507,13 @@ static ULONG hb_hrbFindSymbol( char * szName, PHB_DYNF pDynFunc, ULONG ulLoaded static int hb_hrbFileReadHead( FILE * file, char * szFileName ) { - char szHead[] = { '\192','H','R','B' }, szBuf[4]; + unsigned char szHead[] = { (unsigned char)192,'H','R','B' }, szBuf[4]; char cInt[ 2 ]; HB_TRACE(HB_TR_DEBUG, ("hb_hrbFileReadHead(%p)", file )); hb_hrbFileRead( file, szFileName, szBuf, 1, 4 ); - if( !strncmp( szHead,szBuf,4 ) ) + if( strncmp( szHead,szBuf,4 ) ) { hb_errRT_BASE_Ext1( EG_CORRUPTION, 9999, NULL, szFileName, 0, EF_CANDEFAULT, 1, hb_paramError( 1 ) ); return 0;