From 63edf4eeb3b8063bf9541dbc611dde73abf4ca56 Mon Sep 17 00:00:00 2001 From: gautier.hattenberger Date: Wed, 7 Jan 2015 14:36:00 +0000 Subject: fix ctkivy and add tk part to makefile again --- civy.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'civy.c') diff --git a/civy.c b/civy.c index 563f7ec..8ca8ef9 100644 --- a/civy.c +++ b/civy.c @@ -13,7 +13,7 @@ value ivy_sendMsg(value msg) { - IvySendMsg(String_val(msg)); + IvySendMsg("%s", String_val(msg)); return Val_unit; } @@ -60,7 +60,7 @@ void ClosureCallback(IvyClientPtr app, void *closure, int argc, char **argv) value ivy_bindMsg(value cb_name, value regexp) { value * closure = caml_named_value(String_val(cb_name)); - MsgRcvPtr id = IvyBindMsg(ClosureCallback, (void*)closure, String_val(regexp)); + MsgRcvPtr id = IvyBindMsg(ClosureCallback, (void*)closure, "%s", String_val(regexp)); return Val_long(id); } -- cgit v1.1