Changeset 148 for trunk/orca

Timestamp:

05/11/06 22:17:50 (3 years ago)

Author:

krobillard

Message:

Compose now keeps new block away from GC.

Files:

• trunk/orca/ovalue.c (modified) (1 diff)

trunk/orca/ovalue.c

@@ -3066 +3066 @@
         blkN = orBlockN(blk);
 
-        composeBlock( blk, 0, deep,
-                      orRefineSet(REF_COMP_ONLY) ? 1 : 0 ); 
-        if( ! orErrorThrown )
-        {
-            orResultBLOCK( blkN );
-        }
+        // Replace original on stack before compose to avoid GC.
+        orResultBLOCK( blkN );
+
+        composeBlock( blk, 0, deep, orRefineSet(REF_COMP_ONLY) ? 1 : 0 ); 
     }
 }