ivy-ocaml update

This commit is contained in:
Eric
2010-11-22 15:26:53 +10:30
parent a7936af528
commit 7bfdeb7f21
+1 -1
View File
@@ -25,7 +25,7 @@ value ivy_mainLoop(value unit)
void timer_cb(TimerId id, void *data, unsigned long delta) void timer_cb(TimerId id, void *data, unsigned long delta)
{ {
value closure = *(value*)data; value closure = *(value*)data;
callback(closure, Val_long((int) id)); callback(closure, Val_long(id));
} }
value ivy_timerRepeatafter(value nb_ticks,value delay, value closure_name) value ivy_timerRepeatafter(value nb_ticks,value delay, value closure_name)