File: tclxkeyedlist.patch

package info (click to toggle)
tclthread 1%3A2.8.0-1
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 1,712 kB
  • ctags: 988
  • sloc: ansic: 8,188; tcl: 1,694; sh: 406; makefile: 77
file content (21 lines) | stat: -rw-r--r-- 616 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
Author: Sergei Golovan
Description: Patch renames four private functions to prevent collision with
 AOLserver.
Last-Modified: Wed, 06 Apr 2016 12:01:22 +0300

--- a/generic/tclXkeylist.h
+++ b/generic/tclXkeylist.h
@@ -23,6 +23,13 @@
  * Keyed list object interface commands
  */
 
+#ifdef NS_AOLSERVER
+# define TclX_KeyedListGet tTclX_KeyedListGet
+# define TclX_KeyedListSet tTclX_KeyedListSet
+# define TclX_KeyedListDelete tTclX_KeyedListDelete
+# define TclX_KeyedListGetKeys tTclX_KeyedListGetKeys
+#endif
+
 MODULE_SCOPE Tcl_Obj* TclX_NewKeyedListObj();
 
 MODULE_SCOPE void TclX_KeyedListInit(Tcl_Interp*);