Changeset 185 for trunk/thune/eval.c

Timestamp:

06/14/06 04:48:20 (3 years ago)

Author:

krobillard

Message:

Thune - ur_tokenize() now handles negative numbers. Added ur_intToStr().

Files:

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

trunk/thune/eval.c

@@ -2195 +2195 @@
     }
 }
+
+
+#if 0
+#define TICKS(x)    __asm__ volatile (".byte 0x0f, 0x31" : "=A" (x))
+
+// ( -- str)
+UR_CALL( uc_ticks )
+{
+    uint64_t ticks;
+    UR_CALL_UNUSED_TOS
+
+    UR_S_GROW;
+    ur_initType(UR_TOS, UT_INT64);
+
+    TICKS(ticks);
+    ur_int64(UR_TOS) = ticks; 
+}
+#endif