From 8b2a589dc2c7e9ceb724d9cf80c8068d7f0d9c7e Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Mon, 13 Mar 2000 12:17:42 +0000 Subject: [PATCH] 20000313-13:20 GMT+1 Victor Szakats --- harbour/ChangeLog | 9 +++++++++ harbour/contrib/rdd_ads/adsfunc.c | 7 ++++--- harbour/contrib/rdd_ads/make_vc.bat | 5 +++++ harbour/contrib/rdd_ads/makefile.vc | 28 ++++++++++++++-------------- 4 files changed, 32 insertions(+), 17 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index ca1ee5ad32..2d03576cd1 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,12 @@ +20000313-13:20 GMT+1 Victor Szakats + * contrib/rdd_ads/adsfunc.c + ! Two casts added for MSVC. + * contrib/rdd_ads/make_vc.bat + + CVS ID added. + * contrib/rdd_ads/makefile.vc + % Streamlines and standardized. (use standard dir specs, create .c and + .obj files in central obj dir.) + 20000313-12:40 GMT+1 Victor Szakats * source/rtl/inkey.c ! Fixed to work with STD_GTAPI on Win32. diff --git a/harbour/contrib/rdd_ads/adsfunc.c b/harbour/contrib/rdd_ads/adsfunc.c index 4b5a6445f5..70e7830668 100644 --- a/harbour/contrib/rdd_ads/adsfunc.c +++ b/harbour/contrib/rdd_ads/adsfunc.c @@ -314,7 +314,7 @@ HARBOUR HB_ADSGETAOF( void ) { ulRetVal = AdsGetAOF( pArea->hTable, pucFilter, &pusLen ); if ( ulRetVal == AE_SUCCESS ) - hb_retc( pucFilter ); + hb_retc( ( char * ) pucFilter ); else hb_ret(); } @@ -350,7 +350,7 @@ HARBOUR HB_ADSGETAOFNOOPT( void ) if( pArea ) { AdsGetAOFOptLevel( pArea->hTable, &pusOptLevel, pucNonOpt, &pusLen ); - hb_retc( pucNonOpt ); + hb_retc( ( char * ) pucNonOpt ); } else hb_errRT_DBCMD( EG_NOTABLE, 2001, NULL, "ADSGETAOFNOOPT" ); @@ -412,4 +412,5 @@ HARBOUR HB_ADSSETAOF( void ) else hb_errRT_DBCMD( EG_NOTABLE, 2001, NULL, "ADSSETAOF" ); -} \ No newline at end of file +} + diff --git a/harbour/contrib/rdd_ads/make_vc.bat b/harbour/contrib/rdd_ads/make_vc.bat index ab59bd1160..dd23f098a7 100644 --- a/harbour/contrib/rdd_ads/make_vc.bat +++ b/harbour/contrib/rdd_ads/make_vc.bat @@ -1,4 +1,9 @@ @echo off +rem +rem $Id$ +rem + +:BUILD nmake /f makefile.vc %1 %2 %3 > make_vc.log if errorlevel 1 goto BUILD_ERR diff --git a/harbour/contrib/rdd_ads/makefile.vc b/harbour/contrib/rdd_ads/makefile.vc index 28a4e91f03..19a5af20f2 100644 --- a/harbour/contrib/rdd_ads/makefile.vc +++ b/harbour/contrib/rdd_ads/makefile.vc @@ -7,13 +7,16 @@ # INCLUDE_DIR=..\..\include +OBJ_DIR=..\..\obj\vc +LIB_DIR=..\..\lib\vc +BIN_DIR=..\..\bin\vc # # C compiler definition and C flags. These should never have to change. # CC=cl -CFLAGS=-W1 -nologo -I$(INCLUDE_DIR) -D_Windows -DHARBOUR_USE_WIN_GTAPI +CFLAGS=-W1 -nologo -I$(INCLUDE_DIR) -D_Windows CLIBFLAGS=$(CFLAGS) -c /TP CLIBFLAGSDEBUG=$(CFLAGS) -c -Zi /TP @@ -21,8 +24,8 @@ CLIBFLAGSDEBUG=$(CFLAGS) -c -Zi /TP # Macros to access our library names # -ADS_LIB=..\..\lib\vc\rddads.lib -HARBOUR_EXE=..\..\bin\harbour.exe +ADS_LIB=$(LIB_DIR)\rddads.lib +HARBOUR_EXE=$(BIN_DIR)\harbour.exe HARBOURFLAGS=-iinclude -n -q0 -w -es2 -gc0 @@ -31,9 +34,9 @@ HARBOURFLAGS=-iinclude -n -q0 -w -es2 -gc0 # ADS_LIB_OBJS = \ - ads0.obj \ - ads1.obj \ - adsfunc.obj + $(OBJ_DIR)\ads0.obj \ + $(OBJ_DIR)\ads1.obj \ + $(OBJ_DIR)\adsfunc.obj # # Our default target @@ -48,20 +51,17 @@ all: $(ADS_LIB) $(ADS_LIB) : $(ADS_LIB_OBJS) lib /OUT:$(ADS_LIB) $(ADS_LIB_OBJS) - # # ADS dependencies # -ads0.c : ads0.prg - $(HARBOUR_EXE) $** $(HARBOURFLAGS) -o$@ +$(OBJ_DIR)\ads0.obj : ads0.prg + $(HARBOUR_EXE) $** $(HARBOURFLAGS) -o$*.c + $(CC) $(CLIBFLAGS) -Fo$@ $*.c -ads0.obj : ads0.c +$(OBJ_DIR)\adsfunc.obj : adsfunc.c $(CC) $(CLIBFLAGS) -Fo$@ $** -adsfunc.obj : adsfunc.c - $(CC) $(CLIBFLAGS) -Fo$@ $** - -ads1.obj : ads1.c +$(OBJ_DIR)\ads1.obj : ads1.c $(CC) $(CLIBFLAGS) -Fo$@ $**