From 1ecdc6a115f48c880dff0cbc04f4de831480c748 Mon Sep 17 00:00:00 2001
From: usa <usa@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 1 Apr 2002 06:21:24 +0000
Subject: * ext/racc/cparse/cparse.c: prototype; call_scaniter(). *
 ext/sdbm/init.c: prototype; each_pair(). * ext/tcltklib/tcltklib.c:
 prototypes; _timer_for_tcl() and ip_ruby(),   Nobu's patch at
 [ruby-dev:14483].

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2311 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/racc/cparse/cparse.c | 2 ++
 ext/sdbm/init.c          | 2 ++
 ext/tcltklib/tcltklib.c  | 7 +++++++
 3 files changed, 11 insertions(+)

(limited to 'ext')

diff --git a/ext/racc/cparse/cparse.c b/ext/racc/cparse/cparse.c
index 7607364890..7ec12b9a98 100644
--- a/ext/racc/cparse/cparse.c
+++ b/ext/racc/cparse/cparse.c
@@ -282,6 +282,8 @@ catch_scaniter(arr, data, self)
     return Qnil;
 }
 
+static VALUE call_scaniter _((VALUE));
+
 static void
 wrap_yyparse(v)
     struct cparse_params *v;
diff --git a/ext/sdbm/init.c b/ext/sdbm/init.c
index 5412dd8452..c5d20bf983 100644
--- a/ext/sdbm/init.c
+++ b/ext/sdbm/init.c
@@ -420,6 +420,8 @@ update_i(pair, dbm)
     return Qnil;
 }
 
+static VALUE each_pair _((VALUE));
+
 static VALUE
 fsdbm_update(obj, other)
     VALUE obj, other;
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c
index 7acbacdd94..990fbc38af 100644
--- a/ext/tcltklib/tcltklib.c
+++ b/ext/tcltklib/tcltklib.c
@@ -64,6 +64,7 @@ static VALUE main_thread;
 static Tcl_TimerToken timer_token;
 
 /* timer callback */
+static void _timer_for_tcl _((ClientData));
 static void
 _timer_for_tcl(clientData)
     ClientData clientData;
@@ -90,6 +91,12 @@ _timer_for_tcl(clientData)
     rb_thread_schedule();
 }
 
+#if TCL_MAJOR_VERSION >= 8
+static int ip_ruby _((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST*));
+#else
+static int ip_ruby _((ClientData, Tcl_Interp *, int, char **));
+#endif
+
 /* execute Tk_MainLoop */
 static VALUE
 lib_mainloop(self)
-- 
cgit v1.2.3