https://sourceforge.net/p/tcljava/bugs/54/2015-12-01T17:05:49.148000ZRecent changes to 54: TclBlend 1.4.1 crash at Tcl/TK 8.6.1 (Windows platform)2015-12-01T17:05:49.148000Z2015-12-01T17:05:49.148000ZDanilo Raynorhttps://sourceforge.net/u/draynor/https://sourceforge.netb7836315a5f052cf17d908f5945601283786d2b8

<div class="markdown_content"><p>I also test TclBlend 1.4.1 and Tcl 8.6.0, and execute test Tcl script is OK. So Tcl 8.6.0 -&gt; 8.6.1 has something let TclBlend crash. </p></div>

2015-12-01T12:47:19.266000Z2015-12-01T12:47:19.266000ZDanilo Raynorhttps://sourceforge.net/u/draynor/https://sourceforge.net79e1eb66e121f86c9575d6f10e4497f585cf9c97

<div class="markdown_content"><p>Test environment:<br/> Windows XP SP3<br/> Java SE 8u65<br/> Using MINGW/MSYS to build TclBlend and test.</p> <p>Test Tcl script:<br/> package require java<br/> java::import java.net.InetAddress<br/> puts "My IP Address is: <span>[ [ java::call InetAddress getLocalHost ]</span> getHostAddress ] "</p> <p>Test in Tcl 8.5.18, the test Tcl script do not crash, and get result<br/> My IP Address is: 192.168.2.105</p> <p>Test in Tcl 8.6.1, fail in step 3.</p> <p>(I modifiied tclBlend\src\native\javaInterp.c, for support Tcl 8.6 changed (TIP #330: Eliminate interp-&gt;result from the Public Headers).</p> <p>Below is my change:<br/> if (exception) {<br/> (<em>env)-&gt;DeleteLocalRef(env, exception);<br/> (void) Tcl_GetStringResult(interp);<br/> tPtr-&gt;errMsg = (char </em>) <br/> ckalloc((unsigned) (strlen(Tcl_GetStringResult(interp)) + 1));<br/> //ckalloc((unsigned) (strlen(interp-&gt;result) + 1));<br/> //strcpy(tPtr-&gt;errMsg, interp-&gt;result);<br/> strcpy(tPtr-&gt;errMsg, Tcl_GetStringResult(interp));<br/> result = tPtr-&gt;errMsg;<br/> }</p> <p>And I already apply #22 Compile/Run against Tcl 8.6 patch to TclBlend (Jan Nijtmans patch for Tcl 8.6), but TclBlend still crash at Tcl 8.6.1.</p></div>