From a7afa0bd4456133ec8d345b6b9f3468c981f061a Mon Sep 17 00:00:00 2001
From: Jakub Bogusz <qboosh@pld-linux.org>
Date: Sun, 24 Jul 2005 10:29:40 +0000
Subject: [PATCH] - avoid conflicting prototypes for tcl 8.5+

Changed files:
    blt-tcl85.patch -> 1.1
---
 blt-tcl85.patch | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 blt-tcl85.patch

diff --git a/blt-tcl85.patch b/blt-tcl85.patch
new file mode 100644
index 0000000..84a7494
--- /dev/null
+++ b/blt-tcl85.patch
@@ -0,0 +1,39 @@
+--- blt2.4z/src/bltNsUtil.h.orig	2002-07-18 08:35:32.000000000 +0200
++++ blt2.4z/src/bltNsUtil.h	2005-07-24 12:07:44.825339104 +0200
+@@ -47,8 +47,10 @@
+ #endif
+ 
+ 
++#if (TCL_VERSION_NUMBER < _VERSION(8,0,0)) 
+ EXTERN Tcl_Command Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp *interp,
+ 	char *name, Tcl_Namespace *nsPtr, int flags));
++#endif
+ 
+ #define NS_SEARCH_NONE		(0)
+ #define NS_SEARCH_CURRENT	(1<<0)
+@@ -56,14 +58,17 @@
+ #define NS_SEARCH_BOTH		(NS_SEARCH_GLOBAL | NS_SEARCH_CURRENT)
+ 
+ 
++#if (TCL_VERSION_NUMBER < _VERSION(8,5,0))
+ /*
+  * Namespace procedures not prototyped defined in Tcl.h 
+  */
+ EXTERN Tcl_Namespace *Tcl_GetCurrentNamespace _ANSI_ARGS_((Tcl_Interp *interp));
+ 
+ EXTERN Tcl_Namespace *Tcl_GetGlobalNamespace _ANSI_ARGS_((Tcl_Interp *interp));
++#endif
+ 
+ #if (TCL_MAJOR_VERSION >= 8)
++#  if (TCL_VERSION_NUMBER < _VERSION(8,5,0))
+ EXTERN Tcl_Namespace *Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp *interp,
+ 	char *name, ClientData clientData, Tcl_NamespaceDeleteProc *nsDelProc));
+ 
+@@ -74,6 +79,7 @@
+ 
+ EXTERN int Tcl_Export _ANSI_ARGS_((Tcl_Interp *interp, Tcl_Namespace *nsPtr,
+ 	char *name, int resetFlag));
++#  endif
+ 
+ EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_((Tcl_Interp *interp, char *name,
+ 	Tcl_Namespace *contextNsPtr, int flags));
-- 
2.43.0