tcl-fix-socket-13.1.patch

@@ -0,0 +1,22 @@
+--- tests/socket.test	2025-04-29 17:37:07.745683933 +0200
++++ tests/socket.test	2025-04-29 17:26:42.669773969 +0200
+@@ -1809,7 +1809,7 @@
+ 
+ test socket_$af-13.1 {Testing use of shared socket between two threads} -body {
+     # create a thread
+-    set serverthread [thread::create -preserved [string map [list @localhost@ $localhost] {
++    set serverthread [thread::create -joinable [string map [list @localhost@ $localhost] {
+         set f [socket -server accept -myaddr @localhost@ 0]
+         set listen [lindex [fconfigure $f -sockname] 2]
+         proc accept {s a p} {
+@@ -1840,7 +1840,7 @@
+         gets $s result
+     }
+     close $s
+-    thread::release $serverthread
++    thread::join $serverthread
+     append result " " [llength [thread::names]]
+ } -result {hello 1} -constraints [list socket supported_$af thread]
+ 
+Index: tests/socket.test
+==================================================================

tcl.changes

@@ -1,3 +1,65 @@
+-------------------------------------------------------------------
+Tue Apr 29 15:46:07 UTC 2025 - Reinhard Max <max@suse.com>
+
+- Add tcl-fix-socket-13.1.patch to avoid a race condition in the
+  socket-13.1 test.
+
+-------------------------------------------------------------------
+Mon Apr  7 13:41:54 UTC 2025 - Reinhard Max <max@suse.com>
+
+- Version 8.6.16:
+  * [02d5d6] unneeded path normalization
+  * [cfdf80] zlib stream returns negative checksums
+  * [2c237b] regression in tzdata, %z instead of offset TZ-name
+  * [43c94f] Tcl will not start properly if there is an init.tcl 
+    file in the current dir
+  * [f2b5f8] clock scan of leapsecond: wrong result
+  * [0b809c] Segfault in TclOO with coroutines
+
+-------------------------------------------------------------------
+Tue Sep 24 09:15:58 UTC 2024 - Reinhard Max <max@suse.com>
+
+- TCL_PACKAGE_PATH now needs to be a unix-style path separated by
+  colons rather than a Tcl list.
+
+-------------------------------------------------------------------
+Fri Sep 13 14:38:41 UTC 2024 - Reinhard Max <max@suse.com>
+
+- Version 8.6.15:
+  * [d63061] remove private unicode 0xE000-0xF8FF from unicode
+    control group
+  * [1b8a89] TCL_PACKAGE_PATH in tclConfig.sh change from TCL list
+    to ":" separated items
+    *** POTENTIAL INCOMPATIBILITY ***
+  * [1acd17] fix compiled mapped ensembles
+  * [f23022] fix encoding koi8-u codepoint 0xB4
+  * [6811a0] speedup op unicode transformation related operations
+  * Add encodings: koi8-ru, koi8-t
+  * [7cb740] Fix Tcl_ParseArgsObjv with TCL_ARGV_GENFUNC option
+  * Hash speedup for pointer compare. Option
+    TCL_HASH_KEY_DIRECT_COMPARE for hash tables
+  * [TIP 692] Deprecate Tcl_GetAlias()
+  * [a5f4a7] Correct tcl::tm::path autoload
+  * [3c26de] Remove empty all items from tclConfig.sh path
+    variables.
+  * [87271f] Fix crash in oo+coroutine
+  * [7842f3] fix crash in oo destructors in same namespace
+  * [79474c] Fix crash in reflected channels
+  * [c6897e] Fix crash due to unchecked file descriptor size
+  * [3fc328] Fix report of non ASCII computer names on Windows
+  * [e3f4a8] Fix error message caused by interp limit
+  * [1d26e5] Source files with BOM also in safe interpreters
+  * [5fca83] Fix encoding system result for system locale
+    ISO-8859-1
+  * [0de6c1] Fix crash in [child invokehidden info frame]
+  * [74b611] Fix removal of oo variable by [info exists]
+  * [91b3a5] Make [self] work inside [$obj eval]
+  * [154f09] Tcl_NewObjectInstance() errors on namespace re-use
+        *** POTENTIAL INCOMPATIBILITY -- breaks Itcl 4.2 ***
+  * [2da1cb] Fix [$obj varname] for linked varnames
+  * Unicode version 16
+  * [7179c6] Fix byte compiled [incr] with wide int increment
+
 -------------------------------------------------------------------
 Fri Mar  1 16:52:58 UTC 2024 - Reinhard Max <max@suse.com>
 

tcl.spec

@@ -1,7 +1,7 @@
 #
 # spec file for package tcl
 #
-# Copyright (c) 2024 SUSE LLC
+# Copyright (c) 2025 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -22,11 +22,11 @@
 
 Name:           tcl
 URL:            http://www.tcl.tk
-Version:        8.6.14
+Version:        8.6.16
 Release:        0
 %define         rrc %{nil}
 %define TCL_MINOR %(echo %version | cut -c1-3)
-%define itclver 4.2.4
+%define itclver 4.3.2
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 Summary:        The Tcl Programming Language
 License:        TCL
@@ -48,6 +48,7 @@ Source0:        http://prdownloads.sourceforge.net/tcl/%{name}%{version}%{rrc}-s
 Source1:        tcl-rpmlintrc
 Source2:        baselibs.conf
 Source3:        macros.tcl
+Patch0:         tcl-fix-socket-13.1.patch
 BuildRequires:  autoconf
 BuildRequires:  pkg-config
 BuildRequires:  zlib-devel
@@ -87,6 +88,7 @@ the Tcl language itself.
 
 %prep
 %setup -q -n %name%version
+%patch -P 0
 if ! test -d pkgs/itcl%itclver; then
    : New itcl version: pkgs/itcl* . Please update the %%itclver macro acordingly.
    exit 1
@@ -99,7 +101,7 @@ rm -r pkgs/sqlite3.*
 %build
 %global _lto_cflags %{_lto_cflags} -ffat-lto-objects
 %define scriptdir %_libdir/tcl
-export TCL_PACKAGE_PATH="%scriptdir %_datadir/tcl"
+export TCL_PACKAGE_PATH="%scriptdir:%_datadir/tcl"
 export TCL_LIBRARY="%scriptdir/tcl%TCL_MINOR"
 cd unix
 autoconf

tcl8.6.14-src.tar.gz

@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:5880225babf7954c58d4fb0f5cf6279104ce1cd6aa9b71e9a6322540e1c4de66
-size 11627322