From d567e908db2e1acec01d0798bd7e8af6c084dba4 Mon Sep 17 00:00:00 2001
From: hattenberger
Date: Wed, 1 May 2013 22:48:44 +0000
Subject: remove accidental trunk dir

---
 trunk/cglibivy.c | 43 -------------------------------------------
 1 file changed, 43 deletions(-)
 delete mode 100644 trunk/cglibivy.c

(limited to 'trunk/cglibivy.c')

diff --git a/trunk/cglibivy.c b/trunk/cglibivy.c
deleted file mode 100644
index 8241b70..0000000
--- a/trunk/cglibivy.c
+++ /dev/null
@@ -1,43 +0,0 @@
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <getopt.h>
-#include <Ivy/timer.h>
-#include <Ivy/ivychannel.h>
-#include <Ivy/ivyglibloop.h>
-#include <Ivy/version.h>
-#include <glib.h>
-#include <caml/mlvalues.h>
-#include <caml/fail.h>
-#include <caml/callback.h>
-#include <caml/memory.h>
-#include <caml/alloc.h>
-
-value ivy_GtkmainLoop(value unit)
-{
-  g_main_loop_run(g_main_loop_new(NULL, FALSE));
-  return Val_unit;
-}
-
-extern void cb_delete_channel(void *delete_read);
-extern void cb_read_channel(Channel ch, IVY_HANDLE fd, void *closure);
-extern void cb_write_channel(Channel ch, IVY_HANDLE fd, void *closure);
-
-value ivy_GtkchannelSetUp(value fd, value closure_name)
-{
-  Channel c;
-  value * closure = caml_named_value(String_val(closure_name));
-
-#if IVYMINOR_VERSION == 8
-  c = IvyChannelAdd((IVY_HANDLE)Int_val(fd), (void*)closure, cb_delete_channel, cb_read_channel);
-#else
-  c = IvyChannelAdd((IVY_HANDLE)Int_val(fd), (void*)closure, cb_delete_channel, cb_read_channel, cb_write_channel);
-#endif
-  return Val_int(c);
-}
-
-value ivy_GtkchannelClose(value ch)
-{
-  IvyChannelRemove((Channel)Long_val(ch));
-  return Val_unit;
-}
-- 
cgit v1.1