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

2001-04-18 17:40 UTC-0400 David G. Holm <dholm@jsd-llc.com>

Browse Source
This commit is contained in:
David G. Holm
2001-04-18 21:40:06 +00:00
parent f0cf1b5502
commit 625722055e
3 changed files with 20 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
harbour/ChangeLog
View File

@@ -1,3 +1,16 @@
2001-04-18 17:40 UTC-0400 David G. Holm <dholm@jsd-llc.com>
* source/rdd/dbf1.c
% Changed two (unsigned chr *) type overrides to (BYTE *),
because the function called requires a BYTE * parameter
when used with C++.
* source/rtl/gtos2/gtos2.c
% Changed two (void *) type overrides to (PPVOID), because
the function called requires a PPVOID parameter when used
with C++.
% Added definition for KBDTRF_EXTENDED_CODE when using VAC++.
2001-04-18 22:30 CET Martin Vogel <vogel@inttec.de>
+ contrib/libct/ctflist.txt
! function status list, only functions in the CVS are marked 'R' or 'S' !

4
harbour/source/rdd/dbf1.c
View File

@@ -2480,7 +2480,7 @@ ERRCODE hb_dbfDrop( PHB_ITEM pItemTable )
strcpy( (char *) szFileName, (char *) pBuffer );
if ( !strchr( szFileName, '.' ))
strcat( szFileName, DBF_TABLEEXT );
return hb_fsDelete( (unsigned char *) szFileName );
return hb_fsDelete( (BYTE *) szFileName );
}
/* returns 1 if exists, 0 else */
@@ -2493,7 +2493,7 @@ BOOL hb_dbfExists( PHB_ITEM pItemTable, PHB_ITEM pItemIndex )
strcpy( (char *) szFileName, (char *) pBuffer );
if ( pItemTable && !strchr( szFileName, '.' ))
strcat( szFileName, DBF_TABLEEXT );
return hb_fsFile( (unsigned char *) szFileName );
return hb_fsFile( (BYTE *) szFileName );
}

7
harbour/source/rtl/gtos2/gtos2.c
View File

@@ -105,6 +105,9 @@
#include <stdlib.h>
#else
#include <bsedos.h>
#ifndef KBDTRF_EXTENDED_CODE
#define KBDTRF_EXTENDED_CODE 0x02
#endif
#endif
#include <conio.h>
@@ -149,14 +152,14 @@ void hb_gt_Init( int iFilenoStdin, int iFilenoStdout, int iFilenoStderr )
}
/* Alloc tileable memory for calling a 16 subsystem */
rc = DosAllocMem((void *) &s_hk, sizeof(HKBD), PAG_COMMIT | OBJ_TILE | PAG_WRITE);
rc = DosAllocMem((PPVOID) &s_hk, sizeof(HKBD), PAG_COMMIT | OBJ_TILE | PAG_WRITE);
if (rc != NO_ERROR) {
hb_errInternal( HB_EI_XGRABALLOC, "hb_gt_ReadKey() memory allocation failure", NULL, NULL);
}
/* it is a long after all, so I set it to zero only one time since it never changes */
memset(s_hk, 0, sizeof(HKBD));
rc = DosAllocMem((void *) &s_key, sizeof(KBDKEYINFO), PAG_COMMIT | OBJ_TILE | PAG_WRITE);
rc = DosAllocMem((PPVOID) &s_key, sizeof(KBDKEYINFO), PAG_COMMIT | OBJ_TILE | PAG_WRITE);
if (rc != NO_ERROR) {
hb_errInternal( HB_EI_XGRABALLOC, "hb_gt_ReadKey() memory allocation failure", NULL, NULL);
}