Unrelease memory block in aEval.

harbour/ChangeLog

@@ -1,3 +1,7 @@
+19990508-20:57 Eddie Runia
+   * source/rtl/arrays.c:
+     Fixed unreleased memory block in aEval.
+
 19990508-15:24 CET Victor Szel <info@szelvesz.hu>
 
    * source/rtl/strings.c:

harbour/source/rtl/arrays.c

@@ -479,6 +479,7 @@ HARBOUR AEVAL( void )
    {
 	  ArrayEval( pArray, bBlock, _parnl( 3 ), _parnl( 4 ) );
 	  ItemCopy( &stack.Return, pArray ); /* AEval() returns the array itself */
+      ItemRelease( pArray );             /* Release array holders once       */
    }
    else
 	  _ret();