Changeset 298 for trunk/orca/ovalue.c

Timestamp:

10/10/06 16:04:40 (2 years ago)

Author:

krobillard

Message:

Orca - 'do no longer clobbers thrown error.

Files:

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

trunk/orca/ovalue.c

@@ -1466 +1466 @@
             orRefPop( 1 );
             orEvalBlock( orBlockPtr( blkN ), 2 );
-            orCopyV(a1, a1[3]);
+            if( ! orErrorThrown )
+            {
+                orCopyV(a1, a1[3]);
+            }
             _popScript();
         }