Package: tclreadline / 2.1.0-15+deb9u1

stubs.patch Patch series | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Author: Sergei Golovan
Description: Patch initializes the Tcl stub table. So, the tclreadline
 library doesn't have undefined symbols anymore. The patch is incomplete,
 it should be accompanied by a patch to configure.in amd Makefile.in.
 For now, I've just added a few lines to debian/rules to overcome that.
Last-Modified: Sat, 08 Oct 2016 12:08:16 +0300

--- a/tclreadline.c
+++ b/tclreadline.c
@@ -559,6 +559,13 @@
 Tclreadline_Init(Tcl_Interp *interp)
 {
     int status;
+
+#ifdef USE_TCL_STUBS
+   if (Tcl_InitStubs(interp, "8.1", 0) == NULL) {
+       return TCL_ERROR;
+   }
+#endif
+
     Tcl_CreateObjCommand(interp, "::tclreadline::readline", TclReadlineCmd,
 	(ClientData) NULL, (Tcl_CmdDeleteProc *) NULL);
     tclrl_interp = interp;