Changeset 527 for trunk/thune/eval.c

Timestamp:

05/26/08 17:22:18 (6 months ago)

Author:

krobillard

Message:

Added thune-gl widget! datatype.

Files:

• trunk/thune/eval.c (modified) (4 diffs)

trunk/thune/eval.c

@@ -352 +352 @@
 
 
-static void _appendTraceBlk( UThread* ut, UCellError* err, int n, int it )
+void ur_appendTraceT( UThread* ut, UCellError* err, UIndex blkN, UIndex it )
 {
     if( err->traceBlk )
@@ -361 +361 @@
         blk = ur_blockPtr( err->traceBlk );
         cell = ur_appendCell( blk, UT_BLOCK );
-        ur_setSeries( cell, n, it );
+        ur_setSeries( cell, blkN, it );
     }
 }
@@ -504 +504 @@
 
 
+/**
+  Evaluate C string.
+
+  \param cmd  String to evaluate.
+  \param len  Length of cmd string.  May be -1 if cmd is null terminated.
+
+  \return UR_EVAL_ code.
+*/
 int ur_evalCStr( UThread* ut, const char* cmd, int len )
 {
@@ -1617 +1625 @@
         res->func.closureN  = 0;
         res->func.sigN      = sigN;
-    }
-    UR_S_DROP;
+
+        UR_S_DROP;
+    }
+    else
+    {
+        ur_throwErr( UR_ERR_DATATYPE, "func expected two block! values" );
+    }
 }