From ba32c1fa9d67ee1bfe53ba7aed1ee9e161761e15 Mon Sep 17 00:00:00 2001
From: Viktor Szakats <harbour@syenar.net>
Date: Wed, 3 May 2000 20:39:41 +0000
Subject: [PATCH] 20000503-22:43 GMT+1 Victor Szakats <info@szelvesz.hu>

---
 harbour/ChangeLog            | 5 +++++
 harbour/source/rtl/filesys.c | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 7f0e5951d9..2e88c2de4a 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,8 @@
+20000503-22:43 GMT+1 Victor Szakats <info@szelvesz.hu>
+
+   * source/rtl/filesys.c
+     ! Cast added for MSVC.
+
 20000503-01:45 GMT-8 Ron Pinkas <Ron@Profit-Master.com>
 
    * include/hberrors.h
diff --git a/harbour/source/rtl/filesys.c b/harbour/source/rtl/filesys.c
index 8638f65591..b58076d45c 100644
--- a/harbour/source/rtl/filesys.c
+++ b/harbour/source/rtl/filesys.c
@@ -1181,7 +1181,7 @@ USHORT  hb_fsCurDirBuff( USHORT uiDrive, BYTE * pbyBuffer, ULONG ulLen )
    /* Strip the trailing (back)slash if there's one */
 
    {
-      ULONG ulLen = strlen( pbyBuffer );
+      ULONG ulLen = strlen( ( char * ) pbyBuffer );
 
       if( strchr( OS_PATH_DELIMITER_LIST, pbyBuffer[ ulLen - 1 ] ) )
          pbyBuffer[ ulLen - 1 ] = '\0';