diff options
author | Jun FURUSE / 古瀬 淳 <jun.furuse@gmail.com> | 2010-04-03 06:43:51 +0000 |
---|---|---|
committer | Jun FURUSE / 古瀬 淳 <jun.furuse@gmail.com> | 2010-04-03 06:43:51 +0000 |
commit | f5fc4d52079c0eb2a91e2cbc3c7c23f6554e43cb (patch) | |
tree | feeec35aaf445ec41d4b1cb9e529a3193b2ad217 /otherlibs/labltk/tkanim/cltkaniminit.c | |
parent | ab550592efa74f1f67a705f84251cce7e32a64c6 (diff) |
fix for tk86 and removal of tkanim
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@10230 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/labltk/tkanim/cltkaniminit.c')
-rw-r--r-- | otherlibs/labltk/tkanim/cltkaniminit.c | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/otherlibs/labltk/tkanim/cltkaniminit.c b/otherlibs/labltk/tkanim/cltkaniminit.c deleted file mode 100644 index a45bedcb5..000000000 --- a/otherlibs/labltk/tkanim/cltkaniminit.c +++ /dev/null @@ -1,28 +0,0 @@ -/***********************************************************************/ -/* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ -/* */ -/* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ -/* projet Cristal, INRIA Rocquencourt */ -/* Jacques Garrigue, Kyoto University RIMS */ -/* */ -/* Copyright 2002 Institut National de Recherche en Informatique et */ -/* en Automatique and Kyoto University. All rights reserved. */ -/* This file is distributed under the terms of the GNU Library */ -/* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ -/* */ -/***********************************************************************/ -#include <tk.h> -#include <mlvalues.h> -#include "camltk.h" - -extern int Tkanim_Init(Tcl_Interp *); - -CAMLprim value tkanim_init (rien) /* ML */ - value rien; -{ - if (Tkanim_Init(cltclinterp) != TCL_OK) - tk_error ("Can't initialize TkAnim"); - return Val_unit; -} |