Minor type casting fix for MSVC

harbour/ChangeLog

@@ -8,6 +8,11 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2003-03-27 18:35 UTC+0100 Antonio Linares <alinares@fivetechsoft.com>
+  * source/rdd/dbcmd.c
+  * contrib/rdd_ads/adsfunc.c
+    * Minor type casting fixes for MSVC
+
 2003-03-26 16:55 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
   * source/rdd/dbcmd.c
     ! Bug fixed related to COPY TO .. FIELDS ..., reported by Lorenzo Fiorini
@@ -30,9 +35,9 @@
     + Added RDD test, contributed by Randy Portnoff <randy@palmasdev.com>
 
 2003-03-25 16:46 UTC+0100 Martin Vogel <vogel@inttec.de>
-  * contrib/libct/dattime2.prg	
+  * contrib/libct/dattime2.prg
     * bug fix in function addmonth()
-	
+
 2003-03-24 15:35 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
   * source/rdd/dbcmd.c
     ! bug fixed with improper using of hb_strUpper() - reported by Lorenzo Fiorini

harbour/contrib/rdd_ads/adsfunc.c

@@ -1291,7 +1291,7 @@ HB_FUNC( ADSROLLBACKTRANSACTION )
 
 HB_FUNC( ADSFAILEDTRANSACTIONRECOVERY )
 {
-   hb_retnl( AdsFailedTransactionRecovery( (ISCHAR(1))? hb_parc(1) : NULL ) );
+   hb_retnl( AdsFailedTransactionRecovery( (ISCHAR(1))? ( unsigned char * ) hb_parc(1) : NULL ) );
 }
 
 HB_FUNC( ADSINTRANSACTION )
@@ -1362,4 +1362,4 @@ HB_FUNC(ADSUSEDICTIONARY)
    hb_retl(bOld);
 }
 
-#endif
+#endif

harbour/source/rdd/dbcmd.c

@@ -3603,7 +3603,7 @@ static LPAREANODE GetTheOtherArea( char *szDriver, char * szFileName, BOOL creat
        USHORT i;
        int iLen;
        char *ptr;
-       char *szFieldName = hb_xgrab( ((AREAP) s_pCurrArea->pArea)->uiMaxFieldNameLength+1 );
+       char *szFieldName = ( char * ) hb_xgrab( ((AREAP) s_pCurrArea->pArea)->uiMaxFieldNameLength+1 );
 
        uiFields = ( USHORT ) hb_arrayLen( pFields );
        for ( i=0; i<uiFields; i++ )
@@ -3867,4 +3867,4 @@ HB_FUNC( __DBCOPY )
                      hb_parl( 7 ),                /* Rest */ /* Defaults to zero on bad type */
                      ISCHAR( 8 ) ? hb_parc( 8 ) : NULL ); /* RDD */
   }
-}
+}