From 06da4c714df4d6b2da7f16aee917b62933032d11 Mon Sep 17 00:00:00 2001
From: Paul Tucker <ptucker@sympatico.ca>
Date: Tue, 30 Nov 1999 09:41:59 +0000
Subject: [PATCH] Added a cast on xgrab call

---
 harbour/ChangeLog        | 4 ++++
 harbour/source/pp/hbpp.c | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index ec57cbc7d8..1fa7055d53 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+19991130-04:30 EST Paul Tucker <ptucker@sympatico.ca>
+  * source/pp/hbpp.c
+    * added a cast on xgrab call.
+
 19991130-01:55 GMT+1 Victor Szel <info@szelvesz.hu>
   * tests/regress/rt_trans.prg
     + ~200 TRANSFORM() regression tests added, 43 of them fail.
diff --git a/harbour/source/pp/hbpp.c b/harbour/source/pp/hbpp.c
index 6f0b6cfdac..7a7df6a475 100644
--- a/harbour/source/pp/hbpp.c
+++ b/harbour/source/pp/hbpp.c
@@ -2543,7 +2543,7 @@ static void DebugPragma( char * szStr, int iValue, BOOL bValue )
    if( s_bTracePragma )
    {
       char * ptr = strchr( szStr, '=' );
-      char * temp = hb_xgrab( strlen( szStr ) + 1 );
+      char * temp = ( char * ) hb_xgrab( strlen( szStr ) + 1 );
       BOOL bIsSwitch = TRUE;
 
       * temp = '\0';