luke
/
netgen
mirror of https://github.com/RTimothyEdwards/netgen.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

One hopefully final modification to ensure that Tcl_InitStubs() 

uses the Tcl version that the program has been compiled to.  This
should work with both Tcl 8.X and Tcl 9.X.
This commit is contained in:
R. Timothy Edwards 2025-11-12 11:32:18 -05:00
parent f7d35f9cca
commit 04163aedcc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tcltk/tclnetgen.c
View File

@ -4570,7 +4570,7 @@ int Tclnetgen_Init(Tcl_Interp *interp)
/* Remember the interpreter */
netgeninterp = interp;
if (Tcl_InitStubs(interp, "8.5", 0) == NULL) return TCL_ERROR;
if (Tcl_InitStubs(interp, TCL_VERSION, 0) == NULL) return TCL_ERROR;
for (n = 0; netgen_cmds[n].name != NULL; n++) {
sprintf(keyword, "netgen::%s", netgen_cmds[n].name);