<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom"><channel><title>Recent changes to 54: TclBlend 1.4.1 crash at Tcl/TK 8.6.1 (Windows platform)</title><link>https://sourceforge.net/p/tcljava/bugs/54/</link><description>Recent changes to 54: TclBlend 1.4.1 crash at Tcl/TK 8.6.1 (Windows platform)</description><atom:link href="https://sourceforge.net/p/tcljava/bugs/54/feed.rss" rel="self"/><language>en</language><lastBuildDate>Tue, 01 Dec 2015 17:05:49 -0000</lastBuildDate><atom:link href="https://sourceforge.net/p/tcljava/bugs/54/feed.rss" rel="self" type="application/rss+xml"/><item><title>#54 TclBlend 1.4.1 crash at Tcl/TK 8.6.1 (Windows platform)</title><link>https://sourceforge.net/p/tcljava/bugs/54/?limit=25#4214</link><description>&lt;div class="markdown_content"&gt;&lt;p&gt;I also test TclBlend 1.4.1  and Tcl 8.6.0, and execute test Tcl script is OK. So Tcl 8.6.0 -&amp;gt; 8.6.1 has something let TclBlend crash. &lt;/p&gt;&lt;/div&gt;</description><dc:creator xmlns:dc="http://purl.org/dc/elements/1.1/">Danilo Raynor</dc:creator><pubDate>Tue, 01 Dec 2015 17:05:49 -0000</pubDate><guid>https://sourceforge.netb7836315a5f052cf17d908f5945601283786d2b8</guid></item><item><title>TclBlend 1.4.1 crash at Tcl/TK 8.6.1 (Windows platform)</title><link>https://sourceforge.net/p/tcljava/bugs/54/</link><description>&lt;div class="markdown_content"&gt;&lt;p&gt;Test environment:&lt;br/&gt;
Windows XP SP3&lt;br/&gt;
Java SE 8u65&lt;br/&gt;
Using MINGW/MSYS to build TclBlend and test.&lt;/p&gt;
&lt;p&gt;Test Tcl script:&lt;br/&gt;
package require java&lt;br/&gt;
java::import java.net.InetAddress&lt;br/&gt;
puts "My IP Address is: &lt;span&gt;[ [ java::call InetAddress getLocalHost ]&lt;/span&gt; getHostAddress ] "&lt;/p&gt;
&lt;p&gt;Test in Tcl 8.5.18, the test Tcl script do not crash, and get result&lt;br/&gt;
My IP Address is: 192.168.2.105&lt;/p&gt;
&lt;p&gt;Test in Tcl 8.6.1, fail in step 3.&lt;/p&gt;
&lt;p&gt;(I modifiied  tclBlend\src\native\javaInterp.c, for support Tcl 8.6 changed (TIP #330: Eliminate interp-&amp;gt;result from the Public Headers).&lt;/p&gt;
&lt;p&gt;Below is my change:&lt;br/&gt;
    if (exception) {&lt;br/&gt;
        (&lt;em&gt;env)-&amp;gt;DeleteLocalRef(env, exception);&lt;br/&gt;
        (void) Tcl_GetStringResult(interp);&lt;br/&gt;
        tPtr-&amp;gt;errMsg = (char &lt;/em&gt;) &lt;br/&gt;
            ckalloc((unsigned) (strlen(Tcl_GetStringResult(interp)) + 1));&lt;br/&gt;
            //ckalloc((unsigned) (strlen(interp-&amp;gt;result) + 1));&lt;br/&gt;
        //strcpy(tPtr-&amp;gt;errMsg, interp-&amp;gt;result);&lt;br/&gt;
        strcpy(tPtr-&amp;gt;errMsg, Tcl_GetStringResult(interp));&lt;br/&gt;
        result = tPtr-&amp;gt;errMsg;&lt;br/&gt;
    }&lt;/p&gt;
&lt;p&gt;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.&lt;/p&gt;&lt;/div&gt;</description><dc:creator xmlns:dc="http://purl.org/dc/elements/1.1/">Danilo Raynor</dc:creator><pubDate>Tue, 01 Dec 2015 12:47:19 -0000</pubDate><guid>https://sourceforge.net79e1eb66e121f86c9575d6f10e4497f585cf9c97</guid></item></channel></rss>