Changeset 480 for trunk/thune/eval.c

Timestamp:

09/24/07 23:27:09 (14 months ago)

Author:

krobillard

Message:

Line comments now set SOL for next value.
Select! now supports a negative index.

Files:

• trunk/thune/eval.c (modified) (1 diff)

trunk/thune/eval.c

@@ -170 +170 @@
                 goto set_none;
         }
+        ur_throwErr( UR_ERR_SCRIPT, "Invalid select!" );
+        return 0;
     }
     else
     {
-        if( ur_pick( ut, val, ur_sel(sel) - 1, res ) )
-            return 1;
-    }
-
-    ur_throwErr( UR_ERR_SCRIPT, "Invalid select!" );
-    return 0;
+        int n = ur_sel(sel);
+        if( n )
+        {
+            if( n > 0 )
+                --n;
+            if( ur_pick( ut, val, n, res ) )
+                return 1;
+        }
+    }
 
 set_none: