diff --git a/harbour/source/rtl/classes.c b/harbour/source/rtl/classes.c
index af3196d4ed..fd72b3c6e7 100644
--- a/harbour/source/rtl/classes.c
+++ b/harbour/source/rtl/classes.c
@@ -684,8 +684,8 @@ HARBOUR OCLONE( void )
     {
       PITEM pDstObject = hb_arrayClone( pSrcObject );
       ItemCopy( &stack.Return, pDstObject ); /* OClone() returns the new object */
-      ItemRelease( pDstArray );
-      _xfree( pDstArray );
+      ItemRelease( pDstObject );
+      _xfree( pDstObject );
     }
   else
     _ret();