From 3c1d3769035b8f9ba258bf0eb2f0da18425f3376 Mon Sep 17 00:00:00 2001 From: "Gonzalo A. Diethelm" Date: Mon, 9 Aug 1999 16:09:24 +0000 Subject: [PATCH] ChangeLogTag:Mon Aug 09 11:53:18 1999 Gonzalo A. Diethelm --- harbour/ChangeLog | 10 ++++++++++ harbour/source/Makefile | 2 +- harbour/source/hbpp/hbpp.c | 4 ++-- harbour/source/rtl/filesys.c | 3 +++ harbour/source/runner/runner.c | 2 +- 5 files changed, 17 insertions(+), 4 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 6bc1cd277f..926a63eb57 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,13 @@ +Mon Aug 09 11:53:18 1999 Gonzalo A. Diethelm + + * source/Makefile: + Moved the debug directory after rdd. + + * source/hbpp/hbpp.c: + * source/rtl/filesys.c: + * source/runner/runner.c: + Got rid of several warnings. + 199908.09-15:24 GMT+3 Alexander Kresin * source/hbpp/hbpp.c * fixed problem with new DATA implementation diff --git a/harbour/source/Makefile b/harbour/source/Makefile index e227135ad8..001f81af5f 100644 --- a/harbour/source/Makefile +++ b/harbour/source/Makefile @@ -7,10 +7,10 @@ ROOT = ../ DIRS=\ hbpp \ compiler \ - debug \ rtl \ vm \ rdd \ + debug \ tools \ runner \ diff --git a/harbour/source/hbpp/hbpp.c b/harbour/source/hbpp/hbpp.c index 76bb4e66a6..d5c3432a10 100644 --- a/harbour/source/hbpp/hbpp.c +++ b/harbour/source/hbpp/hbpp.c @@ -377,7 +377,7 @@ void ParseCommand( char* sLine, int com_or_xcom, int com_or_tra ) char cmdname[MAX_NAME]; COMMANDS *stcmd; int mlen,rlen; - int ipos, rez; + int ipos; NextWord( &sLine, cmdname, FALSE ); stroupper( cmdname ); @@ -1854,4 +1854,4 @@ BOOL OpenInclude( char * szFileName, PATHNAMES *pSearch, FILE** fptr, BOOL bStan } return ( *fptr ? TRUE : FALSE ); -} \ No newline at end of file +} diff --git a/harbour/source/rtl/filesys.c b/harbour/source/rtl/filesys.c index b59c614cad..6c3ed4a4f5 100644 --- a/harbour/source/rtl/filesys.c +++ b/harbour/source/rtl/filesys.c @@ -412,7 +412,10 @@ BOOL hb_fsLock ( FHANDLE handle, ULONG start, ULONG length, USHORT mode ) { int result=0; + +#if defined(_MSC_VER) ULONG position; +#endif #if defined(HAVE_POSIX_IO) && !defined(__GNUC__) && !defined(__IBMCPP__) errno = 0; diff --git a/harbour/source/runner/runner.c b/harbour/source/runner/runner.c index 968cdf76ee..1c2db9c676 100644 --- a/harbour/source/runner/runner.c +++ b/harbour/source/runner/runner.c @@ -142,7 +142,7 @@ HARBOUR HB_MAIN( void ) { pSymRead[ ul ].szName = ReadId( file ); pSymRead[ ul ].cScope = ReadByte( file ); - pSymRead[ ul ].pFunPtr = ( PHB_FUNC ) ReadByte( file ); + pSymRead[ ul ].pFunPtr = ( PHB_FUNC ) (ULONG) ReadByte( file ); pSymRead[ ul ].pDynSym = NULL; }