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

See ChangeLog entry 2002-01-14 19:15 UTC-0500 David G. Holm <dholm@jsd-llc.com>

Browse Source
This commit is contained in:
David G. Holm
2002-01-15 00:21:16 +00:00
parent 9675c004f1
commit 6cabe42b51
10 changed files with 38 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
harbour/ChangeLog
View File

@@ -7,6 +7,25 @@
For example:
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
* contrib/rdd_ads/ads1.c
* Added virtual method adsExit() with a call of AdsApplicationExit()
2002-01-15 20:40 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
* source/pp/ppcore.c
! bug fixed, reported by Juan Agustin Barriga
2002-01-15 11:25 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
* source/rdd/dbfntx/dbfntx1.c
! bug fixed, reported by Wilson 'W' Gamboa A ( indexing of an empty dbf )
2002-01-14 21:53 UTC-0500 Paul Tucker <ptucker@sympatico.ca>
* source\common\hbffind.c
* replaced 3 literals with proper defines
* minor formatting.
2002-01-14 21:32 UTC-0500 Paul Tucker <ptucker@sympatico.ca>
* source\rtl\direct.c
* updated default flags to include ReadOnly
2002-01-14 19:15 UTC-0500 David G. Holm <dholm@jsd-llc.com>
* contrib/libct/files.c

8
harbour/contrib/libct/files.c
View File

@@ -68,9 +68,9 @@ static struct ffblk fsOldFiles;
#define MAXGETHOSTNAME 256 /* should be enough for a host name */
#elif defined(HB_OS_DOS)
#elif defined(HB_OS_DOS) && !defined(__RSX32__)
#if defined(__DJGPP__) || defined(__RSX32__)
#if defined(__DJGPP__)
#include <sys/param.h>
#endif
#include "hb_io.h"
@@ -94,7 +94,7 @@ static HANDLE hLastFind;
static WIN32_FIND_DATA Lastff32;
LPTSTR GetDate(FILETIME *rTime);
LPTSTR GetTime(FILETIME *rTime);
#if !defined(_MSC_VER)
#if !defined(_MSC_VER) && !defined(__RSXNT__)
#include <dir.h>
#endif
#endif
@@ -705,7 +705,7 @@ HB_FUNC(FILETIME)
}
#if (defined(HB_OS_WIN_32) || defined(__MINGW32__)) && !defined(__CYGWIN__)
#if (defined(HB_OS_WIN_32) || defined(__MINGW32__)) && !defined(__CYGWIN__) && !defined(__RSXNT__)
#include <tchar.h>

6
harbour/contrib/libct/keyset.c
View File

@@ -63,6 +63,10 @@
#include "sys\farptr.h"
#elif defined(__MSC_VER)
#include "signal.h"
#elif defined(__BORLANDC__)
#ifndef FAR
#define FAR far /* Because FAR is not defined for Borland C 3.x */
#endif
#endif
static void SetGet( char cKey );
@@ -239,7 +243,7 @@ static void SetGet( char cKey )
#else
*( ( char FAR * ) MK_FP( 0x0040, 0x0017 ) ) = ( *( ( char FAR * ) MK_FP( 0x0040, 0x0017 ) ) & ( !cKey ) ) | cKey );
*( ( char FAR * ) MK_FP( 0x0040, 0x0017 ) ) = ( *( ( char FAR * ) MK_FP( 0x0040, 0x0017 ) ) & ( !cKey ) ) | cKey;
#endif
}

2
harbour/contrib/libgt/Makefile
View File

@@ -25,6 +25,6 @@ C_SOURCES=\
PRG_SOURCES=\
LIBNAME=libgt
LIBNAME=gt
include $(TOP)$(ROOT)config/lib.cf

2
harbour/contrib/libgt/makefile.bc
View File

@@ -77,7 +77,7 @@ LDFLAGS = $(LDFLAGS)
# Macros to access our library names
#
TOOLS_LIB = $(LIB_DIR)\libgt.lib
TOOLS_LIB = $(LIB_DIR)\gt.lib
HARBOUR_EXE = $(BIN_DIR)\harbour.exe

2
harbour/contrib/libgt/makefile.vc
View File

@@ -76,7 +76,7 @@ LDFLAGS = $(LDFLAGS)
# Macros to access our library names
#
TOOLS_LIB = $(LIB_DIR)\libgt.lib
TOOLS_LIB = $(LIB_DIR)\gt.lib
HARBOUR_EXE = $(BIN_DIR)\harbour.exe

4
harbour/source/common/hbffind.c
View File

@@ -71,6 +71,8 @@ HB_FILE_VER( "$Id$" )
#if defined(__DJGPP__) || defined(__RSX32__)
#include <sys/param.h>
#endif
#if defined(__DJGPP__) || defined(__RSX32__) || defined(__BORLANDC__)
#include <sys/stat.h>
#endif
#include <dos.h>
@@ -866,7 +868,7 @@ void hb_fsFindClose( PHB_FFIND ffind )
#if defined(HB_OS_DOS)
#if defined(__DJGPP__)
#if defined(__DJGPP__) || defined(__BORLANDC__)
{
HB_SYMBOL_UNUSED( info );
}

4
harbour/source/common/hbfhnd.c
View File

@@ -50,7 +50,7 @@
*
*/
#if defined(__BORLANDC__)
#if defined(HB_OS_WIN_32) && defined(__BORLANDC__)
#define ___NFILE_H
@@ -92,7 +92,7 @@ void hb_fhnd_ForceLink( void )
/* Intentionally do nothing */
};
#if defined(__BORLANDC__)
#if defined(HB_OS_WIN_32) && defined(__BORLANDC__)
#define _F_STDIN (_F_READ | _F_TERM | _F_LBUF)
#define _F_STDOUT (_F_WRIT | _F_TERM | _F_LBUF)

2
harbour/source/common/hbgete.c
View File

@@ -84,7 +84,7 @@ char * hb_getenv( const char * szName )
#elif defined(HB_OS_OS2)
{
PSZ EnvValue = "";
PCSZ EnvValue = "";
if( DosScanEnv( szName, &EnvValue ) == NO_ERROR )
{

2
harbour/source/rtl/filehb.c
View File

@@ -58,5 +58,5 @@
HB_FUNC( FILE )
{
hb_retl( ISCHAR( 1 ) ? hb_spFile( ( unsigned char * ) hb_parc( 1 ) ) : FALSE );
hb_retl( ISCHAR( 1 ) ? hb_spFile( ( BYTE * ) hb_parc( 1 ) ) : FALSE );
}