From f7b9fc4ae67a71339fe2e79ce02beecff2b3fefd Mon Sep 17 00:00:00 2001 From: "David G. Holm" Date: Fri, 3 Sep 1999 23:48:42 +0000 Subject: [PATCH] See ChangeLog entry 19990903-19:35 EDT David G. Holm --- harbour/ChangeLog | 7 +++++++ harbour/source/rtl/console.c | 3 ++- harbour/source/rtl/filesys.c | 2 ++ 3 files changed, 11 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index b6956d9759..409b551cc7 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,10 @@ +19990903-19:35 EDT David G. Holm + * source/rtl/console.c + ! Added #ifdef HARBOUR_USE_GTAPI/#endif around use of GT API + functions in the new HB_SETPOSBS() function. + * source/rtl/filesys.c + ! Added #defines for _getdisk and _chdisk for DJGPP. + 19990903-19:00 GMT+1 Victor Szel * source/itemapi.c include/itemapi.h diff --git a/harbour/source/rtl/console.c b/harbour/source/rtl/console.c index b199c8fbf7..57052121de 100644 --- a/harbour/source/rtl/console.c +++ b/harbour/source/rtl/console.c @@ -583,9 +583,10 @@ HARBOUR HB_SETPOSBS( void ) USHORT uiCol; /* NOTE: Clipper does no checks about reaching the border or anything */ - +#ifdef HARBOUR_USE_GTAPI hb_gtGetPos( &uiRow, &uiCol ); hb_gtSetPos( uiRow, uiCol + 1 ); +#endif } else hb_errRT_BASE( EG_ARGCOUNT, 3000, NULL, "SETPOSBS" ); /* NOTE: Clipper catches this at compile time! */ diff --git a/harbour/source/rtl/filesys.c b/harbour/source/rtl/filesys.c index 46d4671793..25cab58e36 100644 --- a/harbour/source/rtl/filesys.c +++ b/harbour/source/rtl/filesys.c @@ -60,6 +60,8 @@ #endif #if defined(__DJGPP__) #include + #define _getdrive getdisk + #define _chdrive setdisk #endif #if !defined(HAVE_POSIX_IO)