From fcf0329068e9b540172889dfd9e723fa94a0b7b2 Mon Sep 17 00:00:00 2001
From: Viktor Szakats <harbour@syenar.net>
Date: Tue, 25 Apr 2000 22:29:23 +0000
Subject: [PATCH] 20000426-00:22 GMT+1 Victor Szakats <info@szelvesz.hu>

---
 harbour/source/rtl/transfrm.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/harbour/source/rtl/transfrm.c b/harbour/source/rtl/transfrm.c
index 6edc0f857e..99c5f7d4ee 100644
--- a/harbour/source/rtl/transfrm.c
+++ b/harbour/source/rtl/transfrm.c
@@ -368,7 +368,7 @@ HB_FUNC( TRANSFORM )
          if( uiPicFlags & PF_STRING )
          {
             char * szPic2 = hb_itemGetCPtr( pPic );
-            int ulLen = atol( szPic2 + 2 );
+            ULONG ulLen = ( ULONG ) atol( szPic2 + 2 );
 
             if( ulLen & ( ulLen <= ulExpLen ) )
             {