Changeset 45 for trunk/orca

Timestamp:

02/12/06 17:13:56 (3 years ago)

Author:

krobillard

Message:

OR_CONFIG_REBOL foreach compiles again.

Files:

• trunk/orca/context.c (modified) (4 diffs)

trunk/orca/context.c

@@ -809 +809 @@
     OValue* a2 = a1 + 1;
     OIndex serN = a2->index;
-    OIndex si   = a2->series.index;
+    OIndex si   = a2->series.it;
     OIndex send;
     OIndex body = (a1 + 2)->index;
-    OIndex bi   = (a1 + 2)->series.index;
+    OIndex bi   = (a1 + 2)->series.it;
 
 
@@ -835 +835 @@
 
         orRefPush( OT_BLOCK, a1->index );
-        orMakeContext( &ctx, blk->used - a1->series.index );
+        orMakeContext( &ctx, blk->used - a1->series.it );
         orRefPop( 1 );
 
-        it  = blk->values + a1->series.index;
+        it  = blk->values + a1->series.it;
         end = blk->values + blk->used;
 
@@ -983 +983 @@
             orResultNONE;
 
-            if( a2->series.index )
+            if( a2->series.it )
             {
                 OValue* begin;
@@ -990 +990 @@
                 blk = orBLOCK(a2);
                 begin = blk->values;
-                it    = begin + a2->series.index;
+                it    = begin + a2->series.it;
 
                 while( it->LIST_NEXT > 0 )