From 122ad87dc2d783e729748fa03698e9043dd9989a Mon Sep 17 00:00:00 2001
From: Paul Tucker <ptucker@sympatico.ca>
Date: Sun, 25 Jul 1999 20:53:56 +0000
Subject: [PATCH] *** empty log message ***

---
 harbour/ChangeLog            |  9 +++++++++
 harbour/source/rdd/dbcmd.c   | 10 +++++-----
 harbour/source/rdd/dbfntx1.c |  3 ++-
 3 files changed, 16 insertions(+), 6 deletions(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 267a7faf24..f363a9dd80 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,12 @@
+19990724-21:20 EDT Paul Tucker <ptucker@sympatico.ca>
+   * source/rdd/dbcmd.c
+     * added type casts mostly on xgrab calls
+   * source/rdd/dbfntx0.c
+     * commented out 1 assignment, as uiCount
+       is not pointing at anything.
+   * makefile.vc
+     + added additional rdd support
+
 19990725-19:47 GMT+1 Bruno Cantero <bruno@issnet.net>
    + include/rddsys.ch, source/rdd/dbfntx0.prg, source/rdd/dbfntx1.c
      Skeleton for DBFNTX functions
diff --git a/harbour/source/rdd/dbcmd.c b/harbour/source/rdd/dbcmd.c
index 83ad86f840..d1c0825217 100644
--- a/harbour/source/rdd/dbcmd.c
+++ b/harbour/source/rdd/dbcmd.c
@@ -145,7 +145,7 @@ static BOOL hb_rddRegister( char * szDriver, USHORT uiType )
 	 return 0;
    }
 
-   szGetFuncTable = hb_xgrab( strlen( szDriver ) + 14 );
+   szGetFuncTable = (char *)hb_xgrab( strlen( szDriver ) + 14 );
    strcpy( szGetFuncTable, szDriver );
    strcat( szGetFuncTable, "_GETFUNCTABLE" );
    pGetFuncTable = hb_FindDynSym( szGetFuncTable );
@@ -154,9 +154,9 @@ static BOOL hb_rddRegister( char * szDriver, USHORT uiType )
    if( !pGetFuncTable )
       return 0;
    if( !pRDDList )
-      pRDDList = hb_xgrab( sizeof( RDDNODE ) );
+      pRDDList = (PRDDNODE)hb_xgrab( sizeof( RDDNODE ) );
    else
-      pRDDList = hb_xrealloc( pRDDList, sizeof( RDDNODE ) * ( uiRDDCount + 1 ) );
+      pRDDList = (PRDDNODE)hb_xrealloc( pRDDList, sizeof( RDDNODE ) * ( uiRDDCount + 1 ) );
 
    pList = pRDDList + ( sizeof( RDDNODE ) * uiRDDCount );
    strcpy( pList->szName, szDriver );
@@ -375,8 +375,8 @@ HARBOUR HB_DBUSEAREA( void )
    szAlias = ISCHAR( 4 ) ? hb_parc( 4 ) : szFileName;
 
    pInfo.uiArea = uiCurrArea;
-   pInfo.abName = szFileName;
-   pInfo.atomAlias = szAlias;
+   pInfo.abName = (PBYTE)szFileName;
+   pInfo.atomAlias = (PBYTE)szAlias;
    pInfo.fShared = ISLOG( 5 ) ? hb_parl( 5 ) : !hb_set.HB_SET_EXCLUSIVE;
    pInfo.fReadonly = ISLOG( 6 ) ? hb_parl( 6 ) : FALSE;
    ( * pFunction )( &pWorkAreas[ uiCurrArea - 1 ], &pInfo );
diff --git a/harbour/source/rdd/dbfntx1.c b/harbour/source/rdd/dbfntx1.c
index bc1e8b6a8d..eb6ab48277 100644
--- a/harbour/source/rdd/dbfntx1.c
+++ b/harbour/source/rdd/dbfntx1.c
@@ -104,7 +104,8 @@ HARBOUR HB_DBFNTX_GETFUNCTABLE( void )
 {
    USHORT * uiCount;
    RDDFUNCS * pTable;
-   *uiCount = RDDFUNCSCOUNT;
+
+/*    *uiCount = RDDFUNCSCOUNT; */
 
    uiCount = ( USHORT * ) hb_parnl( 1 );
    pTable = ( RDDFUNCS * ) hb_parnl( 2 );