From 51671e68485ffa361b892b4887e6c0f8c7aba421 Mon Sep 17 00:00:00 2001 From: Antonio Linares Date: Sun, 17 Apr 2005 11:02:45 +0000 Subject: [PATCH] hb_vmArrayGen() - Microsoft C 64 bits required fix --- harbour/source/vm/hvm.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/harbour/source/vm/hvm.c b/harbour/source/vm/hvm.c index a716f662c8..cb4c74d73f 100644 --- a/harbour/source/vm/hvm.c +++ b/harbour/source/vm/hvm.c @@ -3216,7 +3216,7 @@ static void hb_vmArrayGen( ULONG ulElements ) /* generates an ulElements Array a itArray.type = HB_IT_NIL; hb_arrayNew( &itArray, ulElements ); for( ulPos = 0; ulPos < ulElements; ulPos++ ) - hb_itemCopy( itArray.item.asArray.value->pItems + ulPos, hb_stackItemFromTop( ulPos - ulElements ) ); + hb_itemCopy( itArray.item.asArray.value->pItems + ulPos, hb_stackItemFromTop( ( signed ) ( ulPos - ulElements ) ) ); for( ulPos = 0; ulPos < ulElements; ulPos++ ) hb_stackPop();