From b6c1095ea8c3232c3536a13f20ad582a375e138f Mon Sep 17 00:00:00 2001
From: Eddie Runia <eddie@runia.com>
Date: Wed, 5 May 1999 21:48:59 +0000
Subject: [PATCH] iStatics problem resolved in Do.

iStatics was not reset after function call.

See e-mails : classes bug ??
---
 harbour/source/vm/hvm.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/harbour/source/vm/hvm.c b/harbour/source/vm/hvm.c
index 722891aff8..ff537a4434 100644
--- a/harbour/source/vm/hvm.c
+++ b/harbour/source/vm/hvm.c
@@ -606,6 +606,7 @@ void Do( WORD wParams )
    WORD wItemIndex = pItem - stack.pItems;
    PITEM pSelf = stack.pPos - wParams - 1;
    HARBOURFUNC pFunc;
+   WORD iStatics = stack.iStatics;              /* Return iStatics position */
 
    if( ! IS_SYMBOL( pItem ) )
    {
@@ -654,6 +655,7 @@ void Do( WORD wParams )
       StackPop();
 
    stack.pBase = stack.pItems + wStackBase;
+   stack.iStatics = iStatics;
 }
 
 HARBOUR DoBlock( void )